用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;