Como puxar data/hora de um servidor.

Delphi

20/10/2003

assim, estou fazendo um sistema de comunicação com socket(ClientSocket & ServerSocket[Internet]) e gostaria de saber como faço(ou se possivel) puxa a data e hora do servidor(o qual esta rodando o ServerSocket) para o programa cliente(ClientSocket) para aparecer em um label.

Alguem tem ideia de como faço isso?

Agradeço desde já.

oTTo Husckows :shock:


Otto

Otto

Curtidas 0

Respostas

Rafael Roni

Rafael Roni

20/10/2003

Pegue a data atraves das propriedades dos arquivos system.dat ou win.ini nao tenho como testar mas deve ser algo parecido

var
DataArq: TDateFile;
begin
DataArq:= FileDateToDateTime(FileAge(´\\servidor\c:\windows\win.ini´));
label1.caption:=DateToStr(DataArq);
end


GOSTEI 0
Otto

Otto

20/10/2003

flw mano, valeu pela atenção..

eu fiz de outro modo aqui.


GOSTEI 0
POSTAR