取SQLSERVER服务器上的时间
procedure TForm1.btn1Click(Sender: TObject);
begin
try
qry1.SQL.Text:='select GETDATE()';
qry1.Open;
edt1.Text:=qry1.Fields[0].AsString;
finally
qry1.Close;
end;
end;