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

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

TListView [D4, D5, D6, D7, Win95/98, WinME, NT4, Win2k, WinXP]

SoftAl ©   (2002-11-23 20:18:00) 

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

---

Softal   (2002-11-25 00:00:00) [1]

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

---

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

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;

---

Наверх