define class MyWrapper as Custom name = MyWrapper procedure Init set procedure to MyPrg.Prg endproc procedure Func1 return Funct1InMyPrg endproc procedure Func2 return Func2InMyPrg endproc enddefineThere, that wraps a new object interface to existing code with out changing the exisitng code at all. The old code shouldn't be changed, then your not wrapping, your modifing, and most of the times it can't be, either, its not accesible, or it needs to backward compatible.