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


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


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


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

И в 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.

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

На этом всё

 

Интересное

Обзор ОС Windows Server...
Сервер Windows Server 2003 Datacenter Edition разработан специально для удовлетворения потребностей бизнеса в высокой масштабируемости, доступности и надежности и позволяет создавать...
Подробнее...
Динамика украинских...
Первое полугодие 2007 характеризуется позитивной динамикой развития домена .UA – сообщает администратор домена .UA ООО «Хостмастер». За период с 01.01.07 по 01.07.07 количество...
Подробнее...
Форум без базы данных за...
Loser рассказывает как можно написать свой форум не используя никаких баз данныхЭтой статьей я хочу показать, что можно обойтись без баз данных, написав неплохой форум. Это статья является как бы...
Подробнее...
Счетчик посещений на Delphi
Счетчики предназначены для учета количества посетителей на Ваш сайт. Кроме этого на счетчик можно возложить операции ведения статистики, учет хостов откуда пришли посетители и т.д.Данный пример...
Подробнее...
Delphi - начало
В данной статье я постараюсь дать некоторые основы языка программирования Delphi, сразу же скажу, что изучить язык программирования невозможно изучить по одной статье, и даже по одной книге, для...
Подробнее...
Чем плохи новые видеокамеры
Обычно от того, что пленочные кассеты становятся достоянием истории, потребитель только выигрывает. Так было, к примеру, когда DVD-плееры пришли на смену кассетным видеомагнитофонам. Но с...
Подробнее...
Учимся работать с DelphiX
Говоря техническим языком, DirectX — набор объектов COM (Component Object Model), которые реализуют интерфейсы для облегчения работы с видеоаппаратурой, звуком, межкомпьютерными соединениями и...
Подробнее...
Управление правами на...
Управление правами на доступ к данным (Information Rights Management,IRM) представляет собой стойкую технологию защиты информации на уровнефайлов. Она помогает защищать представленную в цифровом...
Подробнее...

Продукт "1С: Бухгалтерия 8 КОРП". Что это такое и для чего он нужен? Бухгалтера строго соблюдают порядок ведения хозяйственной деятельности предприятия. Прошли времена, когда нелегкий труд...
Подробнее...
Пишим на .Net Framework
Доброго времяни суток, вам. Сейчас мы обсудим интересную тему для Win С++ программиста, а именно возможность и актуальность использования платформы .NET Framework. До сих пор не умолкают споры...
Подробнее...