Jupiiiieeeee !!!
Dieses Problem hat sich soeben auch erledigt !!!
Und da ich ja die letzten Threads auch gelesen habe, will ich euch die Lösung nicht vorenthalten !!!
Hier die Lösung:
Code:
procedure TForm1.Button1Click(Sender: TObject);
var mItem : variant;
begin
//laden des
HTML-Codes in ein Memo
Memo1.Lines.LoadFromFile(Edit1.Text);
//Verbindung zu Outlook
OutApp.Connect;
//neue Mail erzeugen
mItem := OutApp.CreateItem(olMailItem);
//HTMLBody füllen
mItem.HTMLBody:=Memo1.Lines.Text;
//und noch als *.oft abspeichern
mItem.SaveAs('c:\xyz.oft',olTemplate);
//wieder freigeben :-)
OutApp.Disconnect;
end;
Oh man, und ich habe Monate lang die kompliziertesten Sachen ausprobiert. Ja ja, so ist es halt, das Simpelste ist dann doch das Beste.
Gruß, Helld;