Hints en DBEdits

[ecfisa]

Hola.

Una opción alternativa a la mencionada por Ñuño es:

Código Delphi [-]
..
type
  TDBEdit = class(DBCtrls.TDBEdit)
    procedure CMMouseEnter(var Msg: TMessage); message CM_MouseEnter;
    procedure CMMouseLeave(var Msg: TMessage); message CM_MouseLeave;
  end;
  TForm1 = class(TForm)
    ...
    DBEdit1: TDBEdit;
    DBEdit2: TDBEdit;
    ...
  end;
...
implementation

procedure TDBEdit.CMMouseEnter(var Msg: TMessage);
begin
  Hint:= ' ' + Field.AsString + ' ';  // aca dale el formato que gustes
end;

procedure TDBEdit.CMMouseLeave(var Msg: TMessage);
begin
  Hint:= '';
end;
...

Un saludo.