![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Рекурсивная функция и уровень рекурсии [D7, XP]
webpauk © (2009-12-09 14:44:00)Как передать предыдущий уровень рекурсии в следующий, не используя глобальную переменную и не используя параметры функции?
Обычно передать можно через параметры:
procedure Rec(...; var Level: Integer);
begin
...
Rec(..., Level+1)
end;
но такой подход неудобен, т.к. вызов функции требует определения переменной.
Есть какие-то другие механизмы?
MBo (2009-12-09 14:56:00) [1]спецификатор var обычно не нужен, и переменная тогда не понадобится
Медвежонок Пятачок (2009-12-09 14:45:00) [2]подход без параметра еще более неудобен