Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.11.17;
Скачать: [xml.tar.bz2];

Вниз

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

 
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 вся ветка

Форум: "Основная";
Текущий архив: 2003.11.17;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.01 c
8-56772
pavel_k
2003-07-18 22:00
2003.11.17
Media player


1-56737
Aleksandr
2003-11-06 18:12
2003.11.17
Как отскроллировать ListBox в конец его списка


1-56657
maf66
2003-11-05 08:21
2003.11.17
Перегрузка операторов


1-56614
amisare
2003-11-05 19:30
2003.11.17
Снова TFileStream


1-56558
NeonSunlight
2003-11-05 23:26
2003.11.17
Работа с HTML





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский