Wieso läuft Timer weiter wenn MessageDlg gezeigt wird?

**Viktorii**

Hallo.

Ich habe ein wenig herumgespielt und ein Phänomen entdeckt mit dem ich so nicht gerechnet habe. Habe das nochmal in eine kleine Testapplikation zusammengefasst:

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TForm1.ButtonShowMsgClick(Sender: TObject);

begin

  MessageDlg('Dlg', mtWarning, [mbOK], 0);

  Label2.Caption := 'nach Dlg';

end;

procedure TForm1.FormCreate(Sender: TObject);

begin

  Counter := 0;

end;

procedure TForm1.Timer1Timer(Sender: TObject);

begin

    Label1.Caption := IntToStr(Counter);

    inc(Counter);

end;

Wenn ich die Anwendung nun starte, sehe ich das der Timer die Variable Count hochzählt und der Wert im Label1 dargestellt wird. Wenn ich nun meinen Button drücke, erscheint der MessageDlg. Die Caption von Label2 wird nicht geändert, bis ich den MessageDlg mit Ok bestätige. Des MessageDlg wird also modal angezeigt und die Ausführung bleibt da stehen.
Aber trotzdem läuft der Timer weiter während der MessageDlg angezeigt wird. Im Taskmanager wird angezeigt dass die Anwendung nur einen Thread hat.
Wieso ist das so?

Vielen Dank

Wieso läuft Timer weiter wenn MessageDlg gezeigt wird?

Wieso läuft Timer weiter wenn MessageDlg gezeigt wird?

Forumregeln