To set Point on Tedit
Posted on 2005-05-10
Dear advisor !
I use Delphi 2005
On Change Event of Tedit i wrote :
lc := Self.txtdaung.Text ;
lc := StringReplace(lc, ',', '', [rfReplaceAll]) ;
lc := FormatFloat('#,###,###,##0', StrToIntDef(lc, 0)) ;
Self.txtdaung.Text := lc ;
This function means to change '12345' to '12,345' when inputing
i already Set BiDiMode = [bdRightToLeft] on Desigh
But when i input '1234', the point stand at '1' and the value of Tedit is '1,234' (as i thought) .
I want to set point at '4'
How to show this problem.
What i need , to change '12,345' to '12345' . So that function works well . But having trouble after input four charater, the point jump at the first charater. I need the point still at Right of Tedit