Hi!
Herzlich Willkommen in der
DP!
Mir ist dein Problem noch nicht ganz klar.
Ich habe es so verstanden, dass der Timer sein "Zeugs" ausführen soll und wenn das ausgeführt ist, dann soll es zählen.
Delphi-Quellcode:
var
Form1: TForm1;
Zaehlen: boolean = false;
i: integer;
implementation
{$R *.dfm}
procedure TForm1.Timer1Timer(Sender: TObject);
begin
if not Zaehlen then
begin
//Zeugs
Zaehlen:=true;
end
else
begin
inc(i);
end;
end;
Falls ich's falsch verstanden habe, dann sorry.