Внимание! Вы перенаправляетесь на другой сайт. Для перехода щелкните по ссылке:
https://devhubby.com/thread/how-to-exit-for-loop-in-delphi