delphi - ExecCommand CreateLink e IMG

hyperlink webbrowser-control

Question

Uso webbrowser-control (edición de MSHTML) en modo de diseño. Cuando intento insertar un hipervínculo para un texto seleccionado, funciona bien. Pero cuando trato de insertar un hipervínculo para una imagen seleccionada, recibo el error:

Error 100
Function expected

Código:

var
 pCmd : OleVariant;
begin
 html_doc.execCommand(''CreateLink'', True, pCmd);
end;

¿Cómo insertar un hipervínculo en una imagen de otra manera, diferente de usar execCommand?