Да, это работает. Объявите переменную в секции const, например:
procedure P; const MyVariable : Integer = 0; begin Inc(MyVariable); end; |
В нашем примере переменная MyVariable содержит количество вызовов P.
Тем не менее, это лучшее решение, чем использование взамен какого-либо поля объекта (если это возможно). [001202]