Текущий архив: 2007.04.29;
Скачать: CL | DM;
Вниз
Кому не жалко - поделитесь кодом Найти похожие ветки
← →
Ал (2006-08-30 12:00) [0]Уважаемые знатоки!
Вот возникла необходимость сделать синхронизацию с сервером точного времени. KOLIndy почил в бозе. Рекомедуют Synapse.
Если кто делал такое на KOL, поделитесь кодом. Буду признателен.
С уважением.
← →
Сергей Близнюков (2006-08-31 08:53) [1]пример \synapse\source\demo\sntp\
var
sntp:TSntpSend;
begin
sntp:=TSntpSend.Create;
try
sntp.TargetHost:=Edit1.Text;
if sntp.GetSNTP
then label2.Caption:=Datetimetostr(sntp.NTPTime)+" UTC"
else label2.Caption:="Not contacted!";
finally
sntp.Free;
end;
Страницы: 1 вся ветка
Текущий архив: 2007.04.29;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.034 c
