Hallo Delphi-PRAXIS-Gemeinde,
auch wenn dieses Thema schon ein paar Tage alt ist, habe ich ein Problem, was hierzu passt:
Mein Ziel:
Ich möchte ein Dokument per Delphi erstellen, was ich in einer RTF-Datei speichern und später wieder aufrufen/bearbeiten kann. Dazu verwende ich RichEdit. Die Speicherung und Öffnung stellt kein Problem dar. Das Dokument soll aber ein bestimmtes Layout haben, welches ich mit Labels & Edit ergänzen möchte. Auch hier ist soweit kein Problem.
Nun möchte ich aber im RichEdit selbst den Text noch formatieren können. Auch dies stellt eigentlich kein Problem dar, solang ich nicht das erste Wort in der RichText-Box formatiere. Sobald ich dies mache, werden auch die Texte aus den Edit & Labels entsprechend formatiert. Ich vermute, ich habe irgendwo nur einen kleinen Denkfehler, leider finde ich ihn nicht
Zum besseren Verständnis habe ich einmal Screenshots und den Quelltext dazu angefügt.
Über etwas Hilfe wäre ich sehr dankbar.
LG Micha
Hier der Quelltext zum Speichern:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
RichEdit1.Lines.BeginUpdate;
RichEdit1.Lines.Insert(0, Label1.Caption + ' ' + Edit1.Text);
RichEdit1.Lines.Insert(1, Label2.Caption + ' ' + Edit2.Text);
RichEdit1.Lines.Insert(2, '');
RichEdit1.Lines.SaveToFile('D:\richedit-datei.rtf');
RichEdit1.Lines.EndUpdate;
end;
So formatiere ich den Text im RichEdit:
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
begin
RichEdit1.SelAttributes.Style := [fsBold];
end;