![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
||||
|
||||
|
Всем привет. Я пишу компонент. И у меня есть вопрос. Как сделать такой property что бы он в Object Inspector'е отображался как вложенный?(с плюсиком +). Например у формы это Anchors и Constraints.
|
|
#2
|
||||
|
||||
|
Так и посмотри там пример. Мне кажется, это record...
|
|
#3
|
||||
|
||||
|
Неа....не рекорд. Это свойство определенного класса. Стоит посмотреть реализацию любого компонента и обратить внимание на свойство Font.
|
|
#4
|
||||
|
||||
|
это класс на основе TPersistent
делается примерно так: Код:
TMyProperty = class(TPersistent) private FValue1: Integer; FValue2: Integer; published property Value1: Boolean read GetValue1 write SetValue1; property Value2: Boolean read GetValue2 write SetValue2; end; Код:
function TMyProperty.GetValue1: Integer; begin Result := FValue1; end; procedure TMyProperty.SetValue1(Value: Integer); begin FValue1 := Value; end; Код:
TMyComponent = class(TGraphicControl) private FMyProperty: TMyProperty; published property MyProperty: TMyProperty read FMyProperty write FMyProperty; end; Код:
constructor TMyComponent.Create(AOwner: TComponent); begin inherited Create(AOwner); FMyProperty := TMyProperty.Create; end; Последний раз редактировалось ryderx34, 23.10.2010 в 22:10. |