Einzelnen Beitrag anzeigen

Benutzerbild von Pr0g
Pr0g

Registriert seit: 21. Mai 2004
809 Beiträge
 
Delphi 7 Personal
 
#8

Re: SynEdit: Textfarbe an bestimmter Stelle herausfinden

  Alt 17. Mär 2005, 14:02
Du könntest den Code in einen Stream speichern und daraus laden, hier ein Beispiel:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
  fStream: TMemoryStream; //Stream zum Zwischenspeichern
begin
  //Code in Exporter laden
  SynExporterRTF1.ExportAll(SynEdit1.Lines);
  //Streaminstanz erzeugen
  fStream := TMemoryStream.Create;
  try
    //RTF Text/Code in Stream speichern
    SynExporterRTF1.SaveToStream(fStream);
    //an den Anfang des Stream gehen
    fStream.Position := 0;
    //dann wieder in das RichEdit laden
    RichEdit1.Lines.LoadFromStream(fStream);
  finally
    //und Stream wieder freigeben
    fStream.Free;
  end;
end;
Dem Exporter muss natürlich ein Highlighter zugewiesen werden, damit die Formatierungen übernommen werden.

Edit: Wofür brauchst du das eigentlich?
  Mit Zitat antworten Zitat