Squeak.ru - шаблоны программирования

Delphi 2006 правильное использование END

Посмотрите на этот код:

if Poruka(BM_UWARN, GetMsg('Da li zaista želite da odbijete nalog?')) = mrOk then
  begin
    tmps := TRN.ss;
    TrnPom.ss := TRN.ss;
    RadnikOdbio.l := AdresniSlog.Rabotnik;
    if Zakljucaj(1011, tmps, 3) then
      begin
        FRazlogOdbNal.ShowModal;
        case FRazlogOdbNal.ModalResult of
          mrOk:              
            BeBankComment.ss := FRazlogOdbNal.beRazlogOdbijanja.ss;              
          else
            Otkljucaj(1011, tmps, 3);
            exit;
        end;
      end;
   end;

Не важно, что делает этот код, мне нужна помощь, достаточно ли я использовал ENDs в этой части кода. Таким образом, первый END принадлежит оператору CASE. Второй END закрывает BEGIN из if Zakljucaj(1011,tmps,3), а последний END закрывает BEGIN из начального IF. Это правильный способ закрыть их, компилятор теперь, какой конец относится к какой части кода? А также знает ли компилятор, что часть else относится к оператору case? Если нет, есть ли способ сделать это явно?

if-statement case delphi delphi-2006
24.10.2017

  • Компилятор не будет жаловаться, если вы поставите лишний begin после оператора case .. else. 24.10.2017
  • Да, теперь вижу, спасибо. 24.10.2017
  • Правильный комментарий выше должен был быть дополнительным составным оператором begin/end после оператора else. Извините, если я не был ясен в этом вопросе. 24.10.2017
  • @LURD Я вас понял, но спасибо за объяснение, это может кому-то помочь. 24.10.2017

Ответы:


1

Ваш код синтаксически правильный. Однако отступ немного смещен, вы не должны делать отступ begin блока. Поведение по умолчанию автоматического форматирования Rad Studio состоит в том, чтобы выровнять их следующим образом:

if Poruka(BM_UWARN, GetMsg('Da li zaista želite da odbijete nalog?')) = mrOk then
begin
  tmps := TRN.ss;
  TrnPom.ss := TRN.ss;
  RadnikOdbio.l := AdresniSlog.Rabotnik;
  if Zakljucaj(1011, tmps, 3) then
  begin
    FRazlogOdbNal.ShowModal;
    case FRazlogOdbNal.ModalResult of
      mrOk:
        BeBankComment.ss := FRazlogOdbNal.beRazlogOdbijanja.ss;
    else
      Otkljucaj(1011, tmps, 3);
      exit;
    end;
  end;
end;

Остальное из того, что вы указываете в своем вопросе, верно.

24.10.2017
  • Хорошо, спасибо. Я был сбит с толку, если компилятор подумает, что часть else взята из оператора if, а не case. Спасибо еще раз. 24.10.2017
  • Нет, это не так, первый else после case будет его частью, если вы опустите здесь else, вместо этого компилятор встретит end и будет знать, что case закончился в этот момент. 24.10.2017
  • вы не должны делать отступ в начале блока - это как, по-вашему, чувак. 24.10.2017
  • Автоматическое форматирование Rad Studio выравнивает их следующим образом — форматирование настраивается и зависит от предпочтений пользователя. 24.10.2017
  • И в дополнение к тому, что сказал Реми, встроенный форматтер все еще имеет несколько ошибок и причуд, даже в n-й итерации. 25.10.2017
    • Новые материалы
    Угловая структура архитектуры
    Обратите внимание, что эта статья устарела, я решил создать новую с лучшей структурой и с учетом автономных компонентов: https://medium.com/@marekpanti/angular-standalone-architecture-b645edd0d54a..
    «Данные, которые большинство людей используют для обучения своих моделей искусственного интеллекта, поставляются со встроенным…
    Первоначально опубликовано HalkTalks: https://hacktown.com.br/blog/blog/os-dados-que-a-maioria-das-pessoas-usa-para-treinar-seus-modelos-de-inteligencia-artificial- ja-vem-com-um-vies-embutido/..
    Сильный ИИ против слабого ИИ: различия парадигм искусственного интеллекта
    В последние годы изучению и развитию искусственного интеллекта (ИИ) уделяется большое внимание и прогресс. Сильный ИИ и Слабый ИИ — две основные парадигмы в области искусственного интеллекта...
    Правильный способ добавить Firebase в ваш проект React с помощью React Hooks
    React + Firebase - это мощная комбинация для быстрого и безопасного создания приложений, от проверки концепции до массового производства. Раньше (знаете, несколько месяцев назад) добавление..
    Создайте API с помощью Python FastAPI
    Создание API с помощью Python становится очень простым при использовании пакета FastAPI. После установки и импорта вы можете создать приложение FastAPI и указать несколько конечных точек. Каждой..
    Веселье с прокси-сервером JavaScript
    Прокси-серверы JavaScript — это чистый сахар, если вы хотите создать некоторую общую логику в своих приложениях, чтобы облегчить себе жизнь. Вот один пример: Связь клиент-сервер Мы..
    Получить бесплатный хостинг для разработчиков | Разместите свой сайт за несколько шагов 🔥
    Статические веб-сайты — это веб-страницы с фиксированным содержанием и его постоянным содержанием. Но теперь статические сайты также обрабатывают динамические данные с помощью API и запросов...