[Lazarus-es] asignar un procedimiento

José Mejuto joshyfun en gmail.com
Mar Jun 15 20:23:38 CEST 2010


Hello christian,

Tuesday, June 15, 2010, 7:05:39 PM, you wrote:

cO> *type *Tlaclase = class
cO>   *public *
cO>     *Procedure *Elprocedimiento(sender:tobject)
cO>       ----
cO> *end*
cO>  ----------
cO> *public *
cO>    *procedure *button.click(sender:tobject);
cO>    *procedure *OtroProcedure(sender:tobject);
cO> .......
cO> *implementation*
cO>    *procedure *Totraclase.button.click(sender:tobject);
cO> var instancia: Tlaclase;
cO> *begin*
cO>     instancia:= Tlaclase.create (..)
cO>     instancia.Elprocedimiento :=@OtroProcedure * --> Esto me genera error  *
cO> *end*
cO>    *procedure *Totraclase.OtroProcedure(sender:tobject);

ElOtroprocedimiento no es un evento, es un procedimiento, que no se
puede cambiar. Para eso "ElOtroprocedimiento" tendría que ser un
evento, al estilo de "OnElOtroProcedimiento", vamos una property o
variable.

-- 
Best regards,
 José





More information about the Lazarus-es mailing list