Прерывание процедуры

[carno]

Уважаемые прогеры, вот такая не простая задача. Не буду вдаваться в излишние подробности, прошу вашего совета в решении в вот какой проблемы.

Есть приложение, в котором выполняется некая функция, которая подгружается из библиотеки. Каким образом реализовать возможность прерывания работы данной функции, и выгружать всю потребленную память, что бы избежать утечки.

Нужно сделать что-то вроде как в php, при превышении некоторого времени, нужно прервать выполнение.
Вставлять внутри функции if flag then exit не вариант, технически невозможно.

У меня в мыслях пока крутятся 2 варианта.

Первый. Если запихнуть выполнение функции в поток, и при необходимости вызывать уничтожение, но тогда все не освобожденные объекты, останутся в памяти. Не могу найти возможность получить память, которая выделяется потоком, что бы её потом освободить вручную.

Второй. Запихнуть функцию в отдельное приложение, и просто завершать его. Но не знаю о корректности такого метода.

[psycho-coder]

Какие результаты возвращаются функцией?
я имею ввиду Result что содержит? (return в Си)

[carno]

строку string

[psycho-coder]

Черт(( Мой способ не прокатит. Там булев тип нужен
уж извини, тут помочь не смогу

[carno]

Поделись пожалуйста своим соображением, очень интересно, как возвращаемый результат может решить проблему?

[psycho-coder]

Я делал в цикле проверку

while (not unit1.getParameter) do
begin
  Application.ProcessMessages(); // что б не висла
  // а тут хоть таймеры хоть что
end;

[carno]

Сообщение от psycho-coder

Я делал в цикле проверку

while (not unit1.getParameter) do
begin
  Application.ProcessMessages(); // что б не висла
  // а тут хоть таймеры хоть что
end;

проблема в том, что если зависнет, то нужно прервать выполнения, т.е. проблема не в зависании самого приложения, а в том, что функция будет выполнятся до завершения работы приложения, а этого не нужно

[psycho-coder]

Мне кажется в мой код не поняли)
Там Application.ProcessMessages(), что бы не висло приложение и в том же цикле идет подсчет количетсва тиков, секунд или прочее. если функция исчерпала лимит времени, грубо ее вырубить.
для этих целей еще можно TTimer прикрутить, я думаю

[carno]

Скажу больше, есть серверное приложение, которое обрабатывает кучу запросов пользователей, и есть программеры, которые постоянно обновляют функцию, и если где то есть ошибка, то нужно прервать выполнение функции, иначе служба повиснет, или на крайняк сожрет кучу процессорного времени и оперативы.

[carno]

Сообщение от psycho-coder

Мне кажется в мой код не поняли)
Там Application.ProcessMessages(), что бы не висло приложение и в том же цикле идет подсчет количетсва тиков, секунд или прочее. если функция исчерпала лимит времени, грубо ее вырубить.
для этих целей еще можно TTimer прикрутить, я думаю

Вот и главный вопрос, как прервать функцию, при истечении таймера, при условии, что нет возможности что то вписать в код функции