Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Написание компонента [D6, WinXP]


^SANYA ©   (2002-09-28 15:06:00) 

Как создать свойство схожее по структуре с TForm.Font?
Суть в том, что в инспекторе объектов у меня отображается только название класса свойства, но выпадающий список не работает...
Цель заключается в том, чтобы научиться отображать в инспекторе объектов создавать структурированные свойства типа TFont с выпадающим списком.
Как это правильно сделать?
Заранее благодарен.


evgeg   (2002-09-28 16:18:00) [1]

> TColors = class(TPersistent)

Точно, забыл сказать про это.


Le Taon   (2002-09-28 16:18:00) [2]

Да, ещё:
property Colors: TColors read FColors write SetColors;
//begin
// FColors.Assign(Value)
//end;


Le Taon   (2002-09-28 16:07:00) [3]

TColors = class(TPersistent)


^SANYA   (2002-09-28 16:02:00) [4]

>evgeg © (28.09.02 15:10)
Это понятно, вопрос в том, как заставить ИО отображать выпадающий список свойств класса?
В данном примере я хочу грамотно увидеть свойство TColors:

type TColors = class
private
FTableColor,
FTableBgrndColor,
FTableBrdrColor,
FTableFxdBgrndColor,
FTableFxdBrdrColor : TColor;
published
// цвет таблиц
property TableColor : TColor read FTableColor;
// цвет фона таблиц
property TableBgrndColor : TColor read FTableBgrndColor;
// цвет разделителя таблиц
property TableBrdrColor : TColor read FTableBrdrColor;
// цвет фона фиксированных ячеек таблиц
property TableFxdBgrndColor : TColor read FTableFxdBgrndColor;
// цвет разделителя фиксированных ячеек таблиц
property TableFxdBrdrColor : TColor read FTableFxdBrdrColor;
end;

type
TMyStringGrid = class(TStringGrid)
private
{ Private declarations }
FShowSelecting : Boolean;
FColors : TColors;
protected
{ Protected declarations }
public
{ Public declarations }

published
{ Published declarations }
constructor Create(AOwner : TComponent); override;

property Colors : TColors read FColors write FColors;

Что я сделал не так?


evgeg   (2002-09-28 15:10:00) [5]

Просто объявите в классе свойства published сво-ва. Все они будут отображаться в расшифровке.


Наверх

Титульная страница Поиск, карта сайта Написать письмо