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

TPersistent & Co   Найти похожие ветки 

← →
antonn   (2004-07-03 05:34) [0]

Четвертый час туплю...
Имеется два класса TPersistent и TGraphicControl:

TOptions = class(TPersistent)
 private
 ..
 FBackColor:Tcolor;
 published
 ..
end;

TGraf = class(TGraphicControl)
 private
 ..
 procedure SetFunction(const Value: TColor);
 ..
end;
Вопрос-как выполнить функцию(или процедуру) setfunction с FBackColor?
От TGraphicControl к TPersistent могу (др. функ.), а обратно нет.

---

← →
Григорьев Антон ©   (2004-07-03 07:49) [1]

Куда ж обратно-то? Есть два класса, связанные лишь тем, что имеют общего предка, поэтому они совместимы только в рамках того, что есть в этом предке, и не более.

---

← →
Алхимик ©   (2004-07-03 09:27) [2]

Посмотри как реализован класс
TSizeConstraints = class(TPersistent)
сделай по аналогии.

---

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

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



Память: 0.45 MB
Время: 0.039 c