用SQL从服务器获取到时间，怎样更新到本机？
例如：用SQL从服务器获取到时间 2013-03-03 00:01:30.180
怎样更新本地日期和时间？
[解决办法]
procedure TfmMain.SetSystemDateTime;
var
ServerDateTime: TDateTime;
ServerSystemTime: TSystemTime;
begin
QryTemp.Close;
QryTemp.CommandText := ' SELECT SYSDATE FROM DUAL ';//从数据库获取到数据库的时间
QryTemp.Open;
ServerDateTime := QryTemp.FieldByName('SYSDATE').AsDateTime;
DateTimeToSystemTime(ServerDateTime, ServerSystemTime);
SetLocalTime(ServerSystemTime);
end;
