Человеку надо добавить свое свойство.
Но он не понимает что такое свойство, вот отсюда и все пробьлемы.
Свойство, это некоторая виртуальная конструкция, которая предназначена для обеспечения работы с некоторым тарибутом объекта, т.е. по сути представляет ссылку на реальное поле класса.
В данном случае:
Код:
type
TMyComboBox = class(TCustomEdit)
private
FItems : TStringList;
function GetItems : TStrings;
...
published
property Items : TStrings Read GetItems;
end;
implementation
function TMyComboBox.GetItems : TStrings;
begin
Result := FItems As TStrings;
end;