Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2009.01.25;
Скачать: CL | DM;

Вниз

простой вопрос по RTTI   Найти похожие ветки 

 
Morpheus   (2008-12-14 19:55) [0]

Есть две процедурки.
Первая: создает контролы - панельки, задает им имя по типу: (el as TPanel).name:= "Panel" + IntToStr(i).
Вторая должна создавать всякие кнопки, поля, переключатели и так далее.
Непосредственно вопрос: как указывать имя родительского компонента, если это просто строка? Есть ли функция преобразование типа string в TComponentName?


 
Сергей М. ©   (2008-12-14 20:15) [1]


> Первая: создает контролы


> Вторая должна создавать всякие кнопки, поля, переключатели
> и так далее


Эти "и так далее" точно такие же контролы. Зачем, спрашивается, две "процедурки" ?


> как указывать имя родительского компонента, если это просто
> строка?


Имя и есть строка.


> Есть ли функция преобразование типа string в TComponentName?


type TComponentName = type string;

Преобразовывать ничего не надо.


 
Morpheus   (2008-12-14 20:20) [2]

Нашел некий метод для общего родителя FindChildControl(ControlName: string) который и ожидал по логике найти, но он возвращает тип TContol.


 
Morpheus   (2008-12-14 20:28) [3]

Сергей М.
Вопрос всего-навсего заключается в том, как поместить элемент на панель.

NewEdit: TEdit.Create(self) овнер форма, так удобнее для дальнейшей работы
NewEdit.Parent:= Panel + i ??????????

Дву процедуры потому, что два SQL-запроса, в одной процедуре пришлось бы вызывать запросы в цикле.


 
Сергей М. ©   (2008-12-14 20:29) [4]


> он возвращает тип TContol


TControl есть прямой наследник TComponent


 
Morpheus   (2008-12-14 20:33) [5]

Сергей М.
Может подскажите, как это использовать? У меня любые эксперименты с этим методом вылетают на "Access violation".


 
Сергей М. ©   (2008-12-14 20:50) [6]

NewEdit.Parent := TWinControl(MyForm.FindChildControl("PanelN"));


 
Morpheus   (2008-12-14 21:21) [7]

Сергей М.
Спасибо, это то, что было нужно



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

Текущий архив: 2009.01.25;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.015 c
15-1228111662
WondeRu
2008-12-01 09:07
2009.01.25
Баги на форуме


15-1228074448
this.name
2008-11-30 22:47
2009.01.25
3dsmax: pivot


15-1228144946
Layner
2008-12-01 18:22
2009.01.25
Убили форум или пропал интерес к Delphi?


8-1189442774
copron
2007-09-10 20:46
2009.01.25
цветное в черно-белое


2-1228993138
cvg
2008-12-11 13:58
2009.01.25
Как сделать строчку или символ в memo жирным?