TDBEdit顯示位置要改其對應之Field.Alignment屬性
  taRightJustify右靠
  taLeftJustify左靠
參考下以程式    procedure TForm1.Button1Click(Sender: TObject);
var i:integer;
begin
 for i:=0 to Form1.ComponentCount -1 do
    if Form1.Components[i].ClassType=TDbEdit then
       TDbEdit(Form1.Components[i]).Field.Alignment:=taRightJustify;//右靠
       或
        TDbEdit(Form1.Components[i]).Field.Alignment:=taLeftJustify; //左靠    end;