Не могу возвратить клиенту интерфейс объекта
От: Body Россия ICQ:55192992
Дата: 21.12.01 14:10
Оценка:
Существует метод на сервере TAAA, который должен возвращать интерфейс на TAutoIntfObject который поддерживает интерфейс IConnectInfo;
IConnectInfo = interface(IDispatch)
{########-############-###########-#}
function GetParams(const AName: WideString): OleVariant; safecall;
end;

function TAAA.GetConnection(Index: Integer): IDispatch;
begin
//FConnectInfo — интерфейс на необходимый объект
Result := FConnectInfo as IDispatch;
end;

На клиенте:

Var
AI : IDispatch;
V : OleVariant;
begin
AI := SockectConnection.AppServer.GetConnection(#####);
V := AI;
V.GetParams('AAA'); <--- вот тут происходит ошибка
Method "GetParams" not supported by automation object
end;

Подскажите пожалуйста — чего я неправильно делаю.
А если точно не знаете, то может мысли какие-нить есть по этому поводу.
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.