![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
||||
|
||||
![]() Всем привет. Я пишу компонент. И у меня есть вопрос. Как сделать такой property что бы он в Object Inspector'е отображался как вложенный?(с плюсиком +). Например у формы это Anchors и Constraints.
|
#2
|
||||
|
||||
![]() Так и посмотри там пример. Мне кажется, это record...
Оставайтесь хорошими людьми... VK id2634397, ds [at] phoenix [dot] dj |
#3
|
||||
|
||||
![]() Неа....не рекорд. Это свойство определенного класса. Стоит посмотреть реализацию любого компонента и обратить внимание на свойство Font.
Грамотно поставленный вопрос содержит не менее 50% ответа. Грамотно поставленная речь вызывает уважение, а у некоторых даже зависть. |
#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. |