Silvester Countdown

Thema durchsuchen

Ansicht

Themen-Optionen

Ein Thema von netscanner · begonnen am 29. Dez 2005 · letzter Beitrag vom 31. Dez 2005

Vorheriger Beitrag

Nächster Beitrag

gfjs

Registriert seit: 8. Dez 2005
Ort: Hohenkammer
298 Beiträge

Delphi 2006 Professional

#13

Re: Silvester Countdown

30. Dez 2005, 04:34

Guten Morgen, allerseits.

Ich bin noch Anfänger und sitze momentan im Büro, wo ich kein Delphi installiert habe. Deshalb kann ich meinen Lösungsvorschlag nicht ausprobieren. Ich könnte mir aber folgende Lösung vorstellen:

Zielzeitpunkt ist 1.1.2006, also Neujahr := EnCodeDateTime(2006,1,1,0,0,0,0);
Mit "Now" erhalte ich die momentane Zeit, z.B. 31.12.2005 - 18:00:00
CountDown := Neujahr - Now sollte dann die Zeit bis Neujahr ergeben und Panel1.Caption := DecodeTime(CountDown) die Zeit bis zum Jahreswechsel anzeigen.

Ich hoffe, das funktioniert so.

mfg gfjs

Mein neues Motto (von "Unbekannt"):
Gewinnen: Wenn Du kannst - Verlieren: Wenn Du musst - Aufgeben: NIE!