![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Кнопка программы на KOL в панели задач
Olgerd © (2003-05-01 19:28:00)
Люди, подскажите как показать/убрать сабж? Задолбался уже, ничего не получается.
Olgerd (2003-05-03 17:05:00) [1]
Какие-то глюки, наверное, у меня в проекте, создал новый проект - там все отлично работает, как ты и говорил, тогда взял в своём старом проекте удалил Applet и и заново на форму его кинул - всё заработало. Так и не понял в чём там дело было. Но всё равно огромное спасибо за помощь.
Gandalf (2003-05-03 16:19:00) [2]
Ммм... странно, не вышлешь глючный проект.
Olgerd (2003-05-03 16:07:00) [3]
Может я что-то не так понял, но когда я просто бросил Applet на форму, как ты говорил, то у меня при Applet.Visible равным false исчезала и вся форма, когда же я сделал главной пустую форму, то всё нормально - при изменении VApplet.isible кнопочка в панели задач, то появлялась, то исчезала, а вторая форма, которая являлась действительно главной нормально висела.
Gandalf (2003-05-03 13:17:00) [4]
> А что с этой формой на которой Applet лежит, у неё что ли
> Width и Height по нулям поставить, мне ведь не нужно, чтобы
> она отображалась. Некрасиво как-то получается
Судя по реплике ты даже и не пробовал... САМ Appletкоторый ты бросил и будет той самой формой(в понимании Win) которую ты будешь скрывать, чтобы пропадала кнопка из TaskBar"а (Applet.Visible:=not Applet.Visible;). А форма на которой лежит Appletэта твоя рабочая форма. Она у тебя видимая, бросай компоненты пиши код, радуйся жизни.
Olgerd (2003-05-03 13:12:00) [5]
А что с этой формой на которой Applet лежит, у неё что ли Width и Height по нулям поставить, мне ведь не нужно, чтобы она отображалась. Некрасиво как-то получается
Gandalf (2003-05-03 11:30:00) [6]
Так я и говорю бросай Applet"а на форму! У меня работает.
Olgerd (2003-05-03 01:43:00) [7]
Так что, получается без второй формы не обойтись? Мне надо создать главную пустую форму, туда перенести TKOlProject, а главную сделать второй. A нельзя как-нибудь c помощью SetParent менять владельца, взять ей окно Эксплорера владельцем поставить что ли.
Gandalf (2003-05-02 15:07:00) [8]
> Тут прога появляется без кнопки в панели задач, а как теперь
> создать для неё кнопку на панели задач, надо вроде Style
> или ExStyle поменять, но подскажите каким образом?
Дело обстоит так, Вин делает кнопку для ВСЕХокон не имеющий владельца. Исключяение- ExStyle:=WS_EX_TOOLWINDOW; Как выход создание "фальш-окна", и его сделать хозяином проги, а потом уже прятать это фальш окно, с этим окном уберется и "кнопка". Реализация - бросаем на форму Applet. И пишем код:
Applet.Visible:=not Applet.Visible;
По его исполнению кнопка будет появлятся исчезать.
Olgerd (2003-05-02 13:06:00) [9]
Тут прога появляется без кнопки в панели задач, а как теперь создать для неё кнопку на панели задач, надо вроде Style или ExStyle поменять, но подскажите каким образом?
Gandalf (2003-05-01 19:44:00) [10]
Хотя бы так:
program RegTest;
uses
Windows,
Kol;
var
Window: PControl;
begin
Applet:=NewApplet("Demo App");
Window:=NewForm(Applet, "Demo Form").SetSize(400, 240).CenterOnParent;
Window.Style:=WS_BORDER or WS_CAPTION or WS_SYSMENU ;
Window.ExStyle:=WS_EX_DLGMODALFRAME;
Window.Icon :=LoadIcon(0, IDI_WARNING);
Applet.Visible:=False;
Run(Applet);
end.