Несколько вопросов про строки

[northener]

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

Не стоит играться с этими объектами на asm.

Полностью подтверждаю.

[Kronos913]

Не стоит играться с этими объектами на asm

Вот наверное, из-за этого пришел к такому коду

Предназначение кода: когда в exe-шнике много string-констант, там уже на несколько килобайт начинает накапливаться сумма разделителей между ними. Там же по 12 байт разделители занимают.

Пришла идея - соединить все в одну большую строку-константу, мини-строки разделять символом #1, все равно он нигде не используется (#13#10 в некоторых строках применяются) и такой вот процедурой извлекать оттуда нужную строку

type
  pString=^string;

Function StringFromConst(s:pstring; Index1:byte):string; register
asm
  push ebx
  push edi

  mov eax, [eax]
  push ecx

  mov edi, eax
  mov bl, Index1

  @Begin1:
    mov bh, [edi]
    inc edi
    cmp bh, 1
      jne @Begin1
    dec bl
    cmp bl, 0
      ja @Begin1
  {End1}
  mov edx, edi
  sub edx, eax
  inc edx

  mov ecx, 0
  @Begin2:
    mov bh, [edi]
    cmp bh, 1
      je @End2
    inc edi
    inc ecx
    jmp @Begin2

  @End2:
  call system.@LStrCopy
  
  pop edi
  pop ebx
end;

[northener]

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

Предназначение кода: когда в exe-шнике много string-констант, там уже на несколько килобайт начинает накапливаться сумма разделителей между ними. Там же по 12 байт разделители занимают.

Пришла идея - соединить все в одну большую строку-константу, мини-строки разделять символом #1, все равно он нигде не используется (#13#10 в некоторых строках применяются) и такой вот процедурой извлекать оттуда нужную строку

Пожалуйста не обижайтесь, но это бред сивой кобылы в тёмную мартовскую ночь. Хотя вы и не кобыла, да и на дворе сентябрь, а не март. О каких килобайтах идёт речь? Если все современные полнофункциональные программы в самом минимальном случае мегабайтные!

[macomics]

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

Function StringFromConst(s:pstring; Index1:byte):string; register ...

Лучше не надо. Этот код сильно не идеален, чтобы им подменять функции разделения. Вы как минимум задали цикл с 7 командами. Они будут очень сильно нагружать дешифратор. Куда оптимальнее было бы использование хотя бы строковых инструкций или вообще многобайтового поиска на sse3+. Но этот ваш код содержит множество инструкций, которые просто будут грузить почем зря CPU, но эффекта оптимизации будет 0.

Если так хочется использовать строки, тогда используйте PChar/PAnsiChar/PWideChar - у них нету лишней информации. Только символы строки и 0 в конце. Все строки PChar не будут разделяться дополнительной информацией. А поиск нужной строки будет не нужен - просто объедините в массив и используйте индексацию.