Einzelnen Beitrag anzeigen

Benutzerbild von nailor
nailor

Registriert seit: 12. Dez 2002
Ort: Karlsruhe
1.989 Beiträge
 
#1

procedure von außerhalb abbrechen

  Alt 4. Sep 2003, 18:38
Stellt euch mal vor, ich hätte ein Programm, das macht:

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var i: byte;
begin
while true do
  begin
    inc(i);
    caption := inttostr(i);
  end;
end;
in echt macht es natürlich was Sinnvolleres, aber ich habe mir erlaubt, die Sache hierrauf zu vereinfachen...

Was ich jetzt will ist im Grunde ein Button,
- auf den ich klicken kann, während mein Programm zählt
- wäre notfalls möglich mit ProcessMessages, aber das scheint mir die Sache sehr langsam zu machen
- der dafür sorgt, dass das mein Programm aufhört zu zählen

damit wäre ich für den Anfang (hoch) zufrieden.

Michael
Michael N.
http://nailor.devzero.de/code/sharpmath/testing/ --- Tests, Feedback, Anregungen, ... aller Art sehr willkommen!
::: don't try so hard - it'll happen for a reason :::
  Mit Zitat antworten Zitat