Платные хостинги     Раскрутка сайта     Книги по программированию

Как выйти из for цикла?

- Думал, что смогу отделаться через last, так не получилось

- break

- Exit совершает ничто иное как безусловный переход в конец процедуры (jmp end;) т.е. выход из неё.Код procedure TForm1.Button1Click(Sender: TObject);begin  Exit;  ShowMessage ('This will never happen!');end;highlightSyntax('delphiDBhMmE','delphi');

- Если вызов Exit производится внутри цикла, то компилятор автоматически сначала подставляет Break.Если вызов Exit идёт и блока try .. finally .. end то компилятор автоматически подставляет AbortТак что не всё так безусловно.

- Буду знать...а переход и в том и в другом случае делается безусловный

- procedure TForm1.Button1Click(Sender: TObject);begin  while true do  begin    ShowMessage ('Test');    Exit;  end;  ShowMessage ('This will never happen');end;А какая разница? Попробуй вместо Exit поставить break... Exit - это выход из процедуры без каких либо подставлений... Как проверить? смотрим код: jmp +$0aА куда это мы прыгаем? правильно, прямо на ret в обход последней функции...Так что все таки это безусловный выход из процедуры.

- Нет, здесь вызов выхода из текущей обработки и выход обрабатывается одноврменно, через стёк т.е. через трассировку или подставкой чего-нить в код Вы не проверите, поэтому придется мне поверить на слово  , т.е. на самом деле Break выполняется однако управление на ShowMessage() не передастся, так запрограммировано.

- Вобщем, так или иначе, если мы хотим, чтобы все, что идет после цикла выполнилось Exit никак не подходит

- Вообще Паскаль задумывался как строгий, структурный язык. Соответственно, всякие вольности типа выхода из процедуры в любой точке и произвольное прекращение цикла в нем не допускаются... В Дельфях можт уже все испортили, не знаю... А вообще в данном случае классика - замена for на while. Еще можно попробовать принудительно переменную цикла увеличить до верхней границы. На крайняк goto...

- 1) Exit и Break появились в Turbo Pascal (не то в 6.0, не то в 7.0)2) На чистом Паскале можно программировать наверное лишь чистую математику, да простейшие cgi. В связи с полным отсутствием интерфейса, экспорта функций, объектов и т.п. использование чистого классического Паскаля практически невозможно.3) В настоящее время существует лишь одна распространённая реализация Паскаль сделанная Борландом (только не надо говорить что есть еще много - есть то они есть, да пользователей их пренебрежительно мало), следовательно стандарт  Паскаля De Facto определяют версии от Borland (точно так же как Basic определяется MS)

- 2 Ampersand, вообщето break (выход из цикла) и exit (выход из процедуры/функции) идут из старого доброго паскаля и я рад, что никто ничего НЕ испортил и НЕ выкинул их из Object Pascal. И давайте не будем вспоминать про goto

- Нет, не идут! В спецификации Паскаля их нет. Они появились, как я уже говорил, в Tp6 (это примерно 1993 год), до этого их ни в одной реализации вообще не было. А так называемый Object Pascal появился примерно тогда-же в том же TP6 c появлением Turbo Vision, ни в стандарте Паскаля, ни в одной реализации Паскаля до того никаких объектов вообще не было. Добавление объектов и разработка спецификации Object Pascal целиком заслуга Борланд, другие реализации Object Pascal появились только лет через 5 после Object Pascal от Борланд и практически базировались на последнем.

- Моя версия Tp7Ну уж никак не <=Tp5 :-)

- Это точно, в TP5.5 абсолютно точно не было ни объектов, ни exit, ни break (только Halt был для любителей )

Интернет казино     Онлайн игры     Увеличение члена     Купить DVD