Создание компонента типа DropDownBox

← →
Ormada © (2004-05-12 08:41) [0]

Создаю свой компонет основываясь на исходнике Spinedit
Никак не могу вытащить свойства клика по кнопке в паблишед компонета чтоб потом можно было в дизайнере уже что то ещё под неё зашить
делаю так
type

{ TSpinButton }

TSpinButton = class(TWinControl)
private
процедуры...
........
protected
public
published
end;

Собственно сам компонент - >{ TSpinEdit }

TCustomComboX = class(TCustomEdit)
private
FButton: TSpinButton;
protected
public
constructor Create(AOwner: TComponent); override;
published
пытаюсь сделать так
property OnButtonClick: TNotifyEvent read GetOnButtonClick write SetOnButtonClick;
end;

implementation

constructor TCustomComboX.Create(AOwner: TComponent);
begin
inherited Create(AOwner);
FButton := TSpinButton.Create(Self);
FButton.OnClick := OnButtonClick;!!!!!!!!!!!!!!!
end;

function TCustomComboX.GetOnButtonClick: TNotifyEvent;
begin
Result := FButton.OnClick;
end;

procedure TCustomComboX.SetOnButtonClick(const Value: TNotifyEvent);
begin
FButton.OnClick := Value;
end;

Подскажи плиз чё я делаю не так ????

Заполняю в дизанере код под OnButtonClick но он не обрабатывается
ПОЧЕМУ ???????? Help

← →
ORMADA © (2004-05-12 09:52) [1]

Чё никто компоненты в ЖИЗНИ не делал чтоль ?

Ламо чтоль все ?

Создание компонента типа DropDownBox Найти похожие ветки