Оператор прерывания выполнения цикла BREAK

<оператор-break> = break;

Оператор break служит для немедленного прекращения выполнения цикла и выхода из цикла до момента его нормального завершения, после чего программа переходит к исполнению следующего за циклом оператора.

Оператор break размещается в теле цикла.

Если оператор break использован во вложенном цикле, то его действие распространяется только на тот цикл, в котором он вызывается.

Пример

/* производится поиск сотрудника,
   в имени которого содержится подстрока "Иванов"
*/
var aSubstr : string[40];
aSubstr := 'Иванов';
if modifier getFirst Employee = tsOk 
then 
		begin
				do
						if Pos(aSubstr,Employee.Name) > 0 then 
								break; // если нашли, то немедленно завершаем цикл
				while modifier GetNext Employee = tsOk
				if Pos('Иванов', Employee.Name) > 0 then
						... // делаем что-либо с найденным сотрудником
		end;