Справочник функций и процедур Delphi: Then

  Навигация по первой букве:

A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z

  Навигация по категории:

Compiler directives, Directives, Keywords / Types, Variables, Constants / Functions, Procedures

  Реклама:

|  Оформление воздушными шарами свадьба www.floraevent.ru.  |

Then
Ключевое слово
Часть оператора if, начинает истинное предложение, выполняемое в случае истинности условия unit
  
1 if Condition then Statement;

2 if Condition then Statement else Statement;

Google  
 
Описание
Ключевое слово Then является частью условного оператора If. Оно используется для начала раздела кода, который выполняется, если условие (condition) истинно.

Есть две формы оператора If - один с Else, другой без.

If работает следующим образом:

Если условие истинно, то выполняется первая инструкция. Если ложно, то эта инструкция обходится. Если есть пункт Else, то он выполняется он.

Во всех случаях, когда Statement больше одной инструкции, оно должно заключаться в блок begin/end.
Примечания
Просто сделать ошибку, но Delphi настаивает не ставить ';' после инструкции then, если дальше следует инструкция else.
Похожие команды
Else  Начинает ложный раздел if, case и try операторов

End  Ключевое слово, которое заканчивает операторные блоки

If  Начинает условное выражение, чтобы решить, что делать далее

 
Пример кода : Иллюстрация различных использований предложения then
begin
  // Иллюстрация простого условного оператора if, который выполняет истину
  if True Then ShowMessage('True!');

  // Иллюстрация того же самого, но с множественными действиями
  if 1 = 1 Then
  begin
    ShowMessage('Мы теперь имеем');
    ShowMessage('множественные строки');
  end;

  // Иллюстрация простого условного оператора if, который терпит неудачу
  if 1 = 2 Then ShowMessage('1 = 2');

  // Иллюстрация инструкции if then else
  // Обратите внимание на недостаток ';' после предложения 'then'
  if False
  Then ShowMessage('True')
  else ShowMessage('False');

  // Вложенные условные операторы - Delphi заметно управляют ассоциациями
  if true Then
    if false Then
      ShowMessage('Inner then satisfied')
    else
      ShowMessage('Inner else satisfied')
  else
    ShowMessage('Outer else satisfied')
end;
True!
Мы теперь имеем
множественные строки
False
Inner else satisfied
 


Copyright © 2004-2016 Delphi Sources (источник – "DelphiBasics.ru")
 


Группа ВКонтакте   Ссылка на Twitter   Группа на Facebook