Question

如何在DELPHI中获取SQL服务器时间并显示

我需要在我的程序中获取SQL服务器的时间并显示在一个LABEL上，请问应该如何操作？DELPHI我学了个大概，SQL基本上不懂，最好使给出方法的完整代码。

Answer 1

select getdate();
执行上面的语句获得第一行第一列并输出就行了

Answer 2

function DateNow: TDateTime;
begin
with TADOQuery.Create(nil) do
try
Connection := UDataModule.AdoCnMain;
SQL.Text := 'select GetDate() as FDate';
Open;
Result := FieldValues['FDate'];
finally
Free;
end;
end;