Question

如何让TEdit的文本右对齐？

Answer 1

看看Delphi是怎样做的吧：大家注意到了TDBEdit如果是数类型的话，在没有焦点时是右对齐的。看了源程序才知道，它是自己画的，在TDBEdit.WMPaint中自己画的： case AAlignment of taLeftJustify: Left := Margins.X; taRightJustify: Left := ClientWidth - TextWidth(S) - Margins.X - 1; else Left := (ClientWidth - TextWidth(S)) div 2; end; if SysLocale.MiddleEast then UpdateTextFlags; TextRect(R, Left, Margins.Y, S); 查看更多答案>>

麻烦采纳，谢谢!