Label1 + Timer
-
Hi
Ich habe folgendes Problem, und zwar möchte ich das Label1 5 Minuten herunter zählt zbs. so 5:00, 4:59, 4:58 über Timer1 weiss jemand vieleicht wie ich das hinbekommen könnte, wäre echt net wenn mir jemand helfen kann
danke schonmal im vorraus
mfg christian
-
#include <vcl.h> #pragma hdrstop #include "Unit1.h" #include "DateUtils.hpp" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; TDateTime zeit; __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { } void __fastcall TForm1::Button1Click(TObject *Sender) { Timer1->Interval = 1000; Timer1->Enabled = true; } void __fastcall TForm1::FormCreate(TObject *Sender) { zeit=StrToTime("00:05:00"); } void __fastcall TForm1::Timer1Timer(TObject *Sender) { TDateTime val=StrToTime("00:00:00"); if(zeit>=val) { Label1->Caption = zeit.TimeString().SubString(4,5); Label1->Refresh(); zeit=IncSecond(zeit,-1); } else { Label1->Caption ="Boooommm"; Timer1->Enabled = false; } }