De C++ a Delphi (Interfaces / ActiveX)

[jplj]

He transfromado el código:

ILayer layer(m_visor.GetControlUnknown());
layer->AddLayer(m_capa.GetControlUnknown())

por

(m_visor As ILayer).AddLayer((m_capa As IUnknown), ...);

El primer parámetro de AddLayer debe ser la interfaz IUnknown del componente TCapa.
A la hora de compilar, no se producen errores, pero al ejecutarse esta linea aparece el error de Interfaz no soportada.
En primer lugar ¿es correcto el modelado con As?, y si lo es cómo podría
saber dónde surge el error, yo creo que puede surgir en cualquier de los dos modelados o bien en el propio método AddLayer. ¿Cómo podría averiguarlo?.