Einzelnen Beitrag anzeigen

Lefko

Registriert seit: 31. Jul 2003
359 Beiträge
 
Delphi 6 Enterprise
 
#9

Re: Uhrzeit unabhängig von Systemzeit laufen lassen

  Alt 4. Mär 2004, 21:25
ca. so:

Delphi-Quellcode:
procedure timer1.ontimer(self); //intervall = 1000 ms
var Systemzeit, InetZeit, Differenz : TTime;
begin
Internetzeit := Zeit_aus_Internet;
Differenz := Systemzeit - Internetzeit;
Label1.caption := TimeToStr(Systemzeit - Differenz);
end
(echtzeit-geproggt, kein gewehr )

MfG Lefko

//Edith: ok, gleich drei lösungen.....
Johannes
-=[Nennst du meinen Namen, bin ich schon nicht mehr da]=-
  Mit Zitat antworten Zitat