Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

TaskBar

BaRToV © (2003-05-21 01:45:00)

Не получается скрыть из TaskBar"а.
Под Дэлфи работало, под КОЛ тоже, но меняется форма...

procedure TForm1.KOLForm1FormCreate(Sender: PObj);
var i: LongInt;
begin
i := GetWindowLong(Applet.Handle, GWL_EXSTYLE);
SetWindowLong(Applet.Handle, GWL_EXSTYLE, i or WS_EX_TOOLWINDOW);
end;

Gandalf (2003-05-22 14:30:00) [1]

> Просто втсавьте в обрабочик создании формы:
>
> procedure TForm1.KOLForm1FormCreate(Sender: PObj);
> var i: LongInt;
> begin
> i := GetWindowLong(Applet.Handle, GWL_EXSTYLE);
> SetWindowLong(Applet.Handle, GWL_EXSTYLE, i or WS_EX_TOOLWINDOW);
> end;
>
> Все работает, но исчезают кнопки минимизации окна и "развернуть",
> походу дела становится сталь ДИАЛОГОВОГО окна, как это избежать.

Знаю пробовал, это вроде никак не лечится (ты сам стиль поставил - Tool). Тебе нужно иметь фиктивное первичное окно и его прятать - тогда уйдет кнопка с TaskBar"а, в данном случаи это Applet. БРОСАЙ на форму KOLApplet и пиши Applet.Hide; - все. У меня рабоает.

BaRToV (2003-05-21 15:17:00) [2]

2 All

Просто втсавьте в обрабочик создании формы:

procedure TForm1.KOLForm1FormCreate(Sender: PObj);
var i: LongInt;
begin
i := GetWindowLong(Applet.Handle, GWL_EXSTYLE);
SetWindowLong(Applet.Handle, GWL_EXSTYLE, i or WS_EX_TOOLWINDOW);
end;

Все работает, но исчезают кнопки минимизации окна и "развернуть", походу дела становится сталь ДИАЛОГОВОГО окна, как это избежать.

Gandalf (2003-05-21 14:40:00) [3]

> Ага не так... Чтоб форма в панели задач не отображалась!!!

Значит, я правильно понял... Почитай внимательно. Правда там несильно от совета mdw отличает (чуть подробнее только). Насчет того что не работает, был такой баг (см. там же). Сам не видел, решился сам собой... Может вышлешь нерабочий вариант - посмотрю.

mdw (2003-05-21 14:40:00) [4]

А кинь на мыло я у себя попробую

BaRToV (2003-05-21 14:13:00) [5]

> а Applet.Visible:= False; не работает?

НЭТ!!!

mdw (2003-05-21 13:53:00) [6]

а Applet.Visible:= False; не работает?

BaRToV (2003-05-21 13:50:00) [7]

2 Может дело в windows? У меня 2000.
Так я ж говорю, что в VCL все работает.
На каритнке, моя прога.

mdw (2003-05-21 13:33:00) [8]

Но при этом мне нужно, чтоб форму было видно.

Уменя так и есть, форма видна, а в TaskBar нет. Специально пробовал:
procedure TKOL_Form.Button2Click(Sender: PObj);
begin
Applet.Visible:= not Applet.Visible;
end;
Может дело в windows? У меня 2000.

BaRToV (2003-05-21 13:17:00) [9]

2 mdw ©

Но при этом мне нужно, чтоб форму было видно.

вот здесь пример - InetTime в "панели задач" нету.
http://delphikol.narod.ru/temp/temp.gif

mdw (2003-05-21 12:50:00) [10]

Скрать из TaskBar:
Applet.Visible:= False;

Показать из TaskBar:
Applet.Visible:= True;

BaRToV (2003-05-21 12:13:00) [11]

> Или я не так понял вопрос?
Ага не так... Чтоб форма в панели задачне отображалась!!!

Gandalf (2003-05-21 09:28:00) [12]
Буду краток http://www.delphimaster.ru/cgi-bin/forum.pl?look=1&id=1051802905&n=10

Или я не так понял вопрос?

BaRToV (2003-05-21 03:24:00) [13]

> Есть tKOLApplet, а у него свойство Visible.
;-)
Это когда форму видно, а иконку в TaskBar"е (не путать с systemtray) НЕТ.

mike.dld (2003-05-21 02:12:00) [14]

Есть tKOLApplet, а у него свойство Visible.

Наверх

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