Line # | Original line | Converted line |
206 | Calc.Readout.Value := Left(Calc.Readout.Value,At(".",Calc.Readout.Value)-1)+Str(nIndex,1)+"." | Calc.Readout.Value := HB_ULEFT(Calc.Readout.Value,At(".",Calc.Readout.Value)-1)+Str(nIndex,1)+"." |
308 | for i := 1 to Len(Alltrim(Str(nMemo))) | for i := 1 to HMG_LEN(Alltrim(Str(nMemo))) |
309 | iif(Alltrim(SubStr(Alltrim(Str(nMemo)),i,1)) # ".",; | iif(Alltrim(HB_USUBSTR(Alltrim(Str(nMemo)),i,1)) # ".",; |
310 | Number_Click(Val(Alltrim(SubStr(Alltrim(Str(nMemo)),i,1)))),; | Number_Click(Val(Alltrim(HB_USUBSTR(Alltrim(Str(nMemo)),i,1)))),; |
311 | iif(Len(Alltrim(Str(nMemo))) # i, Decimal_Click(),)) | iif(HMG_LEN(Alltrim(Str(nMemo))) # i, Decimal_Click(),)) |