Canvas in ein RTF-Dokument speichern ?

[walharth]

Hallo und vielen Dank für die Tips soweit.

Eigentlich muss es auch kein RFT-Format sein. Das wäre schön gewesen, um das Dokument (Rechnung o.ä.) in Word zu bearbeiten, muss aber nicht unbedingt sein.

Es geht mir vielmehr um die Möglichkeit, das angezeigt Dokument (ist übrigens ein TMetafile.canvas) per E-Mail versenden zu können.

Wenn ich den TMetafile.canvas (von der Komponente TPagePrinter) in eine WMF-Datei schreibe, wird leider nichts übernommen.

Hier mein bisheriger Code zum Erstellen der WMF Datei :

procedure TPrintForm.BitBtn1Click(Sender: TObject);
var
MTF:TMetaFile;
MTFCanvas:TMetaFileCanvas;
MyRect:TRect;
begin
MTF:=TMetaFile.create;
try
MyRect:=Prn.Canvas.ClipRect;
MTF.Width:=MyRect.Right-MyRect.Left;
MTF.Height:=MyRect.Bottom-MyRect.Top;
MTFCanvas:=TMetaFileCanvas.Create(MTF,;
MTFCanvas.CopyRect(MyRect,Prn.canvas,Myrect);
MTF.SaveToFile(DataForm.ApDatabase.DataPath+'\PPP. WMF');
finally
MTF.Free;
end;

// hier die weitere Prozedur zum mailen der Datei //

end;

Vielen Dank für weitere Tips.