Получение одной строки из двух (функция подобная IIF в Foxpro)

Delphi , Синтаксис , Текст и Строки

Автор: Юрий
WEB-сайт: http://delphibase.endimus.com

{ **** UBPFD *********** by delphibase.endimus.com ****
>> 
Функция подобная IIF в Foxpro возвращает одно из двух значений

Зависимости: нет
Автор:       Юрий, kynnew@pisem.net, Могилев
Copyright:   собственная
Дата:        26 апреля 2002 г.
***************************************************** }

// возвращает строку

function IIFStr(Expr: Boolean; Par1, Par2: string): string;
begin
  if Expr then
    Result := Par1
  else
    Result := Par2;
end;

Пример использования:

a = 5
IIFStr(a <> 0; 'Первая строка', 'Вторая строка'): string;
Result = Первая строка;

Функция IIFStr в Delphi - простой, но полезный инструмент, который возвращает один из двух строк на основе логического выражения. Вот разбор кода:

function IIFStr(Expr: Boolean; Par1, Par2: string): string;
begin
  if Expr then
    Result := Par1
  else
    Result := Par2;
end;

Функция принимает три параметра:

• Expr: логическое выражение, определяющее, какая строка будет возвращена
• Par1 и Par2: две строки для выбора

Функция использует оператор if, чтобы оценить параметр Expr. Если он истинен, функция устанавливает переменную Result в значение Par1. В противном случае она устанавливает переменную Result в значение Par2.

В примере использования можно увидеть, как функция используется:

a := 5;
IIFStr(a <> 0, 'Первая строка', 'Вторая строка'): string; // Result = 'Первая строка'

В этом примере функция IIFStr вызывается с тремя параметрами: a <> 0, 'Первая строка' и 'Вторая строка'. Параметр Expr оценивается в истину, потому что a не равно нулю. Поэтому функция возвращает первую строку, 'Первая строка'.

В целом, эта функция - удобный способ упрощать логическое условие в вашем коде Delphi.

Кстати, сайт автора delphibase.endimus.com больше не активен. Однако функция IIFStr остается полезным инструментом для разработчиков Delphi.

Функция IIFStr возвращает одну из двух строковых переменных,depending on the boolean expression, аналогично функции IIF в Foxpro.

Комментарии и вопросы

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

:: Главная :: Текст и Строки ::