Hi Fabio,
Yes, I did realize that and already made a correction. Please see my message #
925831.
Grazie!
Fernando
>
>* Alan Popow
>
>t1= Seconds ()
>
>For I = 1 To 100000
> Do While Right (cSourceString, 1) $ (" " + Chr (13) + Chr (10))
> cSourceString = Left (cSourceString, Len (cSourceString) -1)
> EndDo
>EndFor
>
>Elap4 = Seconds () - t1
>
>* Mike Pratt
>
>t1= Seconds ()
>
>For I = 1 To 100000
> Do While InList (Right (cSourceString, 1), Chr (32), Chr (10), Chr (13))
> cSourceString = Left (cSourceString, Len (cSourceString) - 1)
> EndDo
>EndFor
>
>Elap5 = Seconds () - t1
>>Attention, with this code you do only one true computation.
>
>Use a temporary var:
>
>* Alan Popow
>
>t1= Seconds ()
>
>For I = 1 To 100000
> crem=cSourceString
> Do While Right (crem, 1) $ (" " + Chr (13) + Chr (10))
> crem = Left (crem, Len (crem) -1)
> EndDo
>EndFor
>
>Elap4 = Seconds () - t1
>
>* Mike Pratt
>
>t1= Seconds ()
>
>For I = 1 To 100000
> crem=cSourceString
> Do While InList (Right (crem, 1), Chr (32), Chr (10), Chr (13))
> crem = Left (crem, Len (crem) - 1)
> EndDo
>EndFor
>
>Elap5 = Seconds () - t1
>
