Вниз
Скачать: 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.048 c
1-1117181784
Bagdat
2005-05-27 12:16
2005.06.14
Хранение шаблона Excel в базе данных Firebird 1.5


1-1117024157
Andruid
2005-05-25 16:29
2005.06.14
Как сгладить график TChart методом наименьших квадратов?


14-1116935671
Alexander Panov
2005-05-24 15:54
2005.06.14
Абонентам обычных телефонов с 1 июля придется платить за звонки н


1-1116949359
NightStranger
2005-05-24 19:42
2005.06.14
Как добавить подпункт в TreeView?


14-1116755818
Igorek
2005-05-22 13:56
2005.06.14
Воскресный флэшовый квест :8-)




   Наверх