Error al asignar método

[[fjcg02]]

Hola a todos,
qué puede estar mal en este código ??

Código Delphi [-]
...
uses
...
procedure cxGridPropertiesButtonClick(Sender: TObject; AButtonIndex: Integer); // esta es la definición que crea aut. el evento
 
...
var Columna:TcxGridDBColumn;
begin
...
Columna.PropertiesClass:= TcxCustomButtonEditProperties;
TcxCustomButtonEditProperties(Columna.Properties).Buttons[0].Kind:= bkEllipsis;
TcxCustomButtonEditProperties(Columna.Properties).OnButtonClick:= cxGridPropertiesButtonClick;

...
end;

[Error] MainForm.pas(278): Incompatible types: 'method pointer and regular procedure'

En principio no me parece que esté mal, pero desde luego no me compila.

Estoy usando las QueantumGrid

Saludos

[[coso]]

Hola,
es debido a que cxGridPropertiesButtonClick no es un metodo, es una procedure normal, y OnClick espera un metodo. Prueba de declarar cxGridPropertiesButtonClick como metodo de alguna clase y ya lo tendras solucionado. Saludos.

[[fjcg02]]

Quieres decir que si pongo

procedure TFormX.cxGridPropertiesButtonClick(Sender: TObject; AButtonIndex: Integer)

en la definición funcionaría ??

Saludos
PD: Gracias por la respuesta

[[coso]]

Exactamente. Saludos.