Hallo DF-ler,
ich habe folgendes Problem, das ich trotz langer Suche in mehreren Foren und Onkel Google nicht lösen kann:
Ich nutze die Jedi-Komponente TJvRichEdit und speichere Bilder im RichEdit ab.
Die Bilder können im RichEdit manuell vom User skaliert werden.
Jedoch muss ich beim speichern des RichEdits unbedingt den Text von dem Bild trennen (ggf. HTML-Tag, Dateiname oder ähnliches "Erkennungsmerkmal" an die Stelle des Bildes im text setzen).
Der Text an sich ist RTF-Formatiert, ich kann also nicht einfach bei Eingabe eine simple "Kopie" des Textes in eine string-Variable machen (wäre ja naheliegend).
Habe ich irgendeine Möglichkeit die Grafik im RichEdit zu erkennen/finden/suchen?
Falls es euch etwas hilft... so wird das Bild in die RichEdit geladen:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
| procedure TForm1.openpicture(Sender: TObject);
begin
OpenDialog1.Execute;
end;
procedure TForm1.addgraphic(Sender: TObject; var CanClose: Boolean);
var Picture:TPicture;
begin
Picture := TPicture.Create;
Picture.LoadFromFile(OpenDialog1.FileName);
RichEdit1.InsertGraphic(Picture.Graphic,true);
end; |
Gruß Sven
