пишу компонент - 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 пытается выполнить мой обработчик события, а не запомнить процедуру как обработчик события
помогите, пожалуйста, разобраться
