加到100分,询问取得网络系统时间的简单问题! (50分)

R

ranxg

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-28

• #1

小弟刚接触DELPHI不久，请教诸位大侠。我只知道取得电脑的时间变量为NOW，但不知道
取得网络时间的变量是什么，我用了DELPHI6一个获取网络时间的控件，但就是不知道怎
么用，请指点。（代码如下）
procedure TForm1.NMTime1Connect(Sender: TObject);
begin
NMTime1.Connect;
label1.Caption:=NMTime1.TimeStr;
end;

 

D

ddxxkk

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-28

• #2

对方主机有开一个TIME(37号端口)的服务才行，一般情况linux主机默认全有本服务,但2000主机没有
procedure TForm1.Button1Click(Sender: TObject);
begin
NMTime1.Host:='192.168.0.127';
Button1.Caption:=NMTime1.TimeStr;
end;

 

R

ranxg

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-28

• #3

ddxxkk先生:用了您的代码试了4次,不行,两次form1坏掉,两次直接死机.

 

G

gee

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-28

• #4

ip

 

R

research

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-28

• #5

用indy的TIdTimeServer和TIdTimerClient
很简单
在Server程序里只需在FormCreate 中加入
IdTimeServer1.Active := True;

Client程序中只需
ServerTime := IdTime1.DateTime;// ServerTime : TDateTime
IdTime1的Host设置成服务器端的IP地址
获得时间服务器端程序必须运行

 

R

ranxg

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-28

• #6

首先表示感谢!我试多次,甚至是DELPHI6自带的两个例子,都是显示"Host lookup Timed Out".
research先生的建议,好象成了,但仍过了一会提示错误.
另外,主机填什么好,是数字还是字母.

 

活

活化石

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-28

• #7

执行net time //主机名，注意等他的进程结束.在大富翁中查吧一定有
记得有一个函数能用但是FOR NT 的

 

R

research

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-29

• #8

数字，IP地址 例如:
IdTime1.Host := '192.168.0.1'; //Server IP地址
纠正上面一错误客户端控件是TIdTime

 

S

summen

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-29

• #9

adoquery1.sql.add('select getdate() ');
adoquery1.open;

需要是就调用，

 

R

research

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-29

• #10

人家服务器要是没装数据库如何？

 

R

ranxg

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-02-06

• #11

多人接受答案了。