Hallo,
das ist mein 1. Beitrag in diesem Forum
Nun zu meiner Frage:
Ich möchte eine Art Doppeltimer realisieren.
D.h. das Programm soll 2 Zeiten entgegennehmen und soll dann einen Timer starten, der bis zur 1. Zeit zählt. Sobald diese erreicht ist, soll ein Sound ausgegeben und der 2. Timer gestartet werden. Ist dieser fertig, so soll ebenfalls ein Sound ausgegeben werden und wieder Timer 1 gestartet werden.
Bisher bin ich erstmal daran überhaupt einen Timer zu programmieren, der Zehntelsekunden, Sekunden und Minuten zählt.
Dazu verwende ich einen Timer mit 100 ms Intervall.
In der OnTimer Prozedur mache ich folgendes:
Delphi-Quellcode:
zehntelsek := zehntelsek + 1;
if(zehntelsek = 10) then
begin
zehntelsek := 0;
sekunden := sekunden + 1;
if(sekunden = 60) then
begin
sekunden := 0;
minuten := minuten + 1;
end;
end;
Form1.LZehntelsek.Caption := inttostr(zehntelsek);
Form1.LSekunden.Caption := inttostr(sekunden);
Form1.LMinuten.Caption := inttostr(minuten);
Ein Test des Codes brachte allerdings ein ernüchterndes Ergebnis.
Eine Minute in realer Zeit entspricht nur 55 Sekunden in meinem Timer.
Woran liegt das?
Und ist das überhaupt der richtige Ansatz für einen Doppeltimer?
Vielen Dank schonmal
TheTommynator