Советы по Delphi

         

Форма Delphi на панели задач


Вот что вы можете сделать, чтобы заставить форму Delphi иметь кнопку на панели задач:

    type TForm2 = class(TForm) private { Private declarations } procedure CreateParams(VAR Params: TCreateParams); override; ... procedure TForm2.CreateParams(VAR Params: TCreateParams); begin Inherited CreateParams(Params); WITH Params DO ExStyle := ExStyle OR WS_EX_APPWINDOW; end;

- Neil Rubenking

Nomadic дополняет:

Обратите внимание, что мы делаем override. Вы можете написать просто Inherited, без указания имени метода (если оно совпадает с именем данного) и аргуметов (в таком случае передаются в качестве аргументов исходные). Часто возникает противоположная по смыслу задача - убрать окна с панели задач (в случае, если они создаются в DLL). В таком случае используйте стиль WS_Ex_ToolWindow. [000972]



Содержание раздела