Re: [fpc-pascal] Class procedure assigned to object's event

2009-05-27 Thread Micha Nelissen
Antonio Sanguigni wrote: For the second one: main.pas(261,19) Error: Incompatible types: got "" expected "" Remove the 'class' keyword from your function. A class method is a different beast (with different signature) from a regular method. Micha _

Re: [fpc-pascal] Class procedure assigned to object's event

2009-05-26 Thread JoshyFun
Hello FPC-Pascal, Tuesday, May 26, 2009, 4:03:00 PM, you wrote: asgc> class procedure callback.StatusCMD(Sender: TObject; Response: Boolean; asgc>  const Value: string); [...] asgc> Is there a way to compile with objfpc or better which is asgc> the difference between two modes for this case ? I

Re: [fpc-pascal] Class procedure assigned to object's event

2009-05-26 Thread Antonio Sanguigni
2009/5/26 JoshyFun : > I may be wrong, but "class procedure" and "of object" may be > incompatible even when the "class procedure" should be the same as a > regular "of object" one with an implicit nil passed. Well I really don't know :) but searching on internet for delphi I found this as a simpl

Re: [fpc-pascal] Class procedure assigned to object's event

2009-05-26 Thread Antonio Sanguigni
-BEGIN PGP SIGNED MESSAGE- Hash: SHA1 Graeme Geldenhuys wrote: > You need to assign the address of that method in objfpc mode using the @ syntax. > > FTP.OnStatus:=callba...@statuscmd > or was it... > FTP.OnStatus:=...@callback.statuscmd > > Something like that. I can never reme

Re: [fpc-pascal] Class procedure assigned to object's event

2009-05-26 Thread Graeme Geldenhuys
2009/5/26 : > > if cbOnStatusCMD.Checked then >    FTP.OnStatus:=callback.StatusCMD >  else >    FTP.OnStatus:=nil; > > compile fine. > But if I set {$mode objfpc} rather than delphi I got: > > main.pas(262,3) Error: Wrong number of parameters specified for call to > "StatusCMD" You need to assi

[fpc-pascal] Class procedure assigned to object's event

2009-05-26 Thread a . sanguigni
Hi all, I'm working on a code I have found on internet about a little ftp client using synapse. This code: class procedure callback.StatusCMD(Sender: TObject; Response: Boolean;  const Value: string); defines a class procedure that in delphi mode assigned to: if cbOnStatusCMD.Checked then