怎样可以取得另一台电脑的当前日期？

Question

怎样可以取得另一台电脑的当前日期？

Answer 1

1,通过API，具体是什么API我就记不清叻
2，通过C/S机制，利用网络编程
3，通过SQL SERVER

Answer 2

提供另一种方法：
使用NMDayTime控件，代码如下：
procedure TForm1.Button1Click(Sender: TObject);
begin
  label1.Caption:='Local:'+datetimetostr(now);
  Label2.Caption:='Remote:'+NMDayTime1.DayTimeStr;
  
end;
  NMDAYTIME1的HOST属性设置为远程主机的地址即可，其他可以不改

Answer 3

上述NMDAYTIME的方法好像只能用于WIN2K、NT的远程主机

Answer 4

下面代码是取得SQL SERVER服务器的时间，并设置为本机的系统时间。
这是我开发的售票系统中用来统一整个网络上所有计算机系统时间。
var
  TempDateTime: TDateTime;
  TempSystemTime: TSystemTime;
begin
  ShortDateFormat := 'YYYY-MM-DD';
  ShortTimeFormat := 'HH:MM:SS';
  with qrQuery do
  begin
    Close;
    SQL.Text;
    SQL.Add('select GetDAte() as  CurrentDate ');
    Try
      Open;
    except
      exit;
    end;
  end;
  TempDateTime := Qrquery.FieldByName('CurrentDate').AsDateTime;
   DateTimeToSystemTime(TempDateTime, TempSystemTime);
  SetLocalTime(TempSystemTime);
end;

Answer 5

使用NetRemoteTODhttp://msdn.microsoft.com/library/en-us/netmgmt/netmgmt/netremotetod.asp上有完整的C++例子！！！