Ошибка: Failed to parse the Currency Converter XML document.
$36 408.47


Ошибка: Failed to parse the Currency Converter XML document.
$29 672.01


Ошибка: Failed to parse the Currency Converter XML document.
$1 933.80


Оператор перехода

И в Delphi и в Turbo Pascal’e есть этот оператор- оператор перехода. Кто-то его называет: «оператор прыжка». Довольно интересный оператор, с моей точки зрения. Он может помочь, а может и навредить. Некоторые люди им не советуют пользоваться, но иногда без него сложно.

Оператор перехода имеет вид:
Goto m;

Где m-метка, которой помечена любая другая строчка в программе (не абсолютно любая конечно). Метка может обозначаться любой буквой, словом или числом (от 1 до 9999). Помечается оператор следующим образом:

m: (оператор); //Не забывайте про двоеточие между меткой и оператором!!!


Оператор перехода должен быть объявлен (там где объявляются переменные), перед использованием. Объявляется так:

Program GT; //название программы может быть любым.

Label Metka; //Непосредственно само объявление оператора перехода
Begin //Начало кода

Вся работа этого оператора сводится к тому, чтобы передать управление оператору, который помечен меткой. Дальнейший ход программы осуществляется как обычно.

Рассмотрим небольшой пример:

Program GT; //Название программы может быть любым.

Label Metka; //Непосредственно само объявление оператора перехода

Begin //Начало кода
Goto Metka; //Использование оператора перехода
Showmessage(‘HI’); //Это сообщение не будет отображаться
Metka: Showmessage(‘Goto’); // «Меченный оператор
exit; End; // Завершение программы

Без использования оператора перехода, сообщение с текстом: “HI’ появилось бы. Но в этой программе оно не появится. Мы можем видеть нарушение в порядке выполнения кода. Но дальше выполнение программы идёт по обычному порядку.

С помощью оператора перехода можно делать циклы:

Program GT; //Название программы может быть любым.

Label Metka; //Непосредственно само объявление оператора перехода
Begin //Начало кода
Metka: Showmessage(‘Goto’);
Showmessage(‘HI’);
Goto Metka; //Использование оператора перехода
exit; // Завершение программы
End;

Эта программа при запуске зациклится (цикл будет бесконечным). Но зацикливания можно избежать, использовав условный оператор IF.

В самом начале статьи говорится, что это оператор может нанести вред. Это действительно так: из-за использования большого числа меток, код становится менее понятным, значит могут быть ошибки в коде. Всего надо в меру!!!

На этом всё

 

Интересное

Забавное программирование...
Забавное программирование в DelphiПриведённый здесь материал можно озаглавить не иначе как «Чем заняться программисту, если нечего делать». На самом деле, Delphi настолько интересная среда,...
Подробнее...
Скрытая загрузка
Не для кого не секрет, что в наше время Интернет-странички просто переполнены различной графикой (баннеры, дизайн странички, графические счетчики) — без этого уже почти невозможно представить...
Подробнее...
Top 10 ошибок конфигурации...
Установить Linux/BSD — не проблема, инсталлятор все сделает за нас, а вот правильно настроить систему, чтобы ее тут же успешно не атаковали хакеры, удается далеко не каждому. Проанализировав...
Подробнее...
Windows 2003 на домашнем...
Последний представленный компанией Microsoft продукт — семейство Windows 2003 - является прямым продолжением Windows 2000. Эта система предназначена, в основном, для серверного, а не для домашнего...
Подробнее...
Smarty – не просто шаблоны
Скажем сразу, этот материал не будет вас учить пользоваться базовыми возможностями данной библиотеки. Напротив, я копну гораздо глубже. Цель этого материала взглянуть на шаблонизатор Smarty с...
Подробнее...
Firefox: Настройка RSS
Много слышал об RSS и даже несколько раз пытался пользоваться специальными программами для чтения. Но устанавливать дополнительное ПО не хочется, тем более что в Firefox есть встроенный клиент...
Подробнее...
Диски, разделы, буквы...
Вот, не кажется мне MS Windows такой дружественной, как утверждают её пользователи. Ничего удивительного, впрочем: сам я её пользователем практически не являюсь, и сталкиваюсь с ней...
Подробнее...
Обслуживание компьютеров
Выбор компании-аутсорсера. Рано или поздно, но каждая уважающая себя фирма сталкивается с необходимостью пригласить к сотрудничеству аутсорсинговую компанию. Ах, да. Необходимо пояснить, что это...
Подробнее...
Простое восстановление данных
Ниже описываются методы восстановления данных с исправных носителей, которыми можно овладеть за минимальное время, не обладая специальными знаниями в этой области.Случилось страшное:Совершенно...
Подробнее...
CSS дизайн: с учетом контекста
Веб-стандарты обещают нам улучшенную поддержку мультимедиа: возможность оптимизировать контент под возможности компьютерных экранов, портативных устройств, принтеров, проекторов, и подобных...
Подробнее...