Ich würde es mit einer zusätzlichen Variable lösen. Eine globale Variable erstellen und im OnCreate auf 0 an der Stelle, an der das Programm erst bei Buttonklick weiterarbeiten soll, die Variable(am besten vom typ integer) auf 1 setzen. Dann den Hauptteil des Programms(das normale arbeiten) in eine if-Abfrage verpacken. Also etwa so:
Delphi-Quellcode:
procedure...
if Variable = 0 then
begin
//was in deinem Programm passieren soll
end else // also, sobald Variable den Wert 1 hat
begin
//hier einen Befehl eingeben, um das Programm anzuhalten
end;
procedure Button1Click(Sender: TObject)'
begin
if variable = 1 then
variable := 0;
end;
So in etwa... um das Programm zu stoppen, musst du dir einen Befehl überlegen, den ich dir jetzt jedoch nicht vorgeben kann, weil ich ja nicht weiß, was dein programm so machen soll
ich hoffe, ich konnte helfen!
mfg
malo
edit: hab die sache mit der if-Schleife geändert
