[Drozh]

Попробуй писать в файл примерно вот так

Код:

 AssignFile(F,'C:\file.txt');
 Rewrite(f);
  for i := 0 to name_g_I do
  begin
    for j := 0 to name_g_J do
     Write(f, name_g[i, j]+';');
   Writeln(f, '');
  end;

 CloseFile(f);

Где name_g_I и name_g_J - число записанных столбцов и строк в массиве