I'm not sure if this is anything you're interested in but ... You can qualify the of the procedure with the unit or program identifier.
program Test; {$mode objfpc} type THelper = class helper for TObject procedure DoThis; end; procedure DoThis(Param: string); begin WriteLn(Param); end; procedure THelper.DoThis; begin Test.DoThis('Hello World'); end; var Obj: TObject; begin Obj := TObject.Create; try Obj.DoThis; finally Obj.Free; end; end.
_______________________________________________ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal