BorderStyle bsNone + fehlendes Kontextmenu in der Taskleiste

[semo]

ich habe es wie folgt gelöst: einfach im CreateParams entsprechende Parameter setzen.
dann klappts auch mit dem kontextmenu

Delphi-Quellcode:

procedure TMyForm.CreateParams(var Params: TCreateParams);
begin
  inherited CreateParams(Params);

  Params.Style := Params.Style or WS_SYSMENU or WS_MINIMIZEBOX;
end;