Bonjour,

j'ai créé une dll pour faire interagir mon programme avec excel via les interfaces.

Je crée un objet avec des propriétés dans mon code delphi. Dés lors dans ma macro j'ai accès à cet objet et aux différentes propriétés définies.

Cependant, j'ai décidé de rajouter une propriété contenant une image afin de récupérer cette image dans excel et de l'afficher dans mes menus.
J'ai donc eu le code suivant

Code : Sélectionner tout - Visualiser dans une fenêtre à part
 property IcoPict: IPictureDisp read Get_IcoPict write Set_IcoPict;
avec

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
function TMyObject.Get_IcoPict: IPictureDisp;
var
 Icone: TIcon;
begin
 Icone := TIcon.Create;
 Icone.Handle := LoadIcon(HInstance, 'MAINICON');
 result := Tpicture(Icone) as IPictureDisp;
 icone.free;
end;
cependant lorsque j'appelle dans ma macro
Code : Sélectionner tout - Visualiser dans une fenêtre à part
myobject.IcoPict
cela ne fonctionne pas. Il me dit que l'interface n'est pas supporté.

Quelqu'un aurait-il une idée?

Merci d'avance