Einzelnen Beitrag anzeigen

Benutzerbild von fylo
fylo

Registriert seit: 18. Feb 2004
Ort: Rostock
155 Beiträge
 
Delphi 7 Personal
 
#3

Re: Tisy Online-Zeitermittlung

  Alt 25. Jul 2005, 09:50
Hi

Also ich bekomm einen Fehler: nach dem Start sehe ich gar nix, auch keine Systrayicon und dann kommt eine Meldung: "Socket Error #10060 Connection timed out."

hast schon mal bei den indy's unter TIdSNTP-Client nachgesehen. Solch ein Client synchronisiert die Uhrzeit automatisch und berücksichtigt dabei neben den Pingzeiten auch die Delayzeiten und sonstige Differenzen.
Delphi-Quellcode:
SNTP.Host:='de.pool.ntp.org';
SNTP.Active:=true;
Edit1.Text:=datetostr(SNTP.DateTime);
Edit2.Text:=timetostr(SNTP.DateTime);
Edit3.Text:=timetostr(SNTP.AdjustmentTime);
SNTP.SyncTime;
SNTP.Active:=false;
have fun
fylo
  Mit Zitat antworten Zitat