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

Создание свойства нового компонента   Найти похожие ветки 

← →
Aleksandr ©   (2006-12-16 20:03) [0]

Здравствуйте уважаемые мастера Delphi. Я создаю новый компонент и хочу добавить в него новое свойство, которое могло бы раскрыватся (+) и появлялись дополнительные поля разных типов. Как это зделать? Заранее спасибо.

---

← →
Юрий Зотов ©   (2006-12-16 22:02) [1]

Свойство-объект. Наследовать от TPersistent или его наиболее подходящего потомка.

Примерв объектных свойств см. в мсходниках VCL, там таких много. Слово "сделать" пишется через "с".
:o)

---

← →
DimaBr   (2006-12-18 09:17) [2]


TMyGroup = class(TPersistent)
private
  fIntegerProperty: integer;
  fStringProperty: string;
published
   property IntegerProperty: integer read fIntegerProperty write fIntegerProperty;
   property StringProperty: string read fStringProperty write fStringProperty;
end;

TMyComponent = class(TComponent)
private
  fMyGroup: TMyGroup
published
  property MyGroup: TMyGroup read fMyGroup write SetMyGroup;
end;

constructor TMyComponent.Create();
begin
 inherited;
 fMyGroup := TMyGroup.Create;
end;

destructor;
begin
fMyGroup.Free;
inherited;
end;

---

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

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



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