обработка событий в собственных компонентах

[smirnoww]

пишу компонент - treeview привязанный к базе, Необходимо что бы при смене активного элемента дерева в наборе данных становилась текущей соответствующая строка, Написал следующий код:
TDBTreeView = class(TTreeView)
private
{ Private declarations }
...
protected
{ Protected declarations }
public
{ Public declarations }
constructor Create(TheOwner: TComponent); override;
destructor Destroy; override;
procedure DBTVSelChange(Sender: TObject);
published
{ Published declarations }
...
end;

...

constructor TDBTreeView.Create(TheOwner: TComponent);
begin
inherited Create(TheOwner);
//ниже следующая строка вызывает ошибку
OnSelectionChanged:=DBTVSelChange;
end;

...

procedure TDBTreeView.DBTVSelChange(Sender: TObject);
begin
...
end;

---------конец кода--------------
ошибка:
/home/j/my/Mylpk/dbtreeview.pas(96,36) Error: Wrong number of parameters specified for call to "DBTVSelChange"

я так понял, что lazarus пытается выполнить мой обработчик события, а не запомнить процедуру как обработчик события

помогите, пожалуйста, разобраться

[alexs]

попробуй так:

Код: Выделить всё

OnSelectionChanged:=@DBTVSelChange;

[smirnoww]

Спасибо, помогло,
Сам что-то стормознул