Часть оператора if, начинает истинное предложение, выполняемое в случае истинности условия
unit
1 if Condition then Statement;
2 if Condition then Statement else Statement;
Описание
Ключевое слово 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