1
{ Source provided for Free Pascal Bug Report 4209 }
2
{ Submitted by "Ivo Steinmann" on 2005-07-22 }
3
{ e-mail: isteinmann@bluewin.ch }
12
XMethod = procedure of object;
13
XProcedure = procedure;
15
procedure Test(const Callback: XMethod); overload;
19
procedure Test(const Callback: XProcedure); overload;