[fpc-devel] procedure Types

[Amir Aavani]

I have problem with procedure Types.
Look at the following code:

  TProcedure= procedure (S: String);
  TTest= class
    MyF: TProcedure;
     procedure F1 (S: String);
    procedure F2 (S: String);
    ....
    ...
  end;

TTest.constructor ;
begin
  MyF:= @F1;
end;

it says it can't cast "Procedure (S: String); Object" to TProcedure. The 
problem is clear but I don't know
(can't find) any solution to define TProcedure as a procedure of a class 
which accepts one argument.

Yours
Amir