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

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

Кнопка программы на 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.


Наверх

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