Прблема с Vih

[beatlov]

Создаем vih:
#ifndef _MTO_vih_INCLUDED_
#define _MTO_vih_INCLUDED_
#component "F_UserReport"

objinterface objMTO;
function fVisible(ln_katpodr:comp; ln_cco:comp):integer;
function ftest (ln_test:string[10]): string[20];
end;

Vipinterface iMTO implements objMTO licensed(Free);
#end

Описываем функцию в соответствующем файле vip - все компилится без проблем.
Но уже при использовании функции созданного vih в каком-нибудь интерфейсе, Вываливается ошибка ExObjIfcNoLoad.

Пример использования функции в интерефейсе в функции

function fGetVisible(pn_rec:comp);
var
varMTO:iMTO;
begin
LoadVipInterface(varMTO);
.....
Ошибка появляется сразу после LoadVipInterface... пробовалась аналогочная LoadVipInterface функция загрузки интерфейса GetVipInterface.... - не помогает
Где может быть ошибка? Все осуществлялось по примерам в vipprog.cmh

[sensoft]

может поможет:

в строчке
varMTO:iMTO;

добавить new

чтото вроде:
varMTO:iMTO new;

[beatlov]

С new тоже пробовалось - ошибка та же :(

[Gera]

1. LoadVipInterface - функция. Обработайте результат ее выполнения.
2. Судя по исключению - ExObjIfcNoLoad "Vip-интерфейс не может быть загружен" - все таки что то не так с интерфейсом iMTO

[beatlov]

LoadVipInterface обрабтал...
iMTO весь перешерстил... даже минимизировал до простоты... ошибка не пропадает :(

[Gera]

Ну тогда выкладывайте исходники на общее обозрение (в архиве) - кто нибудь да найдет ошибку.