Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by idefix2,
29. Apr 2010
@ Luckie
Die Idee, die (Endlos)Schleife mit einer Variable abzubrechen, die man durch Klick auf einen Button umschalten kann, ist schon gut, aber erraten konnte man diese Absicht aus Deinem geposteten Code nur schwer. Und der erste Befehl, finish := not finish, bleibt für mich auch in dem Kontext unverständlich, weil es ja vom restlichen Programm abhängt, welchen Wert die Variable finish...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by idefix2,
29. Apr 2010
@ Hathor
Auch ohne den Code zu testen - Dein erster Blick trügt Dich. Eine statische Untersuchung des Programmcodes ist in dem Fall absolut trivial:
In der while Schleife wird bei jedem Durchgang eine 10ms lange Pause eingelegt, in der die CPU nichts tut und der Programmthread still liegt. Wenn etwas deine CPU aufheizt, dann ist es sicher nicht diese Schleife.
Ich gehöre nicht auch zu den...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by idefix2,
29. Apr 2010
@Michael
finish := not finish;
while not finish do
begin
// Dein Code
end;
Wenn man schon ein überflüssiges goto wegposten will (in diesem Fall sogar berechtigter Weise), dann doch bitte mit Code, der erstens funktioniert und zweitens nicht unnötig kompliziert ist: