Also, so sichere ich aus einer TextArea
dim f as folderitem dim o as textoutputstream f=GetSaveFolderItem(FileTypes.Rtf,FileName) Document=f o=TextOutputStream.Create(Document) Document.MacType="RTF" o.Write txt.StyledText.RTFData o.close und so lade ich es zurück: Dim f as folderitem dim inp as TextInputStream dlg.filter="application/rtf;text" dlg.Title="Wähle ein Textdokument" dlg.initialDirectory=Briefvorlagen_Ordner f=dlg.showModal() inp=TextInputStream.open(f) txt.StyledText.RTFData=inp.ReadAll Document=f da kann man ja eigentlich nix falsch machen, wie gesagt eine LEERZEILE vor dem ersten Buchstaben verschwindet beim Laden Gruß Stefan > > Beides geht bei mir... > > a. > > > On 26.01.11 15:52, "Stefan Mettenbrink" <[email protected]> wrote: > >> Andy Fuchs wrote: >> >>> Nutzt aber nix, weil's bei mir ohne Probleme funktioniert. Mit und ohne >>> Leerzeichen am Anfang. >> >> Leerzeilen, nicht Leerzeichen. >> >> MfG, Metti. >> > > >
