Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.44 MB
Время: 0.03 c