procedure TForm1.Button1Click(Sender: TObject);
var
  Stream : tmemorystream;
  Stream2: tmemorystream;

  buf2     :TByteArray;

begin
  Stream :=TMemoryStream.Create;
  Stream.LoadFromFile('C:\test.txt');
  Stream.Position := 0;

 

  //Stream to byte
  SetLength(buf2, Stream.Size);
  Stream.Read(buf2[0], Stream.Size);
  FreeAndNil(Stream);

 

  //byte to Stream
  Stream2 := TMemoryStream.Create;
  Stream2.Write(buf2[0],Length(buf2));
  Stream2.SaveToFile('C:\test2.txt');
  FreeAndNil(Stream2);

end;

 

*** eğer indy10 da TCP nesnesi ile byte veri gönderecekiseniz uses 'a  IdGlobal  ekleyin ve buf2     :TByteArray;  değişkenini buf2     :TBytes;  olarak değiştirin.

IdTCPClient1.IOHandler.WriteDirect(buf2);