String mit FileStream speichern

[Viktorii]

Hallo zusammen.

Ich möchte einfach einen String mit einem FileStream speichern.
So hab ich es gemacht:

Delphi-Quellcode:

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
    procedure FormCreate(Sender: TObject);
    procedure FormClose(Sender: TObject; var Action: TCloseAction);
  private
    FFileStream      : TFileStream;
  public

  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
  MyString        : String;
  LengthOfString  : Integer;

begin
  MyString := 'Hallo Welt' + #13#10;
  LengthOfString := Length(MyString);

  FFileStream.Write(MyString, LengthOfString);
end;

//------------------------------------------------------------------------------

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  FreeAndNil(FFileStream);
end;

//------------------------------------------------------------------------------

procedure TForm1.FormCreate(Sender: TObject);
begin
  FFileStream := TFileStream.Create('MyStream.txt', fmCreate, (fmShareDenyRead or fmShareDenyNone));
end;

//------------------------------------------------------------------------------

end.

Leider steh in meiner Text Datei nicht das gewünschte Ergebnis sonder diese Hex Wert:

C4 42 46 00 20 43 A1 00 04 F7 12 00

Was mache ich falsch?

Vielen Dank