lcNewSymbol = && Whatever it should be >>DO WHILE "$" $ oObjProperties.text >> oObjProperties.text = STUFF(oObjProperties.text, AT("$", oObjProperties.text), 1, lcNewSymbol) >> oObjProperties.reload = .t. >>ENDDO>>
LOCAL llOnLeft, lcMark IF "$" $ oObjProperties.text oObjProperties.text = ALLTRIM(STUFF(oObjProperties.text, AT("$", oObjProperties.text), 1, SPACE(0))) llOnLeft = goApp.lCurrencyOnLeft lcMark = goApp.cCurrencyMark oObjProperties.text = IIF(llOnLeft, lcMark, SPACE(0)) + oObjProperties.text + IIF(llOnLeft, SPACE(0), lcMark) oObjProperties.reload = .t. ENDIFSomething like that should work. You can create a cursor and examine the contents which flow through that EvaluateContents() method. It basically sends you every value that will be reported on, exactly as it will be reported on. If the $ has already been added by that time, it should work.