캐리어입니다.

TMemoryStream을 이용하는 방법을 스스로 해결했습니다.
아래와 같이 해결한 방법을 올리오니 필요하신분들은 보시고
업그레이드하여 Mail을 주시면 감사하겠습니다.
(일단은 사용상에는 문제가 없습니다.)

    imageView: TImage;

var chrData : array[0..1023] of char;
    DtStream: array[0..255]  of TMemoryStream;

procedure TForm1.FormCreate(Sender: TObject);
var i: integer;
begin
  for i:= 0 to 255 do DtStream[i] := TMemoryStream.Create;
end;

procedure TForm1.FormDestroy(Sender: TObject);
var i: integer;
begin
  for i:= 0 to 255 do DtStream[i].Free;
end;

procedure TForm1.SaveCharDataToStream(no:integer);
var i: integer;
begin
  DtStream[no].Clear; // DtStream[no]의 데이터를 모두 지우기.

  for i:=0 to 1023
  do DtStream[no].Write(chrData[i], 1);
  // "1"chrData[i]의 갯수. char이므로 "1"로 함.
        
  formMain.DtStream[no].Position := 0;
  // 스트림을 사용하고 나서는 항상 초기화가 필요함.
end;

procedure TForm1.ImageViewPlay(no: integer);
var tstBitmap: TBitmap;
begin
  if not(DtStream[no].Size = 0) then
  begin
    tstBitmap := TBitmap.Create;
    tstBitmap.LoadFromStream(DtStream[no]);
    DtStream[no].Position := 0;
    // 스트림을 사용하고 나서
    //다음에 사용하기 위해서는 항상 초기화가 필요함.
    imageView.Picture.Assign(tstBitmap);
    tstBitmap.Free;
  end;
end;

이상 끝입니다.

저와 같은 고생하신분이나 고생하신분께서는 참조하시기 바랍니다.

부천에서 캐리어 였습니다.