Bild aus RTF-Text extrahieren

[skoschke]

Hallo,

hat jemand einen Ansatz, wie man ein Bild aus einem RTF-String extrahieren kann?

Der sieht in etwa (gekürzt) so aus:

Delphi-Quellcode:

{\rtf1\ansi \deff0{\fonttbl{\f0\fswiss Arial;}}{\colortbl;\red0\green0\blue0;\red255\green255\blue255;}\deftab1134\plain \f0 \fs20 \pard\qr \ri50  {\pict\wmetafile8\picw5508\pich10399\picwgoal3120\pichgoal5895\picscalex77\picscaley77 010009000003de60120000009ff700000000050000000701030000009ff7000040092000cc00000000004000840200000000280000009402000040000000010018000000000000ef010000000000000000000000000000000000fffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff.......
.......fffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000030000000000}}

Danke
Ciao
Stefan

[Rollo62]

Vielleicht ist das interessant ?
https://www.codeproject.com/Articles...-RTF-Converter

[skoschke]

Danke für den Hinweis, bin schon am Laden...

... Schade, damit kann ich als "DelpiUser" leider absolut nichts anfangen!

Ciao
Stefan

[KodeZwerg]

Vielleicht können das die WPCubed Komponenten? Sind ja Profi's was Pdf/Rtf und so angeht.
Per Hand.... hmmmm.... Tags auslesen und den Inhalt Binär speichern, was da rauskommt weiß ich nicht aber bin gespannt

[Redeemer]

Na ja, das ist ein Hex-String. Den kann man in der Datei suchen und dann das Hex umwandeln und in einen Stream schreiben.

[TurboMagic]

Wenn ich den Code der RTF richtig interpretiere, muss man dann den generierten Stream den man wie von meinem "Vorposter"
beschrieben erzeugt hat (Hex nach Int geht übrigends mittels StrToInt('0x' + mystring)) als WMF Grafikformat behandeln.
Ich schließe das aus dem "wmetafile" Tag im Datenstrom.