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

При второй вставке динамического объекта ошибка.   Найти похожие ветки 

← →
Aleksandr ©   (2003-11-06 15:30) [0]

В панель вставляю динамический объект:

ProgPanel.DisableAlign;
PL:=TProgressLabel.Create(ProgPanel);
PL.Align:=alBottom;
PL.Parent:=ProgPanel;
PL.Visible:=True;
ProgPanel.EnableAlign;
Result:=PL;
if NOT ProgPanel.Visible then
ProgPanel.Show

затем удаляю его:

ProgPanel.DisableAlign;
Pl.Parent:=nil;
Pl.Free;
ProgPanel.EnableAlign;
if ProgPanel.ControlCount=0 then
ProgPanel.Hide

все в ажуре. Потом пытаюсь создать еще один динамический объект, и на строчке
PL.Parent:=ProgPanel;

появляется ошибка "Недопустимый дескриптор окна".

Чего я тут не так делал?

---

← →
me   (2003-11-06 15:50) [1]

Убрать Pl.Parent:=nil; при удалении динамического объекта

---

← →
Aleksandr ©   (2003-11-06 15:53) [2]

Та же песня. Все равно на второй раз ругается на той же строчке.

---

← →
Aleksandr ©   (2003-11-06 16:00) [3]

Да, кстати, и сама программа потом ругается при закрытии на то же самое.

---

← →
Zelius ©   (2003-11-06 16:59) [4]

Может, когда второй раз присваиваешь, то ProgPanel не имеет хендла, потому что она скрыта? попробуй сначала показать, а потом присвоить.

---

← →
Aleksandr ©   (2003-11-06 17:07) [5]

Спасибо, так и есть.

---

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

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



Память: 0.46 MB
Время: 0.025 c