Вниз
Скачать: CL | DM;

Использование дополнительного редактора в О.І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]

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



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

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



Память: 0.46 MB
Время: 0.014 c
2-1194260362
ProgRAMmer Dimonych
2007-11-05 13:59
2007.11.25
TMemoryStream (ограничения)


2-1194006343
Nike85
2007-11-02 15:25
2007.11.25
Добавление объектов в ComboBox (Tobject(string))


15-1193293364
shadowonline
2007-10-25 10:22
2007.11.25
Остановка загрузки Windows до окончания работы программы


15-1192960107
homm
2007-10-21 13:48
2007.11.25
Вопрос по асемблеру.


15-1191196002
Фар-юзер
2007-10-01 03:46
2007.11.25
Где фар-навигатор хранит данные о папках?




   Наверх