TControl (TEdit...) ?

[poterp]

hallo,
ich habe schon viel recherchiert aber ich nicht clever geworden. uzw. ich möchte die zahlen bei TEdit
recht haben.
Ich habe erstmal folgende Methode angewendet:MyEdit.BiDiMode := bdLeftToRight; es sollte mit Delphi7 funktionieren
Passiert nicht und dann habe ich folgende quelle gefunden:

Delphi-Quellcode:

type 
  TMonEdit = class(TEdit) 
  private 
    FTextAlign: TAlignment; 
    procedure SetTextAlign(Value: TAlignment); 
  protected 
    procedure CreateParams(var Params: TCreateParams); override; 
  public 
    constructor Create(AOwner: TComponent); override; 
  published 
    property TextAlignment: TAlignment read FTextAlign write SetTextAlign; 
  end; 
implementation 

constructor TMonEdit.Create(AOwner: TComponent); 
begin 
  inherited; 
  FTextAlign := taLeftJustify; 
end; 

procedure TMonEdit.CreateParams(var Params: TCreateParams); 
const 
 Alignments: array[TAlignment] of Word = (ES_LEFT, ES_RIGHT, ES_CENTER); 
begin 
 inherited CreateParams(Params); 
 Params.Style := Params.Style or Alignments[TextAlignment]; 
end; 

procedure TMonEdit.SetTextAlign(Value: TAlignment); 
begin 
  if FTextAlign <>Value then 
    Begin 
     FTextAlign := Value; 
     RecreateWnd; 
   End; 
end;

aber ich weisse nicht wie ich es implementieren kann. kennt jemand ne einfache Methode?
grüß
poter