Переполнение стека

kot

В скрипте у мемо стоит следующее:

begin
  if not FinalPass then
    Arr[i] := Arr[i] + CalcHeight();
end;

В вызове функции "TfrMemoView.CalcHeight" стоит строка "frInterpretator.DoScript(Script)", т.е. вызывается опять "CalcHeight". И так бесконечно.

Нельзя что-ли так делать ??

AlexTZ

См. fr_class.pas:

function TfrMemoView.CalcHeight: Integer;
begin
...
frInterpretator.DoScript(Script);

естественно, происходит зацикливание.