неверный формат при записи потока в файл

[Владимир1988]

Подскажите пожалуйста, какой нужен формат, чтобы поток нормально читался в тестовом файле. Во вложении скриншот файла.

unit TEST1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, ToolWin, ComCtrls, ActnMan, ActnCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
   private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;
  i:integer;
  n: array[1..10] of integer;
  k: array[1..10] of string;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
  p: TStream;
  begin
   for i:= 1 to 10 do //заполним массив
    n[i]:= (i)*(2);
    for i:=1 to 10 do
    k[i]:=inttostr(n[i]);
      p := TFileStream.Create('D:\тест\file34.txt', fmCreate or fmOpenRead or fmOpenWrite);
       try
         p.Seek(0,soBeginning);
         p.WriteBuffer(k[low(k)], Length(k)* SizeOf(integer));
         //p.writebuffer(n[1],Length(n)*sizeof(integer));
       finally
    p.Free;
  end;
end;

end.

[Скандербег]

Применяя поток (stream) мы никогда не получим текстового представления чисел. Поток пишет в файл числа так как они расположены в памяти. Здесь что важнее: читать записанные числа в виде текста или применение потока.

[Владимир1988]

Здесь обязательно применение потока, но нужно куда нибудь выводить данный поток для проверки того , что мы туда записали

[Скандербег]

Сразу не заметил, но вот эта конструкция совсем не корректная:

p.WriteBuffer(k[low(k)], Length(k)* SizeOf(integer));

В k хранятся строки, а строки представляющие числа, в общем случае переменной длины и применять к ним SizeOf(integer) для определения их размера за пределами разумного.
Массив n отправляется в поток, а массив k можно отправлять, например, в Memo или StringList (в этих случаях применяется цикл), чтобы записать его затем в отдельный файл. Из него и читать.
Приоритеты задачи не понятны, что в итоге нужно на самом деле.

[Владимир1988]

У меня есть массив, состоящий из целых отрицательных и положительных чисел. Этот массив я записываю в поток.
И для контроля того, что я записываю в поток, необходимо его просмотреть: или записать в текстовый файл или вывести в Memo.

[Владимир1988]

Но просмотреть нужно именно поток а не массив