Форум: "Основная";
Текущий архив: 2005.10.30;
Скачать: [xml.tar.bz2];
ВнизКак получить время с сервера? Найти похожие ветки
← →
Иванов__ (2005-10-05 12:07) [0]Какие нужны компоненты и если можно примерчик. Заранее спасибо.
← →
clickmaker © (2005-10-05 12:43) [1]с какого сервера?
← →
Иванов__ (2005-10-05 13:17) [2]Есть комп. с Win2000 на котором есть стандартный сервер времени на 37 порте. Нужно с него получить время.
← →
clickmaker © (2005-10-05 14:10) [3]http://msdn.microsoft.com/library/default.asp?url=/library/en-us/randz/protocol/client_sntp_request.asp
Есть ли готовые функции или компоненты - не уверен. Поищи по ключевым словам NTP, server time
← →
Leonid Troyanovsky © (2005-10-05 14:18) [4]
> Иванов__ (05.10.05 12:07)
> Какие нужны компоненты и если можно примерчик. Заранее спасибо.
>
http://groups.google.com/group/fido7.ru.delphi/msg/c7d4f67c8d1d3ce1
--
Regards, LVT.
← →
Alexander Panov © (2005-10-05 14:23) [5]
program SetTime;
uses
Windows, SysUtils, IdTime;
var
CurrTime: TDateTime;
st: TSystemTime;
YY,MM,DD,HH,NN,SS,MS: Word;
begin
try
with tIdTime.Create(nil) do
begin
// Host := "ntps1-0.uni-erlangen.de";
Host := "192.168.0.1";
try
CurrTime := DateTime;
except
end;
Free;
end;
except
Exit;
end;
GetLocalTime(st);
DecodeDate(CurrTime,YY,MM,DD);
DecodeTime(CurrTime,HH,NN,SS,MS);
st.wYear := YY;
st.wMonth := MM;
st.wDay := DD;
st.wHour := HH;
st.wMinute := NN;
st.wSecond := SS;
st.wMilliseconds := MS;
SetLocalTime(st);
end.
← →
Иванов__ (2005-10-05 15:08) [6]Ошибка "Сокет еррор". Че деять?
← →
DiamondShark © (2005-10-05 15:23) [7]
> Ошибка "Сокет еррор". Че деять?
Как минимум, сообщить код ошибки.
← →
Иванов__ (2005-10-05 16:44) [8]Код 11004
← →
Leonid Troyanovsky © (2005-10-05 17:21) [9]
> Иванов__ (05.10.05 16:44) [8]
> Код 11004
Скорее всего, оный хост выключен, или, просто, неправильно обозван.
--
Regards, LVT.
← →
Leonid Troyanovsky © (2005-10-05 17:42) [10]
> Иванов__ (05.10.05 13:17) [2]
> Есть комп. с Win2000 на котором есть стандартный сервер
> времени на 37 порте.
А что есть "стандартный сервер времени" для Win2K?
И, чего, он, в самом деле, на 37 порту?
--
Regards, LVT.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2005.10.30;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.069 c