Alinear texto en TEdit y TMaskEdit

[Gydba]

En torry.net tenés componentes con código que hacen lo que decís.

De todas formas en algún momento me habia hecho un componente haciendo algo como:

type TComponente :class(TEdit)
protected
   procedure CreateParams(var Params :TCreateParams); override;
   ...
end;

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

...

Alguna idea te va a dar...