Создание компонент: использование свойств одного контрола в друго

← →
Death_R (2004-07-23 15:59) [0]

Создаю невизуальный компонент TVis в свойство которого передаю имя некоего компонента, который находится на форме., и при изменении этого свойства создаю компонент TGraficComtrol. Мне нужно передать в процедуры TGraficComtrol некоторые свойства компонента (который указан в свойстве невизуального компонента TVis), например его размер и клас.

← →
Death_R (2004-07-23 16:04) [1]

Размер - это высота и ширина

← →
Reindeer Moss Eater © (2004-07-23 16:21) [2]

Мне нужно передать в процедуры TGraficComtrol некоторые свойства

Дык и передавай.
Параметры методов, процедур и функций служат для этого.

← →
Юрий Зотов © (2004-07-23 16:23) [3]

> Death_R (23.07.04 15:59)

А в чем проблема-то? Ссылка на компонент у Вас есть, что мешает получить его свойства?

Ему не получить, ему передать надо

Зачем передавать, если они и так доступны в любом методе?

Что лучше - вот такой код:
procedure TMyGraphicControl.Proc(AWidth, AHeight, AClass, ...); begin ... // Что-то делаем с параметрами end;
или вот такой:
procedure TMyGraphicControl.Proc; begin if Comp <> nil then // Comp - ссылка на тот самый компонент with Comp do begin ... // Что-то делаем со свойствами Comp end end;

Варианты почти одинаковы, но второй немного быстрее.

Создание компонент: использование свойств одного контрола в друго Найти похожие ветки