Hi,
im Prinzip mache ich das fast genauso, bei mir funktioniert's.
Allerdings, nun ja, nur fast:
Versuch mal:
dim st as new styledText
st.styledtext.RTFDATA=MyRTFString
MyTextArea.styledtext=st
Ciao,
Max
Am 14.03.2010 um 18:39 schrieb Stefan Mettenbrink:
> Ich möchte eine RTF-Datei öffnen und in einem TextArea anzeigen.
> StyledText habe ich angeschaltet, das Laden der RTF-Datei klapp auch. So
> sieht das bei mir aus:
>
> t=f.openAsTextFile
> if t<>nil then
> text=t.readAll
> if "{\rtf"=left(text,5) then
> editField1.StyledText.RTFData=text
> else
> editField1.text=text
> end
> t.close
> else
> editField1.text=""
> end
>
> Leider bekomme ich ein leeres Feld und nicht den gewünschten Text.
>
> Bei Google finde ich eine passende Frage im deutschen RB-Forum
> (24.01.2010, 23:49) aber dort gab es leider keine Antwort.
>
> Ich hoffe hier auf mehr Erfolg.
>
> MfG, Metti.
>
Maximilian Tyrtania
maximilian.tyrta...@onlinehome.de
