Timerproblem (Splitfile)

[Tommy1988]

"=>"

Das gibt es so Meiner Meinung nach nicht. Der Compiler meckert auch

Hier nochmal alles, so wie ich es momentan probiere:

Delphi-Quellcode:

procedure TForm1.Timer2Timer(Sender: TObject);
begin
if JvXPProgressBar1.Position >= 100 then
begin
 Timer2.Interval := 3500; // habs hier manuell nur auf 3500 gesetzt weil sonst bekomme ich hunderte Fehlerfenster im Millisekundenabstand
 Split(ExePfad+'Project1.exe', InstallVerz+'\Test.exe'); // Test aus Project1.exe extrahieren
 JvXPProgressBar1.Position := 0;
 Timer3.Enabled := True;
 Timer2.Enabled := False; // dann timer AUSMACHEN, was aber NICHT passiert! **
end else
 begin
  Label4.Caption := 'Aktuelle Datei: Test.exe';
  JvXPProgressBar1.Position :=
  JvXPProgressBar1.Position + 5;
  InstallStatusGesamt := JvXPProgressBar2.Position;
  Label25.Caption := Format('Verarbeitung Gesamt: %d%%',
  [InstallStatusGesamt]);
  JvXPProgressBar2.Position :=
  JvXPProgressBar2.Position + 4;
 end;
end;

Ich verstehe das einfach nicht. Normal MÜSSTE (!!!) doch der Timer3 angehen, und Timer2 aus?