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

Вниз

Имя создаваемого компанента.   Найти похожие ветки 

 
jen_bond   (2003-01-02 10:44) [0]

Подскажите как можно узнать Имя созданного в run-time режиме компанента?
вот метод создания компанента.
procedure TMesExpForm.SpeedButton1Click(Sender: TObject);
var x:TLabel;
IniFile: TiniFile;
begin
x:=TLabel.create(self);
x.parent:=MonitorForm.GroupBox1;
end;


Перепробывал методы но они ничего не возвращают:
x.Name;
TComponent(x).Name;

Может быть я что-то не так делаю?


 
TTCustomDelphiMaster ©   (2003-01-02 11:10) [1]

Если вы не задали имя, то что вы хотите там увидеть. А узнать его можно так x.Name.


 
jen_bond   (2003-01-02 12:14) [2]

Но ведь при создании компанента ему должен быть присвоено имя самой программой x:=TLabel.create(self);

>>А узнать его можно так x.Name.
А так ничего не возвращается.


 
Юрий Зотов ©   (2003-01-02 12:27) [3]

> Но ведь при создании компанента ему должен быть присвоено имя...

Не обязательно. Созданный в run-time компонент МОЖЕТ иметь имя, но не обязан его иметь.


> самой программой

Созданному в run-time компоненту программа сама по себе никакого имени не назначает. Компонент получает имя автоматически только если он положен на форму в design-time, а в run-time это надо делать ручками: X.Name := "MyLabel1". Если же Вы никакого имени не назначили, то его и нет - поэтому X.Name дает пустую строку.

Повторюсь - назначать имя не обязательно. Вообще, очень советую почитать вот что (навсегда снимет все вопросы на эту тему):
http://www.delphikingdom.com/helloworld/runtime_comp.htm


 
jen_bond   (2003-01-03 10:06) [4]

Спасибо за совет!



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

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

Наверх




Память: 0.47 MB
Время: 0.014 c
6-37233
Filin2000
2002-11-12 15:47
2003.01.13
TServerSocket в режиме stThreadBlocking


14-37281
m-Sergo
2002-12-25 19:38
2003.01.13
Продаётся куллер S-A(462) TITAN CU5TB ball bearing, медный


4-37436
AlexandrRya
2002-11-09 11:41
2003.01.13
TabbedTextOut


7-37409
iNew
2002-11-03 10:32
2003.01.13
Для получения кол-ва трэков на CD делаю так:


1-37080
freeek
2003-01-03 10:36
2003.01.13
строки