| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Ошибка вызова метода COM-сервера. [D6, Win2k]
DmitryNM © (2002-08-31 18:38:00)Есть внутренний COM-сервер. У него есть метод Convert:
function TAreaUnitConverter.Convert(Quantity: Double; InUnit,
OutUnit: SYSINT): Double;
Вобщем - функция как функция.
Сервер создается нормально:
var V:Variant;
V:=CreateOleObject(UnitSrv.AreaUnitConverter);
Однако при вызове этого метода:
V.Convert(1.0,0,1);
выдается ошибка "Invalid Callee"
И это при том, что если создавать этот же сервер по другому:
var I:IAreaUnitConverter;
I:=CoAreaUnitConverter.Create;
Метод I.Convert(1.0,0,1)
выполняется.
Также ошибка возникает при создании сервера через интерфейс диспетчирования:
var DI:IAreaUnitConverterDisp;
DI:=CoAreaUnitConverter.create as IAreaUnitConverterDisp;
Подскажите - в чем ошибка?
(Пример взят из книги)
DmitryNM (2002-09-02 11:12:00) [1]Нет - IAreaUnitConverter является Disp-интерфейсом.
Вот как объявлено в tlb-файле:
IAreaUnitConverter = interface(IDispatch)
["{019B9D28-D5EE-4952-91C5-D39843F6FA76}"]
function Convert(Quantity: Double; InUnit: SYSINT; OutUnit: SYSINT): Double; safecall;
end;
IAreaUnitConverterDisp = dispinterface
["{019B9D28-D5EE-4952-91C5-D39843F6FA76}"]
function Convert(Quantity: Double; InUnit: SYSINT; OutUnit: SYSINT): Double; dispid 5;
end;
Dimk (2002-08-31 22:31:00) [2]Может IAreaUnitConverter не является disp интерфейсом?
Если
var V:Variant;
V:=CreateOleObject(UnitSrv.AreaUnitConverter);
то как я понимаю V присваивается указатель на IDispatch
| |
