AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Countdown

Ein Thema von XXcD · begonnen am 25. Sep 2006 · letzter Beitrag vom 25. Sep 2006
Antwort Antwort
HuxXx
(Gast)

n/a Beiträge
 
#1

Re: Countdown

  Alt 25. Sep 2006, 14:17
So ungefaehr...:
(Das is eigentlich das gleiche was der ueber mir beschrieben hat... )

Delphi-Quellcode:
var zaehler: Integer = 1920; // Globale Variable

implementation

{$R *.dfm}

procedure TForm1.Timer1Timer(Sender: TObject); // Interval = 1000
begin
zaehler:= zaehler - 1;

// Wenn der Countdown vorbei ist...
if zaehler <= 0 then begin
Timer1.Enabled:=false;
ShowMessage('Diese 32 Minuten sind um... MöpMöp...');
end;

end;
P.S:


Zitat von EDatabaseError:
[denkanstoß]Man nehme einen Timer stellt den intervall auf 1000. Man nehme eine globale variable mit dem wert 1920000. In jedem on timer ereignis ziehst du eins von der variable ab. Bei 0 stoppst du den timer durch disablen. fertig[/denkanstoß]

mfg

Wenn du eine Globale Variable mit dem Wert 1920000 nimmst, dann musst du auch jedes mal 1000 abziehen.
Wenn du nur 1 abziehst, waeren das dann 32000 Minuten...

Greetz by Hux...
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 00:28 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz