Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Форма как отдельный процесс


Z ©   (2003-09-24 11:30:00) 

Я програмно создаю форму несколько раз. Как сделать так, чтобы заголовок созданной формы появлялся на панели задач?


VMcL   (2003-09-24 15:19:00) [1]

2 >willys © (24.09.03 11:46) [2]
Логичней через procedure CreateParams(var Params: TCreateParams); override;(protected)

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


willys   (2003-09-24 11:46:00) [2]


procedure Form1.FormCreate(Sender: TObject);
var
ExSt: Cardinal;
begin
ExSt := GetWindowLong(Handle, GWL_EXSTYLE);
ExSt := ExSt or WS_EX_APPWINDOW;
SetWindowLong(Handle, GWL_EXSTYLE, ExSt);
end;


Игорь Шевченко   (2003-09-24 11:43:00) [3]

WS_EX_APPWINDOW


Наверх

Титульная страница Поиск, карта сайта Написать письмо