Einzelnen Beitrag anzeigen

frieder2008

Registriert seit: 28. Feb 2009
78 Beiträge
 
#2

AW: TRichedit: Beim Laden aus rtf-Datei bleibt trotz plaintext=false RTF-Code sichtba

  Alt 20. Sep 2011, 13:12
Ok, ich habe es nach langer Suche herausbekommen: Wenn ich

Delphi-Quellcode:
Procedure RTFAusgabe(liste: tstringlist);
var
  MyMS: TMemoryStream;
begin
  MyMS := TMemoryStream.Create;
  try
    liste.SaveToStream(MyMS);
    MyMS.Seek(soFromBeginning,0);
    form1.rtf1.plaintext:= false;
    form1.rtf1.Lines.LoadFromStream(MyMS);
  finally
    MyMS.Free;
  end;
end;
durch
Delphi-Quellcode:
  rtf1.PlainText:= true;
  rtf1.Text:= liste.text;
  rtf1.PlainText:= false;
ersetze, geht es - und ist dazu noch viel einfacher.. Toll..

Geändert von frieder2008 (20. Sep 2011 um 13:33 Uhr)
  Mit Zitat antworten Zitat