Delphi-Help

  • Increase font size
  • Default font size
  • Decrease font size

Goto

Печать
Рейтинг пользователей: / 0
ХудшийЛучший 

 


Goto

Описание

Goto label

Ключевое слово Goto принуждает перескочить к данной метке. Его нежелательно использоваться в современном коде, так как это делает его очень трудным для восприятия. Главным образом используется, для того чтобы вызвать завершение глубоко вложенного кода, где логика к благополучному выходу была бы сложна. Никогда не используйте его для перехода в или из блока Try, а также в циклах или операторах выбора. Будьте осторожны!

Пример кода

var
i : Integer;
label
GotoLabel;
begin
for i := 1 to 10 do
begin
ShowMessage('i = '+IntToStr(i));
if i = 4 then Goto GotoLabel;   // Выход из цикла с условием
end;
ShowMessage('Цикл закончился нормально');
GotoLabel:
ShowMessage('Цикл закончился с значением i = '+IntToStr(i));
end;

i = 1
i = 2
i = 3
i = 4
Цикл закончился с значением i = 4

Примечание

Используйте только в экстренных случаях и только когда полностью оправдано.

 

Авторизация



Счетчики