[Stalker2-42]

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

Если в файл надо писать в файл только один массив, то просто пиши его в цикле через writeln(). Читать - через readln() пока файл не кончился.

А по другому никак?

А если так?

Код:

var
  SizeMas : integer = 0;
  str : string;
for I := Low(MasivM) to High(MasivM) do
    begin
      SetFilePointerEx(blabla, SizeMas, nil, FILE_END);
      str := MasivM[i];
      SizeMas := SizeOf(char)* Length(MasivM[i]);
      WriteFile(blabla, str[1], SizeMas, dwWrite, nil);
      
    end;