Edit右對齊

 1、在窗體的OnCreate或OnShow 中加入（適合少數Edit右對齊情況）：

SetWindowLong(Edit1.Handle,GWL_STYLE,GetWindowLong(Edit1.Handle,GWL_STYLE) or Es_right);

2、如經常需要可編寫繼承控件，只需繼承Tedit並重載CreateParams方法即可。

procedure TMyEdit.CreateParams(var Params: TCreateParams);
begin
   inherited;
   Params.Style:=Params.Style or ES_RIGHT;
end;