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

Вниз

Доступ к свойству компонента   Найти похожие ветки 

 
NiX   (2003-09-08 17:35) [0]

Есть компонент TC:TControl, далее создал поле TEDIT:
TC:=TEdit.create(...);

Как получить доступ к свойствам Tag, Name и Visible, если точно неизвестно, является ли этот TC TEdit, TMemo или каким-нибудь другим контролем?


 
Palladin ©   (2003-09-08 17:37) [1]

простым приведением типов если не боишся
TEdit(TC).tag и пр...
или используя As
(TC as TEdit).tag


 
Игорь Шевченко ©   (2003-09-08 17:39) [2]

TC.Visible - публичное свойство TControl

TC.Tag и TC.Name - достаточно объявления TControl, так как это публичные свойства TComponent, от которого наследуется TControl


 
ZEE ©   (2003-09-08 17:40) [3]

а если боишся - то:
if TC is TEdit then TEdit(TC).tag:=...;


 
NiX   (2003-09-08 17:49) [4]

2Palladin
2ZEE

Неизвестно, TC - это TEdit, Tmemo или другой контроль. TEdit я взял к примеру.

2Игорь Шевченко

Я так и написал, выдавало ошибку EAccessViolation.

Так что проблема все же осталась - необходимо иметь доступ к свойствам Visible,Tag,Name


 
ZEE ©   (2003-09-08 17:52) [5]

попробуй TControl(TC).Tag:=


 
NiX   (2003-09-08 17:59) [6]

большое спасибо всем откликнувшимся - проблема была в установочном файле Delphей. После переустановки все работает :)


 
Skier ©   (2003-09-08 18:00) [7]


> Я так и написал, выдавало ошибку EAccessViolation.
>
> Так что проблема все же осталась - необходимо иметь доступ
> к свойствам Visible,Tag,Name

Код покажи


 
malkolinge ©   (2003-09-08 19:28) [8]

Tag, name - Появились начиная с TComponenta
visible - Tcontrol

т.е в твоем случае ничего ни к чему приводить не надо :)



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

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

Наверх




Память: 0.48 MB
Время: 0.026 c
1-71571
Doberman
2003-09-11 19:18
2003.09.22
Циклы вычисления.


7-71993
Overstep
2003-07-10 12:29
2003.09.22
Работа с системным динамиком под любой Windows


4-72009
_smile
2003-07-21 13:59
2003.09.22
Использование accelerator tables


14-71893
freeman2003
2003-09-03 16:30
2003.09.22
Не выполняется хранимая процедура на SQL server из delphi


1-71599
mrcat
2003-09-09 14:49
2003.09.22
Манифест XP vs. TListView.OwnerDraw