Читаю в память файл размером 13 М(файл текстовый). Память выделяю, все ОК.
Если сохранить прочитанное в другой файл, то 1:1. Но если получить размер считанной переменной(StrLen), то показывает, что только 9 М. Подскажите плиз, чаво я проморгал.
Var FS:TFileStream;
FS:= TFileStream.Create('...', fmShareDenyNone);
iFileLength := FS.Size;// 13 M
st := PChar(AllocMem(iFileLength+1));// 13 M
FS.Read(st^, iFileLength);// Счиатл 13 М
Showmessage(InttoStr(StrLen(st)));// 9 М
FS.Free;
freemem(st);

Спасибо, разобрался, не хватает буфера(или глючит дельфя). Зачитал файл по 512 kb, все ОК