bei GWL_HWNDPARENT wird MessageDlg im falschen Fenster angez

[vsti]

Moin,

sehr schön habe ich hier schon erfahren, dass ich mit

SetWindowLong(Handle, GWL_HWNDPARENT, 0); eine Form als zusätzlichen Eintrag in der Taskleiste anzeigen lassen kann.
Klasse Sache, nur jetzt fällt eines auf, das ich noch gerne behoben haben würde.

Wenn ich jetzt im neuen Formular (das, das zusätzlich in der Taskleiste erscheint) nen MessageDlg ausführe, wir dieser im Haupt-Fenster ausgeführt und das neue Formular ist nicht mehr sichtbar, bis man den MessageDlg wieder schließt...

Wie kann ich dem Formular die Eigenschaft geben, dass alle folgenden Fenster (z.B. MessageDlg, Form3.show...) in diesem Formular ausgeführt werden und nicht im Haupt-Fenster?

[NicoDE]

Zitat von vsti:

Moin,

sehr schön habe ich hier schon erfahren, dass ich mit

SetWindowLong(Handle, GWL_HWNDPARENT, 0); eine Form als zusätzlichen Eintrag in der Taskleiste anzeigen lassen kann.
[...]

Das wird nur zu diversen unerwünschten Nebenwirkungen führen. Das Erzwingen eines Eintrags in der Taskbar wird durch den erweiterten Fensterstil WS_EX_APPWINDOW erreicht. Um das Flag hinzuzufügen sollte man die CreateParams des Fensters überschreiben:

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows, Classes, Controls, Forms;

type
  TForm1 = class(TForm)
  protected
    procedure CreateParams(var Params: TCreateParams); override;
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.CreateParams(var Params: TCreateParams);
begin
  inherited CreateParams(Params);
  // Force a Taskbar entry by adding WS_EX_APPWINDOW to the extended style
  Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW;
end;

end.