Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.09.23;
Скачать: CL | DM;

Вниз

Как поместить НЕ ГЛАВНЫЕ окна программы в панель задач?   Найти похожие ветки 

 
Martin ©   (2002-09-12 17:50) [0]

Не так давно был такой вопрос. Меня же интересует что то подобное, с той разницей только, что бы они не сворачивались при сворачивании главного окна. (примером может служить например окна бесед в ICQ).

Помогите кто знает.. плз...


 
Ученик ©   (2002-09-12 19:01) [1]

Для главного окна

procedure WMSysCommand(var Message : TWMSysCommand); message WM_SYSCOMMAND;

procedure TForm1.WMSysCommand(var Message : TWMSysCommand);
begin
if Message.CmdType = SC_MINIMIZE then
ShowWindow(Handle, SW_MINIMIZE)
else
inherited
end;


 
Song ©   (2002-09-12 19:03) [2]

Установить его Parent на desktop.


 
Ученик ©   (2002-09-12 19:11) [3]

>Song © (12.09.02 19:03)

Это не поможет

procedure TCustomForm.WMSysCommand(var Message: TWMSysCommand);
begin
with Message do
begin
if (CmdType and $FFF0 = SC_MINIMIZE) and (Application.MainForm = Self) then
Application.WndProc(TMessage(Message))


 
Martin ©   (2002-09-12 19:42) [4]

2Ученик:

Спасиб большой...
Из двух примеров собрал именно то что хотел.... ))



Страницы: 1 вся ветка

Текущий архив: 2002.09.23;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.025 c
1-73717
race1
2002-09-10 15:22
2002.09.23
treeview


1-73646
Демонов Е.В.
2002-09-10 16:29
2002.09.23
А что если метод в секцию Published ?


1-73625
#Deus
2002-09-11 20:33
2002.09.23
Delphi 7


14-73825
Ketmar
2002-08-26 15:01
2002.09.23
господа, что делать, если ничего делать не хочется? :-))


1-73639
First_May
2002-09-12 09:14
2002.09.23
Вид форм...