Agregar archivos en un TFileStream

[Ramsay]

Hola , estoy estudiando TFileStream , estoy tratando de agregar dos ejecutables o archivos cualquiera en un TFileStream que crea un ejecutable final , el tema es que no encuentro documentacion sobre como hacer el agregado de un archivo en un TFileStream.

Código Delphi [-]
procedure TFormulario.CrearArchivoStream;
var
  F: TFileStream;
  s: String;
  archivo1,archivo2:string;

begin
  archivo1 := 'test1.exe';
  archivo2 := 'test1.exe';
  F := TFileStream.Create( ExtractFilePath( Application.ExeName ) + 'prueba.exe', fmCreate );
  s := 'Añadiendo información al archivo de texto.' + #13 + #10;
  F.Write( s[1], Length( s ) );
  F.Free;
end;

¿ Como se podria hacer ?