Длина строки через asm

[Kronos913]

Такой код выдаёт ошибку
Я знаю, что первая и последняя строки лишние, но как угодно пытался понять в чем проблема

Function ggg1(s:string):LongWord;
asm
  mov eax, s

  call lstrlen

  mov result, eax
end;

При этом такой код рабочий

Function ggg(s:string):LongWord;
begin
  length(s);
  asm
    mov result, eax
  end;
end;

И выдаёт он примерно такой же код

Вопрос: как тогда из asm вызвать функцию длины строки?

[p51x]

Т.е. вы думаете @ для украшения в асме используется?

[Kronos913]

Добавил @ - компилятор ошибку выдаёт

[Kronos913]

Function ggg1(s:string):LongWord;
asm
  mov eax, s

  call @LStrLen

  mov result, eax
end;

Компилятор выдаёт ошибку на строке call @LStrLen

[p51x]

system.@LStrLen

[macomics]

Раз уж пытаетесь делать на asm, тогда проще посчитать длину вручную. Хотя внутренний формат String может хранить длину без необходимости проверки символа терминатора. Тогда вызов будет эффективнее.

[p51x]

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

Хотя внутренний формат String может хранить длину без необходимости проверки символа терминатора.

В Delphi и хранит.

[macomics]

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

В Delphi и хранит.

А вот Lazarus считает для AnsiString. И сохраняет для WideString.
Наверное исходят из логики, кто AnsiString обычно не превышают 255, а вот WideString содержат длинные тексты. Или из-за использования UTF8.

[p51x]

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

А вот Lazarus считает для AnsiString.

Lazarus использует FPC и, судя по вики, не считает.