本文整理自网络,侵删。
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 快速获取文件大小(使用_lopen和fileseek,此函数可以快速获取文件大小,即使文件已经被其它程序锁定)
更多相关阅读请进入《Delphi》频道 >>