Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.12.05;
Скачать: CL | DM;

Вниз

TListView   Найти похожие ветки 

 
SoftAl ©   (2002-11-23 20:18) [0]

Помогите плиз.
Пишу свой компонент на базе родительского класса Все ни чего да вот столкнулся с проблеммой мне нужно добавить свойства в редактор свойств который открывается при добовлении колонок(Columns)подскажите кто что может или посоветуйте где это лежит


 
Ученик ©   (2002-11-24 09:47) [1]

type
TMyListView = class(TListView)
private
{ Private declarations }
protected
{ Protected declarations }
public
{ Public declarations }
constructor Create(AOwner : TComponent); override;
published
{ Published declarations }
end;

procedure Register;

implementation

type
TCollectionWrapper = class(TPersistent)
private
FItemClass: TCollectionItemClass;
end;

TMyListColumn = class(TListColumn)
private
FMyProperty : Integer;
published
property MyProperty : Integer read FMyProperty write FMyProperty;
end;

constructor TMyListView.Create(AOwner : TComponent);
begin
inherited Create(AOwner);
TCollectionWrapper(Columns).FItemClass := TMyListColumn
end;


 
Softal ©   (2002-11-25 00:00) [2]

Спасибо огромное за пример
Теперь понял. Все работает.



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

Текущий архив: 2002.12.05;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.02 c
14-14724
Bboy tn
2002-11-12 19:08
2002.12.05
Age Of Wonders II


1-14566
Smit_
2002-11-26 22:38
2002.12.05
Как повесить на одно событие 2 метода.


3-14413
Zn
2002-11-16 12:02
2002.12.05
Связывание полей разных типов в SQL-запросе


1-14610
PaRL
2002-11-23 09:55
2002.12.05
Бред какой-то


3-14436
kombat
2002-11-13 18:20
2002.12.05
Какой то непонятный этот Jet