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

Вниз

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

 
webpauk   (2005-05-31 12:47) [0]

Значит, извиняюсь сразу. Но я никогда не сталкивался и проблема, для других, кажущаяся махонькой, для меня - Эверест.

Есть:
Tcontrol = class
priv
pub
end;

var
Tcontrols: array of Pointer;
  Tcon: Tcontrol;
  Fcon: Tcontrol;
begin
  Tcon:=Tcontrol.create;
  Fcon:=Tcontrol.create;
 
  Tcontrols[0]:=@TCon;
  Tcontrols[1]:=@FCon;
end;

вопрос: как мне обратится к свойствам Tcon через Tcontrols[0]?


 
Sergey Masloff   (2005-05-31 12:51) [1]

@ убери на фиг контрол он и так указатель
Использовать явное указание типа или приведение типа
TControl(Tcontrols[0]).SomeProperty;
Или
(Tcontrols[0] as TControl).SomeProperty


 
Anatoly Podgoretsky ©   (2005-05-31 12:52) [2]

Tcontrol(Tcontrols[0]).


 
Digitman ©   (2005-05-31 12:53) [3]

да так прясо и обращайся :

Tcontrols[0].Свойство := ...


 
Sergey Masloff   (2005-05-31 12:56) [4]

Digitman ©   (31.05.05 12:53) [3]
Там же массив пойнтеров а не контролов...


 
webpauk   (2005-05-31 12:57) [5]


> Anatoly Podgoretsky


> Sergey Masloff


Tcontrol(Tcontrols[0]).
- спасибо!


 
evvcom ©   (2005-05-31 13:03) [6]

Что-то никто не сказал. Не называй свои классы теми же именами, что и стандартные, дабы избежать путаницы и связанных с этим глюков!



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

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

Наверх




Память: 0.47 MB
Время: 0.05 c
4-1114333737
Nafania
2005-04-24 13:08
2005.06.14
Список программ, которые запускались с компьютера


9-1110814362
PAV
2005-03-14 18:32
2005.06.14
Тайлы на ландшафте


1-1116987627
810
2005-05-25 06:20
2005.06.14
Посимвольно формировать String


14-1117113166
syte_ser78
2005-05-26 17:12
2005.06.14
копирование с права на лево.


1-1117194534
Masta Hookah
2005-05-27 15:48
2005.06.14
"ZIP" -> COMPRESSED