Alineación derecha en un TEdit

[Angel.Matilla]

Me está ocurriendo algo curioso. Con este código:

Código PHP:

__fastcall TfRecMod::TfRecMod(TComponent* Owner)
     : TForm(Owner)
{
     HWND h;

     h = this->Cuota->Handle;
     SetWindowLong(h, GWL_STYLE, GetWindowLong(h, GWL_STYLE) | ES_RIGHT);

     h = this->Importe->Handle;
     SetWindowLong(h, GWL_STYLE, GetWindowLong(h, GWL_STYLE) | ES_RIGHT);
[... etc.]
} 


Me está saliendo esto


Sin embargo en otros formularios, con el mismo código, lo hace bien. ¿Cuál puede ser la razón?