Felipe Monteiro de Carvalho wrote:
Forgot to attach the patch =)

Just one tip maybe would be better to dereference PMethod after assigned check in the Callback proc

 Method := PMethod^; //-> if PMethod is nil there would be problems

 if Assigned(PMethod) then
   Method(Msg)


as alternative you can skip one assignment (Method copy):

// Method := PMethod^; delete this
 if Assigned(PMethod) then
   PMethod^(Msg)

PS: not tested.

Luiz

_________________________________________________________________
    To unsubscribe: mail [EMAIL PROTECTED] with
               "unsubscribe" as the Subject
  archives at http://www.lazarus.freepascal.org/mailarchives

Reply via email to