Вниз
Скачать: CL | DM;

Создание ComboBox а для компонента   Найти похожие ветки 

← →
AZ ©   (2004-11-02 17:18) [0]

Прошу прощения за детский вопрос, просто с этим никогда не сталкивался.

...
 cbSelector:=TComboBox.Create(Self);
 cbSelector.Parent:=Self;
// Тут координаты cbSelector"a
 cbSelector.Items.Add(S); //В этом месте возникает сбой
-------------------^^^


Сообщение - "компонент не имеет родителя (parent)".
Insert дает тот же результат.
Закомментировав строку, получаю комбобокс без Items"ов, что естественно.
Но это также и показывает, что предыдущий код работает.


← →
MBo ©   (2004-11-02 17:24) [1]

Перенеси этот код в перекрытый метод CreateWnd


← →
AZ ©   (2004-11-02 17:28) [2]

"Он любил выражаться коротко и непонятно" (с) не мое.
Можно в чуть более развернутом виде?


← →
MBo ©   (2004-11-02 17:39) [3]

В конструкторе компонента еще не создано окно, а многие операции с Combobox требуют наличия действительного дескриптора окна.
Нужно в объявлении класса:

procedure CreateWnd; override;

а в реализации

procedure TSuperComponent.CreateWnd;
begin
 inherited CreateWnd;
 cbSelector:=TComboBox.Create(Self);//эти строки можно в принципе
 cbSelector.Parent:=Self;//и в конструкторе оставить
 cbSelector.Items.Add(S);
end;


← →
Юрий Зотов ©   (2004-11-02 18:37) [4]

Только я бы еще добавил проверку cbSelector на nil. Потому что иначе этот код будет отрабатывать при каждом RecreateWnd.


← →
AZ ©   (2004-11-02 20:10) [5]

О!
Сразу два ответа!
Большое спасибо*2^10!



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

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



Память: 0.46 MB
Время: 0.024 c
10-1102629822
turonix
2004-12-10 01:03
2005.09.18
Создание Excel файла


6-1117308008
Flame
2005-05-28 23:20
2005.09.18
referer


14-1124958106
Cosinus
2005-08-25 12:21
2005.09.18
Помогите с решением тригонометрического уравнения...


3-1123491610
Rentgen
2005-08-08 13:00
2005.09.18
Как пробежаться по выделеным записям в Table?


3-1123042913
Layner
2005-08-03 08:21
2005.09.18
Программа в XPrus выполняет запрос в 2003en не выполняет..




   Наверх