» Delphi » Display Forms in Separate Taskbars



Display Forms in Separate Taskbars

To display each form in separate taskbar, you must override the CreateParams method in each form. You see, visual inheritance is a good practice here :-)

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    procedure CreateParams(var Params: TCreateParams); override;
  end;

var
  Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.CreateParams(var Params: TCreateParams);
begin
  inherited CreateParams( Params );
  Params.WndParent := 0;
end;

end.