Превращение короткой строки в число

[BDA]

Почитайте на досуге про порядок байтов.

[Kronos913]

Я теперь думаю: при переводе строки в число, оно получается перевернутым

И вот вопрос: как тогда лучше: переворачивать обратно, или нет

[Kronos913]

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

А так не пойдет?

uses StrUtils;
...
case AnsiIndexStr(AnsiUpperCase(RightStr(s, 4)), ['.JPG', '.BMP']) of
  0: ShowMessage('jpg');
  1: ShowMessage('bmp');
end;

А теперь у меня еще один вопрос к этому коду:

['.JPG', '.BMP']

- какого типа вот эта вещь?
Учитывая ее применение минимум в двух местах, хотел бы записать ее как константу

[BDA]

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

лучше: переворачивать обратно, или нет

Если использовать только для выбора действий в кейсе, то, по-моему, всё равно. Только добавить константы, чтобы код был понятнее:

const
  JPGType = $47504A2E;
  BMPType = $504D422E;
...
  case StrToLongWord(s) of
    JPGType: ShowMessage('jpg');
    BMPType: ShowMessage('bmp');
  end;

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

хотел бы записать ее как константу

Можно так:

const
  file_types: array[0..1] of string = ('.JPG', '.BMP');
...
  case AnsiIndexStr(AnsiUpperCase(RightStr(s, 4)), file_types) of
    0: ShowMessage('jpg');
    1: ShowMessage('bmp');
  end;

[Kronos913]

Я вот сейчас задумался, какой из вариантов кода лучше...

С одной стороны, через конвертирование в longWord более запутанно
И учитывая что там идет обращения к памяти - нет уверенности, что будет все норм работать на другом компе

А AnsiIndexStr - получается двойная проверка условий... В смысле сначала AnsiIndexStr проверяет что за строка, а потом кейс заново проверяет ее результат...

На счет "другого компа" - я замечал, что напрмер таймеры работают по разному на 10ке и на ХР

[BDA]

И в конце концов выигрывает цепочка if`ов

ext := AnsiUpperCase(ExtractFileExt(s));
if ext = '.BMP' then
    ShowMessage('bmp')
else if ext = '.JPG' then
    ShowMessage('jpg')
else
    ShowMessage('Unknown type ' + ext)

[Kronos913]

А вот теперь у меня вопрос, можно ли через asm сделать этот код еще оптимальнее?

[x128]

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

можно ли через asm сделать этот код еще оптимальнее?

Остается только спросить - для чего? чтобы что?

Во-первых, asm не гарантирует скорость. Во-вторых, есть смысл пытаться оптимизировать только высоконагруженный код.

Самые частые ошибки начинающих это - попытки преждевременной оптимизации, бессмысленной оптимизации и попытки оптимизировать код, который изначально не является лучшим решением.

Какая задача решается?
Код из первого сообщения понятен, но смысл этих действий от меня ускользает. Код из последнего сообщения оптимален по сути.