>PROCEDURE FormatPrice(myPrice as String) && 1st time - myPrice as String Parameters MyPrice && 2nd timePick wich one you want.
>SET CLASSLIB TO Classes >oMyClass = CreateObject("myClass") >myPrice = "1234444.444444444" >?oMyClass.FormatPrice(myPrice) >1234 >>
>parameters MyPrice
>
>I have copied the code for the FormatPrice method to a prg class>DEFINE CLASS testclass as Session olepublic >PROCEDURE FormatPrice(myPrice as String) >Parameters MyPrice >*** rest of code >EndProc >EndDefine >>then created a DLL like this
>Build Project VFPopubtest From oPubClass.prg >Build Mtdll VFPoPubTest From VFPoPubTest recompile >>Then at the command prompt called this function like this
> >oVfpDll = CreateObject("VfpOpubTest.TestClass") >myPrice = "1234444.444444444" >? alltrim(oVfpDll.FormatPrice(myPrice) >1234 >>Normally, this works fine. However, suddenly, the oVfpDll.Format_Price