Использование дополнительного редактора в О.Іnspector

← →
Krants (2006-11-16 13:45) [0]

Конечно вопрос возможно немного не потеме, но никак не могу разобраться...
Вот к примеру в разработаном компоненте использую пер. "Filter" как TStrings. Необходимо иметь возможность редактировать эти данные в режиме разработки программы, т.е. в О.Іnspector`е. Заданный заранее "Filter" в published выводится в О.Іnspector`е но при нажатии на него выводится ошибка.
Подскажите как можно использовать дополнительный редактор на подобии как "Lines" в TMemo, "EditMask" в TMaskEdit и пр.

← →
DimaBr (2006-11-16 14:19) [1]

Во первых нужно создавать этот самый TStrings, проще всего через TStringList, да и присвоение свойстве делать почеловечески

type TMyComponent = class(TComponent) private fItems: TStrings; procedure SetItems(const Value: TStrings); public constructor Create(AOwner: TComponent);override; destructor Destroy;oberride; published property Items: TStrings read fItems write SetItems end; ... procedure TMyComponent.SetItems(const Value: TStrings); begin fItems.Assign(Value); end; constructor TMyComponent.Create(AOwner: TComponent); begin inherited; fItems := TStringList.Create; end; destructor TMyComponent.Destroy; begin fItems.Free; inherited; end;

← →
Krants (2006-11-16 14:44) [2]

Все аналогично! а во вторых?

← →
DimaBr (2006-11-16 14:54) [3]

> Все аналогично!

не верю, код на стол...

← →
Krants (2006-11-16 15:22) [4]

отличаетсья лишь Items>Filter

property Filter: TStrings read FFilter write SetFilter;

← →
Юрий Зотов © (2006-11-16 15:25) [5]

> Krants (16.11.06 15:22) [4]

Если бы это было так, то все бы работало.
А если все же не работает - значит, отличия есть.

← →
RASkov (2006-11-16 15:25) [6]

> [4] Krants (16.11.06 15:22)

Покажи конструктор и SetFilter;

← →
Krants (2006-11-16 15:27) [7]

Жутко извиняюсь, нашол один старый баг
который исправлял но перекомпилить забыл.
Все пашет. спасибо.

Использование дополнительного редактора в О.Іnspector Найти похожие ветки