CreateRemoteComObject+QueryInterface

← →
kostas (2003-06-04 13:32) [0]

IExcel := CreateRemoteComObject("192.168.221.102",StringToGUID("{00024500-0000-0000-C000-000000000046}"));
res1 := IExcel.QueryInterface(StringToGUID("{000208D5-0000-0000-C000-000000000046}"),Excel);
Переменная Excel : VAriant;

Ошибок выполнения нет. res1 = 0 - ок - интерфейс возвращен.
НО Excel возвращается неизвестно что. VarType(Excel) каждый раз возвращает случю числа больше 4000H

dcomcnfg.exe - запускался и всё настраивалось.
Как по другому можно подключистя к удаленному серверу
Импорт TLB и обект ExcelOLEObject - не работает. Пишет что класс не зарегистрированн

← →
Serginio (2003-06-04 13:42) [1]

Ты описание QueryInterface читал. Если есть огромное желание работать с Олевариантом тогда делай так
TVarData(Excel).Vtype:=varDispatch;
res1 := IExcel.QueryInterface(IDispatch,TVarData(Excel).VDispatch);
А лучше всего вместо QueryInterface использовать
Excel:=IExcel as IDispatch;
или
Excel:=IExcel;

CreateRemoteComObject+QueryInterface - не работает Найти похожие ветки