Mega Code Archive

 

Categories / Delphi / Forms

 

How to create a tool windows

Title: How to create a tool windows Question: Two lines of how to create a tool-windows. Answer: type TForm1 = class(TForm) private procedure CreateParams(var Params: TCreateParams ); override; public end; ... procedure TForm1.CreateParams(var Params: TCreateParams ); begin inherited; Params.Style := Params.Style or WS_OVERLAPPED; Params.WndParent := Form1.Handle; end;