Edit 컴포넌트 글자 정렬 기능

기본 속성에는 없더라...

procedure TForm1.FormCreate(Sender: TObject);

var

AStyle:Integer;

begin

  AStyle:=GetWindowLong(edText.Handle,GWL_STYLE);

  AStyle:=AStyle or ES_RIGHT;

  SetWindowLong(edText.Handle,GWL_STYLE,AStyle);

  edText.Repaint;

end;