Советы по Delphi
Форма Delphi на панели задач
Вот что вы можете сделать, чтобы заставить форму Delphi иметь кнопку на панели задач:
| typeTForm2 = class(TForm)private{ Private declarations }procedure CreateParams(VAR Params: TCreateParams);override;...procedure TForm2.CreateParams(VAR Params: TCreateParams);beginInherited CreateParams(Params);WITH Params DOExStyle := ExStyle OR WS_EX_APPWINDOW;end; |
- Neil Rubenking
дополняет:
Обратите внимание, что мы делаем override. Вы можете написать просто Inherited, без указания имени метода (если оно совпадает с именем данного) и аргуметов (в таком случае передаются в качестве аргументов исходные). Часто возникает противоположная по смыслу задача - убрать окна с панели задач (в случае, если они создаются в DLL). В таком случае используйте стиль WS_Ex_ToolWindow. [000972]
