[poli-smen]

Сообщение от Thundefined

какую команду посылать на NTP сервер, чтобы он вернул в качестве строки дату текущую?
Реализовать с помощью Indy хочу, вроде компоненту IdTime юзать надо
Простите, быть может, за глупые вопросы, но читая IndyInDepth пока нужного решения не нашёл (:
Непонятно конкретно какую команду посылать на сервер, и каким образом эту дату принимать.

Код:

procedure TForm1.Button1Click(Sender: TObject);
begin
  IdTime1.Host := 'time.nist.gov';
  ShowMessage(DateTimeToStr(IdTime1.DateTime));
end;