12.12.2013, 21:16
|
|
Прохожий
|
|
Регистрация: 11.12.2013
Сообщения: 22
Версия Delphi: delphi 7
Репутация: 10
|
|
Цитата:
|
Сообщение от poli-smen
Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
IdTime1.Host := 'time.nist.gov';
ShowMessage(DateTimeToStr(IdTime1.DateTime));
end; |
Огромнейшее спасибо!)) |