Hola.
Estaba pensando que quizá el amigo
rubio, deseaba la identación en relación a las tres últimas cifras del campo
CODIGO, de ser así podría hacer algo como:
Código Delphi
[-]
procedure TForm1.DESCRIPCIONGetText(Sender: TField; var Text: String; DisplayText: Boolean);
var
Ident: Integer;
Codigo: string;
begin
Codigo:= Query.FieldByName('CODIGO').AsString;
Ident:= (StrToInt(Codigo) - StrToInt(Codigo[1] + StringOfChar('0',Length(Codigo)-1))) div 100;
Text:= StringOfChar(' ', Ident) + Query.FieldByName('DESCRIPCION').AsString;
end;
Saludos.