[Resolvido] Alterar memory stream

Bom dia amigos,

Queria saber como posso alterar uma string em um memory stream, segue meu código,

ele escreve porem fica tudo em simbolos.

procedure TForm1.BitBtn1Click(Sender: TObject);
var

 MyStream: TMemoryStream;
 C: string;
 Cont: integer;

 MyStream := TMemoryStream.Create;

 MyStream.Clear;
 try
 MyStream.LoadFromFile(GetCurrentDir()+'\game.exe');

 C := 'BBBBBBBBBBBBBBBB';

 MyStream.Position := 1388135;
 MyStream.WriteBuffer(C, Length(C));

 MyStream.SaveToFile(GetCurrentDir()+'\game2.exe');
 finally
 MyStream.Free;
 end;
end;

Grato.