Einzelnen Beitrag anzeigen

Benutzerbild von Piro
Piro

Registriert seit: 14. Jul 2003
Ort: Flintbek
810 Beiträge
 
Delphi XE2 Professional
 
#1

Richedit -> ListView Eintrag -> Richedit

  Alt 15. Feb 2007, 16:42
Guten Tag,

Ist es möglich einen Inhalt eines Richedits mit kompletter Formatierung in ein Listvieweintrag zu schreiben und dann später, bei Bedarf, wieder zurück ins Richedit zu schreiben mit Beibehaltung der Textformatierung?

Folgendes habe ich schon hinbekommen:
1. Richedit -> Listview
Delphi-Quellcode:
...
function RichTextToStream(re: TRichEdit): String;
var
  ss: TStringStream;
begin
  ss := TStringStream.Create ('');
  try
    re.Lines.SaveToStream(ss);
    Result := ss.DataString;
  finally
    ss.Free;
  end;
end;
...
Was ich nicht hinbekommen, ist der Weg zurück, d.h. direkt vom Listvieweintrag ins Richedit.
Der Umweg über eine Datei funktioniert. Erst abspeichern aus Listview und dann per LoadFromFile ins Richedit.
Würde aber gerne den Weg über die Datei einsparen und direkt hinein schreiben natürlich ohne Verlust der Textformatierung.

Gruß, Sven
  Mit Zitat antworten Zitat