Frage zu "Application.ProcessMessages"

GuaAck · Verfasst: Mo 22.05.17 21:46

Hallo Experten,

ich möchte mit einem "Start"-Knopf eine laufende Anzeige beginnen und die dann mit einem "Abort"-Knopf wieder anhalten. In der Delphi-Hilfe steht
"Mit der Methode ProcessMessages können Sie die Ausführung einer Anwendung unterbrechen, sodass die Botschaftswarteschlange verarbeitet werden kann."
Aber welche Botschaften (= Messages?) sind das? Im folgenden Code führt ein Drücken des "Abort"-Knopfes jedenfalls nicht dazu, dass BAbortClick ausgeführt wird.

Welche Botschaften werden ausgeführt und was passiert mit den anderen?

(Mit einer Auslagerung der REPEAT...UNTIL-Schleife in einen eigenen Thread ist das Problem behoben.)

Kennt jemand einen gute Quelle, wo ich mal was dazu lesen könnte?

Viele Grüße
GuaAck

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:

  TForm1 = CLASS(TForm)
    BStarte: TButton;
    BAbort: TButton;
    PROCEDURE BStarteClick(Sender: TObject);
    PROCEDURE BAbortClick(Sender: TObject);
  PUBLIC
    abort: Boolean;
  END;

PROCEDURE TForm1.BStarteClick(Sender: TObject);
BEGIN
  abort := false;
  REPEAT
    ....
    Application.ProcessMessages;
  UNTIL abort;
END;

PROCEDURE TForm1.BAbortClick(Sender: TObject);
BEGIN
  abort := true;
END;

Moderiert von Narses: Topic aus Windows API verschoben am Mo 22.05.2017 um 22:24

Narses · Verfasst: Mo 22.05.17 22:31