Bild in Steuerelement laden bei Word

[Sergej_Molotov]

Genau das habe ich auch schon versucht, aber leider gelingt mir dies nicht. Folgende Funktion erzeugt ein IPictureDisp

Delphi-Quellcode:

function GetImage(Const imageName: String): IPictureDisp;
Var
  P : TPicture;
begin
  Result := Nil;
  P := TPicture.Create;
  P.LoadFromFile(imageName);
  GetOLEPicture(P, Result);
end;

Wenn ich aber dann diese Instanz z.B. mit
OleVariant(aDisp).Picture := GetImage('C:\test.bmp') setze, dann erhalte ich folgende Exception.

Zitat:

Exception-Klasse EOleSysError mit Meldung 'Schwerwiegender Fehler'. Prozess Project1.exe (7552)

Was mach ich falsch???

Achja, und wie kann man OleVariant(aDisp).Picture zu IPictureDisp casten