Outlook Mail versenden

[roth]

Guten Tag,

Ich habe folgendes Problem:

Seit der Umstellung von Office 2000 auf 2003 geht das hier nicht mehr:

Delphi-Quellcode:

function TOutlook.AddEmailItem(const AEmail, ASubject, ABody: String; AAppendSignature: Boolean = True): MailItem;
begin
  Result := FApplication.CreateItem(olMailItem) as MailItem;
  Result.To_ := AEmail;
  Result.Subject := ASubject;
  Result.GetInspector.Caption;
  Result.Body := ABody + Result.Body;
end;

es gibt den Fehler:

Zitat:

exception message : Interface not supported

Wiso kann ich seit der Umstellung auf 2003 kein solches Cast mehr machen?

Ich habe auch die neue TypeLibrary importiert.

mfg