LoadImage de um active X

[rebotea]

Boas amigos como poderei chamar "LoadImage" do active X abaixo?

Obrigado

function TIRimage.LoadImage(ImageHandle: OLE_HANDLE; ImageType: Smallint; BigEndian: WordBool): WordBool;

begin

Result := DefaultInterface.LoadImage(ImageHandle, ImageType, BigEndian);

end;

como poderei chamar o codigo acima de um active X

Botão

IRimage1.LoadImage[ 'c:\IR_1093.jpg' ] ;