Как сделать, чтобы неглавная форма минимизировалась не на TaskBar, а выше него

Материал из DRKB

Как сделать, чтобы неглавная форма минимизировалась не на TaskBar, а выше него[править | править код]

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

procedure TForm1.CreateParams(var Params: TCreateParams);
begin
  inherited;
  Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW;
  Params.WndParent := GetDesktopWindow();
end;


Source: http://delphiworld.narod.ru/
ID: 01789