[AleXXXSC]

Дано: D7, Win XP SP3,бинарный файл.
В файле по определенным и заранее известным смещениям хранятся строки. Под строку в файле отведено 32 байта, причем если строка короче 32 символов - строка дополнена #00 до нужной длины. Следом идет уже другая информация с любым hex кодом.

Необходимо получить эту строку для дальнейшей работы с ней. Сейчас выполнено так.
Пример бинарного файла(начало):

Код:

04h 01h 00h 00h НУЖНАЯ СТРОКА ИЗ 32 БАЙТ 00h 00h 00h 00h 00h 00h 00h 00h XXh XXh.....

Программный код:

Код:

.........
Var
MS: TMemoryStream;
binRowsCount: integer;
TC : record
  Name      : String[33];
  ......
end;
begin
MS:=TMemoryStream.Create; 
MS.LoadFromFile(Path);

MS.Read(binRowsCount,4); //чтение 4 байт, указатель смещается на 4;
TC.Name:=''; // хочу обнулить т.к. там абракадабра по умолчанию 
MS.ReadBuffer(TC.Name,32); //собственно чтение этой 32-байтной строки
TC.Name[32]:= #00; //сделать нуль-терминированную строку т.к. мало ли что там в конце осталось
........
end

.

В релультате имеем:
TC.Name=УЖНАЯ СТРОКА ИЗ 32 БАЙТ||||||||| ,
где 1-й символ (Н) отсутствует, а строка дополнена непечатными символами (|).

Подскажите, пожалуйста, что не правлильно я делаю.

[lmikle]

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

Подскажите, пожалуйста, что не правлильно я делаю.

Код:

var
  MS : TMemoryStream;
  pS : PChar;
  S : String;
  Stub : DWORD;
begin
  ...
  MS.ReadBuffer(Stub,4);

  GetMem(pS,33);
  MS.readBuffer(pS^,32);
  S := StrPas(pS);
  FreeMem(pS,33);
  ...

как-то так. С крышкой (^) надо проверить - нужна ли она...

[AleXXXSC]

Пробедил
Вместо

Код:

TC : record
  Name      : String[33];
  .....

Написал

Код:

TC : record
  Name    : array[0..32] of char;
  .....

Ассемблерный дебаг показал что хитрые строки в дельфи хранят еще и длину строки перед началом 1-го символа. Поскольку Name была объявлена как 33 символа, то для длины строки, видимо, хватило 1 байта. Похоже что 1-й символ поэтому и пропал, что начал обозначать длину строки. Это же и подтвердила операция

Код:

 S:=TC.Name+'' ;

когда при создании строки S было выделено количествро байтов равным коду 1-го символа. Видимо против всяких Stack overflow сдалали

P.S. Тему можно закрывать, за ответ спасибо.