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
 
EDatabaseError

Registriert seit: 11. Mai 2005
Ort: Göppingen
1.238 Beiträge
 
Delphi 2007 Professional
 
#4

Re: Countdown

  Alt 25. Sep 2006, 14:20
Zitat von HuxXx:
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;
ich will dích jetzt nich irgentwie korrigieren oder so aber wenn du 1920 als zähler hast machts schon nach 32 SEKUNDEN peng.

Mfg


Zu PS:
Interval 1 bei einem Timer ist jede MILIsekunde
Interval 1000 = jede Sekunde

32 Minuten = 1920 Sekunden = 1920000 MS
Tobias
It's not a bug, it's a feature.
  Mit Zitat antworten Zitat
 


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 22:58 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