Облака / Clouds
    Go to Copy.com
    Copy.com
    The bast cloud service
    Get 20 GB free!!!
    Support WebDav.
    Show more >>

    Go to Dropbox.com
    Dropbox.com
    time-tested cloud storage
    Support WebDav.
Все бесплатно
    Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.



Вопросы
  Последний день месяца
   Категория: Базы данных
  BDE. Создание алиасов
   Категория: Базы данных
  Получить список запущенных приложений
   Категория: Приложение
  Удалить свой же exe-шник
   Категория: Приложение
  Находится ли мышь над формой
   Категория: Компоненты
  Упаковать TinyDB
   Категория: Базы данных
  Загрузка файлов в THTMLViewer и TFrameBrowser
   Категория: Интернет и Сети

Delphi - Справочник: Goto

ABCDEFGHIJKLMNOPQRSTUVWXYZ

  << Вернуться  

 Goto
Goto label
Ключевое слово (Unit )
Вызывает скачок к метке, независимо от вложения
Описание:
Ключевое слово 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
Примечание:
Используйте только в экстренных случаях и только когда полностью оправдано.

  << Вернуться