la verdad tu pregunta no es muy clara...
Delphi tiene tipos procedurales, que son los que sirven de base al mecanismo de eventos. Si queres que no sea un simple procedimiento sino un método (en otras palabras, un procedimiento que pertenezca a un objeto, simplemente añadis "of object" a la declaración del tipo, como veras a continuación.
Podes hacer una declaración como la siguiente
Código:
Type
TProcActualiza = Procedure(Parametro1 : Integer; Parametro2 : String) of object;
Procedure TForm1.Buscar(Actualizador : TProcActualiza);
Begin
HacerLaBusqueda;
Actualizador(Parametro1, Parametro2);
End;
Hola.
Procedure TForm2.Buscar;
Begin
Form1.Buscar(Form2.Actualizar);
End;
Procedure TForm3.Buscar;
Begin
Form1.Buscar(Form3.Actualizar);
End;
espero que el ejemplo te deje claro el asunto...
Hasta luego.
