if or else if

[celovec]

Покажите пожалуйста как это делается с case

[veniside]

> сравнивать не строки, а сумму кодов их символов

да, тоже вариант. Или контрольную сумму:

case (crc32(Edit1.Text)) of

  $D8932AAC: ; // hi
  $A79BF505: ; // opi
  $A47083A4: ; // open
  
end;

но это уже из серии квантовой оптимизации, для обычной лабы подойдёт пример с if .. else.

[pu4koff]

Сообщение от zumm

А вообще, если проверок достаточно много, то использовать удобнее все тот же case, только сравнивать не строки, а сумму кодов их символов. шанс на совпадение сумм в обычных условиях стремится к нулю.

Ага. И плевать нам на позиции символов. Что "код", что "док" - одно и то же. Ну и трудноуловимые баги выстроятся дружно вокруг этого кода.
Нормальные люди в случае большого числа проверок используют ассоциативные контейнеры/коллекции и иже с ними.

Назовите мне хоть один пример необходимости длинного case/if ... else if. Сравнение со строками - это в коде сравнение с магическими словами? С кучей магических слов? И наверняка эти слова будут по коду повторяться?

[eoln]

На счёт квантовых материй - инструкция case полностью идентична ...else if... и нужна программисту только для удобства при написании кода.

[evg_m]

if (edit1.text = 'hi') then begin
    ***
  end else 
if (edit1.text = 'орi') and (edit2.Text='kj') then begin
    ***
  end else 
  if (edit1.text = 'hi') or (edit1.text = 'open') then begin
    ***
end;

Возможно его можно как-то по другому оптимизировать?

В таком виде третья ветка

f (edit1.text = 'hi') or (edit1.text = 'open') then begin

НИКОДА не будет выполнена первое условие повторяет условие первой ветки. и все что могло бы быть здесь выполнено пойдет изначально по первому пути

if (edit1.text = 'hi') then begin

[celovec]

Спасибо большое всем. Вопрос решён.

evg_m, да, вы правы, просто неудачно привел пример.

[veniside]

> инструкция case полностью идентична ...else if

это в описании языка она идентична, а в скомпилированном виде разница там бывает весьма заметна )

> и нужна программисту только для удобства при написании кода

а компилятору для удобства оптимизации


> Назовите мне хоть один пример необходимости длинного case/if ... else if.

ну, например, на сервер приходит трехсимвольная команда от клиента. команд много, скажем, 1000.

[zumm]

Ага. И плевать нам на позиции символов. Что "код", что "док" - одно и то же. Ну и трудноуловимые баги выстроятся дружно вокруг этого кода.
Нормальные люди в случае большого числа проверок используют ассоциативные контейнеры/коллекции и иже с ними.

Никто не сказал что работает это всегда. Так просто один из шаманских способов для конкретной ситуации. А если уж и писать для большого числа проверок то вот так как то:

var
  array_control: array of string;

{
...
создать и заполнить массив словами для проверки, или сделать это еще в объявлении.
...
}

for i:=0 to length(array_control)-1 do
  if edit1.text=array_control[i] then
  begin
    case i of
      1: begin
        //логика
      end;
      2: begin
        //логика
      end;
  end;

или зафигачить вообще структуру с указателем на функцию которую нужно выполнить если проверка совпала, и тогда в этом цикле необходимость в case отпадает

[pu4koff]

Сообщение от veniside

ну, например, на сервер приходит трехсимвольная команда от клиента. команд много, скажем, 1000.

Не дай бог мне такое когда-то придётся поддерживать.
это минимум 1000 строк кода, которые вызывают нужные функции. Это получается функция/метод класса в тысячу строк... ужас...
Такое обычно реализуется посредством массивов или других коллекций. Нормальные люди не пишут 1000 case.
Даже некоторые оптимизаторы некоторых компиляторов некоторых языков умеют заменять case на отсортированный массив, что очень сильно ускоряет поиск нужной ветки программы.

[veniside]

> умеют заменять case на отсортированный массив

так это и есть задача компилятора, пусть думает, как лучше такой case замутить, массивом, коллекцией или ещё каким-то встроенным средством нового процессора, чё у программиста голова должна болеть? )

> получается функция/метод класса в тысячу строк... ужас...

если ужас красиво оформлен, имхо, ничё страшного )