IDebug.Indent

Синтаксис

Indent;

Описание

Метод Indent осуществляет установку отступа в консоли на следующий уровень.

Пример

Sub UserProc;
Begin
    Debug.IndentLevel := 
3;
    Debug.IndentSize := 
2;
    Debug.WriteLine(
"Текущий уровень отступа: " + Debug.IndentLevel.ToString);
    Debug.WriteLine(
"Размер одного отступа: " + Debug.IndentSize.ToString + " пробела(ов)");
    Debug.Indent;
    Debug.WriteLine(
"Текущий уровень отступа: " + Debug.IndentLevel.ToString);
    Debug.Indent;
    Debug.WriteLine(
"Текущий уровень отступа: " + Debug.IndentLevel.ToString);
    Debug.Unindent;
    Debug.WriteLine(
"Возврат на уровень: " + Debug.IndentLevel.ToString);
    Debug.Unindent;
    Debug.WriteLine(
"Возврат на уровень: " + Debug.IndentLevel.ToString);
End Sub UserProc;

После выполнения примера данные будут выведены в следующем виде:

Module execution started

      Текущий уровень отступа: 3

      Размер одного отступа: 2 пробела(ов)

        Текущий уровень отступа: 4

          Текущий уровень отступа: 5

        Возврат на уровень: 4

      Возврат на уровень: 3

Module execution finished

См. также:

IDebug