TTimer

sebastian2549

Hallo,

benutze den Borland Builder und die TTimer Komponente.
Ich möchte gerne die restliche Zeit des Timers in einem Label anzeigen lassen (Countdown).

jmd ne idee ?

myerscola

versuche doch einen 2. timer mit kleineren Steps laufen zu lassen,
sowas in der Art (ungetestet):

void __fastcall TForm1::Button1Click(TObject *Sender)
{
Timer1->Interval=10000;
Timer2->Interval=100;
Timer1->Enabled=true;
Timer2->Enabled=true;
count = 0;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Timer2Timer(TObject *Sender)
{
Edit1->Text = 100 - count++;
Application->ProcessMessages();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
Timer2->Enabled=false;
Timer1->Enabled=false;
}

count unter private im Header nicht vergessen,

Gruß myerscola

akari

Hallo

Oder den eigentlichen Timer in das gewünschte Mindestintervall einstellen und einen Zähler bei jedem Aufruf mitlaufen lassen. Erst beim letzten Aufruf dann die eigentliche Funktion ausführen.

bis bald
akari