Hola Carmelo, como te dice el amigo Neftali puedes utilizar el evento OnGetText de tu campo Cuenta y quedaría mas o menos así:
Código Delphi
[-]
procedure TForm1.Query1CuentaGetText(Sender: TField; var Text: String;
DisplayText: Boolean);
var
Nivel : Integer;
begin
Nivel := Query1.FieldByName('Nivel').AsInteger;
Text := StringOfChar(' ',Nivel*5)+Sender.AsString;
end;
Saluditos