Foros Club Delphi - Alinear contenido en dbEdit.

Podés crear tu propio componente similar a esto....

Código:

type

  TMyDBEdit = class(TDBEdit)

  private

    FAlignment: TAlignment;

    procedure SetAlignment(const Value: TAlignment);

  protected

    procedure CreateParams(var Params: TCreateParams); override;

  public

  published

    property Alignment : TAlignment read FAlignment write SetAlignment default taLeftJustify;

  end;



implementation



procedure TMyDBEdit.CreateParams(var Params: TCreateParams);

const

  Alignments: array[TAlignment] of Longint = (ES_LEFT, ES_RIGHT, ES_CENTER);

begin

  inherited CreateParams(Params);

  Params.Style := Params.Style or Alignments[FAlignment];

end;



procedure TMyDBEdit.SetAlignment(const Value: TAlignment);

begin

  if FAlignment <> Value then begin

    FAlignment := Value;

    RecreateWnd ;

  end;

end;

Creo que no me olvidé de nada, Suerte!