Schleifenabbruch durch Esc Taste...

[Codix32]

Zitat von BUG:

Zitat von Blup:

Schon mal überlegt, was alles passiert, wenn die Caption eines Formulars geändert wird?

Stimmt, vermutlich wird da jedes mal eine Nachricht gesendet
Das könnte schon ein bisschen Ärger machen.

Zitat von Codix32:

Im Ressourcen Monitor werden gleich 8 Kerne angezeigt, obwohl die CPU bloß 4 Kerne hat ?!?

Wahrscheinlich Hyperthreading: Jeder echte Kern stellt 2 Hardware-Threads bereit. Die werden nicht echt gleichzeitig ausgeführt, können aber Wartezeiten im Prozessor überbrücken.

Wie kann ich das prüfen, ob es das Form1.caption ist?
Wenn ich das Caption auskommentiere läuft die Schleife zu schnell ab. Vielleicht eine zweite Schleife rein? Mal sehen.

[BUG]

Zitat von Codix32:

Vielleicht eine zweite Schleife rein? Mal sehen.

Entweder das, oder:

Zitat von Dalai:

Warum überhaupt eine for-Schleife mit einem hohen Zahlenwert als Abbruchbedingung statt einer while- oder repeat-until-Schleife?

[Codix32]

Zitat von BUG:

Zitat von Codix32:

Vielleicht eine zweite Schleife rein? Mal sehen.

Entweder das, oder:

Zitat von Dalai:

Warum überhaupt eine for-Schleife mit einem hohen Zahlenwert als Abbruchbedingung statt einer while- oder repeat-until-Schleife?

Du meinst eine Endlossschleife? Ja, das stimmt eigentlich. Ok

[Codix32]

Zitat von Codix32:

Zitat von BUG:

Zitat von Codix32:

Vielleicht eine zweite Schleife rein? Mal sehen.

Entweder das, oder:

Zitat von Dalai:

Warum überhaupt eine for-Schleife mit einem hohen Zahlenwert als Abbruchbedingung statt einer while- oder repeat-until-Schleife?

Du meinst eine Endlossschleife? Ja, das stimmt eigentlich. Ok

Dalai, danke,

Wenn ich das Caption rauslasse kann ich ESC drücken und das Form sofort schließen.

Delphi-Quellcode:

procedure TForm1.EndlossSchleife;
 var
 i:integer;
begin
 ResetEscPressed;
 while i <= 100000000 do
  begin
       Application.ProcessMessages;
       if EscPressed('Schleife abbrechen ?') then break;
  end;
      Label1.Caption:= 'stop';
end;

Wenn ich jetzt ein 'Caption:=inttostr(i);' einfüge, kann ich auch das Form sofort schliesen.
Erst wenn ich jetzt ein 'inc(i)' reintue, habe ich wieder das Problem

[BUG]

Zitat von Codix32:

Wenn ich jetzt ein 'Caption:=inttostr(i);' einfüge, kann ich auch das Form sofort schliesen.
Erst wenn ich jetzt ein 'inc(i)' reintue, habe ich wieder das Problem

Ich vermute mal, das da auf Gleichheit geprüft wird, bevor irgendetwas bewegendes passiert. Müsste man wohl in die Sourcen gucken.

Allerdings hat Himitsu schon recht: richtig bringt es nichts, dem jetzt nachzuspüren ... hast du denn noch Problem mit dem Code in deiner Anwendung?

[Codix32]

[QUOTE=BUG;1279134]

Zitat von Codix32:

...
Allerdings hat Himitsu schon recht: richtig bringt es nichts, dem jetzt nachzuspüren ... hast du denn noch Problem mit dem Code in deiner Anwendung?

Nö, BUG,

es ist wirklich so, dass ich in dieser Anwendung nur diese Schleife laufen ließ, um den Tatenabbruch zu testen, es ist da sonst nichts.

Ich wollte jetzt auch nicht unbedingt eine Lawine lostreten. Es genügt mir, dass ich mit 'Sleep' ein Aufhängen des Rechners verhindern kann.
Natürlich mache ich mir schon Gedanken, dass eine 'GetAsyncKeyState' einen solchen programmübergreifenden Hänger verursachen kann. Sehe gerade, dass die Funktion der WinApi angehört, also keine, nur Delphi interne Funktion ist.
Andererseits habe ich auch schon an Net Framework 1.1 gedacht, das installiert sein muss, um Delphi 2005 überhaupt installieren zu können.