Вниз
Скачать: 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 вся ветка

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



Память: 0.46 MB
Время: 0.022 c
14-1116745105
totti
2005-05-22 10:58
2005.06.14
Матеметический компонент. Есть ли он в Делфи?


6-1110747178
cerber
2005-03-13 23:52
2005.06.14
Как програмно менять MTU


8-1109168540
Fenik
2005-02-23 17:22
2005.06.14
Аппроксимация экспериментальных данных.


14-1117082252
Digitman
2005-05-26 08:37
2005.06.14
Наземные войска США переходят на Linux..


1-1117006147
Ботвин Дмитрий
2005-05-25 11:29
2005.06.14
Добавление кнопок




   Наверх