Sangría En Dbgrid

[[duilioisola]]

Una solución rápida sería implmentar el método OnGetText del campo CUENTA.

Código Delphi [-]
procedure TDMatamodule.TablaCuentasCUENTAGetText(Sender: TField; var Text: string; DisplayText: boolean);
begin
  // Tomo tantos espacios como larga sea el codigo de cuenta (Maximo 15)
  Text := copy('               ', 1, Length(TablaCuentasCODIGO.AsString)) + TablaCuentasCUENTA.AsString;
end;

Código Delphi [-]
procedure TDMatamodule.TablaCuentasCUENTAGetText(Sender: TField; var Text: string; DisplayText: boolean);
begin
  // Tomo tantos espacios como larga sea el codigo de cuenta
  Text := StringOfChar(' ', Length(TablaCuentasCODIGO.AsString)) + TablaCuentasCUENTA.AsString;
end;