新手祝大家新年进步，顺便请教一下大家，别见笑

Question

我要做一个计算器，如何使得在edit中的数字始终位于框的右边，不在edit事件中触发。
另外，怎么检查edit中的最后一个数字是小数点呢？因为如果是点的话我要删除点或在其后加零。谢谢了。

Answer 1

位于右边只需设文字对齐属性就可以了
至于小数点，if copy(edit1.text, length(edit1.text) -1, 1) <> '.' then ...
不就可以了？

Answer 2

edit的设置右对齐在哪里啊？？

Answer 3

if self.Edit1.Text[length(Self.Edit1.Text)]='.' then
begin
  //删除点或在其后加零
end;

Answer 4

//对齐
SetTextAlign(Self.Edit1.Handle, TA_RIGHT);

Answer 5

我怎么找不着你说的那个文字对齐属性的呀，好像在edit中是没有的吧？

Answer 6

SetTextAlign(Self.Edit1.Handle, TA_RIGHT);
以上这句好像没反应的呀。

Answer 7

Windows.SetWindowLong(Edit1.Handle, GWL_Style,
  Windows.GetWindowLong(Edit1.Handle, GWL_Style) or 2)