局域网上的两台电脑,怎样能够取得对方电脑的当前时间?(15分)

  • 主题发起人 主题发起人 leader47
  • 开始时间 开始时间
L

leader47

Unregistered / Unconfirmed
GUEST, unregistred user!
如题.
是用socket实现吗?怎样做?
 
简单点,用调用NET TIME就可以知道对方的时间。
 
那边放个获取本地时间的程序,或者dll. 然后这边的远程调用. ..
好像很笨..
 
duhai_lee,关键就是怎么样远程调用 啊?
 
用indy的idtime idtimeserver做好了。
 
帮顶..................
 
hhjjhhjj,可以简单说一下indy的idtime idtimeserver 怎样用,好吗?/
 
取对方电脑的时间?
我见过取SQLSERVER服务器的时间的,如果是这样的可以如下操作:
写一个函数,然后是SQL语句
select getdate() as a ,
 
服务器端:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
serversocket1.socket.sendtext(datetostr(Now));
end;
客户端
procedure TForm1.ClientSocket1Read(Sender: TObject; Socket: TCustomWinSocket);
var mytime:Tdatetime;
begin
mytime:=strtodate(socket.ReceiveText);//mytime为服务器时间
end;
 
取得服务器时间:
select getdate() as Datetime;
 
请问:
1.serversocket在哪个组件面板可以找到?我的delphi7没有.
2.serversocket和clientsocket的属性需要设置才能连接通信?我只知道要 设置 IP,port.
还有connect方法.还有其他呢?

我现在遇到的问题主要是不知道怎样用socket通信,懂得了上面2个问题,我相信可以了.
再加上上面 dongy_143 的提示.
 
idtime不能保证可以正常获得对方电脑的时间,有时可以,有时是不行的。
最好还是用NET TIME吧。
 
谁可以回答我的以上2个问题?谢谢
 
如果它有安装SQL你又知道密码就容易了
 
http://www.codesearch.com.cn
中国最大得源代码搜索引擎
 
后退
顶部