本文整理自网络,侵删。
var sql: string; date: TDateTime;begin sql := 'select GETDATE()'; date := FDConnection1.ExecSQLScalar(sql); Edit1.Text := DateTimeToStr(date);
来源:https://blog.csdn.net/ozhy111/article/details/90677401
相关阅读 >>
解决 Delphi 程序在不同操作系统中 shellexecute 调用 chrome.exe 偶尔无效的问题
更多相关阅读请进入《Delphi》频道 >>