Öhm.. du meinst sicher
if JvXPProgressBar1.Position <= 100 then
nicht
if JvXPProgressBar1.Position => 100 then
oder?
Klappt leider auch nicht. Ich hab es mal so versuch:
Delphi-Quellcode:
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
// nix
end;
Das geht soweit. Nur bekomme ich die Meldung, dass in diesr Zeile (JvXPProgressBar1.Position := 0
"" kein gültiger Integerwert wäre.