Скачать: CL | DM;

Кнопка программы на KOL в панели задач   Найти похожие ветки 

← →
Olgerd ©   (2003-05-01 19:28) [0]

Люди, подскажите как показать/убрать сабж? Задолбался уже, ничего не получается.

---

← →
Gandalf ©   (2003-05-01 19:44) [1]

Хотя бы так:

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.

---

← →
Olgerd ©   (2003-05-02 13:06) [2]

Тут прога появляется без кнопки в панели задач, а как теперь создать для неё кнопку на панели задач, надо вроде Style или ExStyle поменять, но подскажите каким образом?

---

← →
Gandalf ©   (2003-05-02 15:07) [3]

> Тут прога появляется без кнопки в панели задач, а как теперь
> создать для неё кнопку на панели задач, надо вроде Style
> или ExStyle поменять, но подскажите каким образом?


Дело обстоит так, Вин делает кнопку для ВСЕХ окон не имеющий владельца. Исключяение - ExStyle:=WS_EX_TOOLWINDOW; Как выход создание "фальш-окна", и его сделать хозяином проги, а потом уже прятать это фальш окно, с этим окном уберется и "кнопка". Реализация - бросаем на форму Applet. И пишем код:

Applet.Visible:=not Applet.Visible;

По его исполнению кнопка будет появлятся исчезать.

---

← →
Olgerd ©   (2003-05-03 01:43) [4]

Так что, получается без второй формы не обойтись? Мне надо создать главную пустую форму, туда перенести TKOlProject, а главную сделать второй. A нельзя как-нибудь c помощью SetParent менять владельца, взять ей окно Эксплорера владельцем поставить что ли.

---

← →
Gandalf ©   (2003-05-03 11:30) [5]

Так я и говорю бросай Applet"а на форму! У меня работает.

---

← →
Olgerd ©   (2003-05-03 13:12) [6]

А что с этой формой на которой Applet лежит, у неё что ли Width и Height по нулям поставить, мне ведь не нужно, чтобы она отображалась. Некрасиво как-то получается

---

← →
Gandalf ©   (2003-05-03 13:17) [7]

> А что с этой формой на которой Applet лежит, у неё что ли
> Width и Height по нулям поставить, мне ведь не нужно, чтобы
> она отображалась. Некрасиво как-то получается


Судя по реплике ты даже и не пробовал... САМ Applet который ты бросил и будет той самой формой (в понимании Win) которую ты будешь скрывать, чтобы пропадала кнопка из TaskBar"а (Applet.Visible:=not Applet.Visible;). А форма на которой лежит Applet эта твоя рабочая форма. Она у тебя видимая, бросай компоненты пиши код, радуйся жизни.

---

← →
Olgerd ©   (2003-05-03 16:07) [8]

Может я что-то не так понял, но когда я просто бросил Applet на форму, как ты говорил, то у меня при Applet.Visible равным false исчезала и вся форма, когда же я сделал главной пустую форму, то всё нормально - при изменении VApplet.isible кнопочка в панели задач, то появлялась, то исчезала, а вторая форма, которая являлась действительно главной нормально висела.

---

← →
Gandalf ©   (2003-05-03 16:19) [9]

Ммм... странно, не вышлешь глючный проект.

---

← →
Olgerd ©   (2003-05-03 17:05) [10]

Какие-то глюки, наверное, у меня в проекте, создал новый проект - там все отлично работает, как ты и говорил, тогда взял в своём старом проекте удалил Applet и и заново на форму его кинул - всё заработало. Так и не понял в чём там дело было. Но всё равно огромное спасибо за помощь.

---

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

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.031 c