Styledtext als Unicode sichern

[Stefan Sicurella]

Hallo,

wie sichere ich denn ein stylededitfield als Unicode? ich dachte RB  
macht das sowieso, jetzt stellt sich heraus, dass er in macroman sichert

code:
  dim f as folderitem
  dim o as textoutputstream

  if Document = nil or DisplaySaveDialog then
    f=GetSaveFolderItem("text",FileName)
    if f <> nil then
      Title=f.Name
      Document=f
    end if
  end if
  if Document <> nil then
    Document.SaveStyledEditField Txt
    TextHasChanged=False
  end if



Gruß

Stefan