Вниз
Скачать: CL | DM;

Как выполнить любой метод?   Найти похожие ветки 

← →
Dmitry S ©   (2008-08-31 23:05) [0]

Есть строка MethodName: WideString;
Есть объект SomeObject: IDispatch;
Как выполнить метод MethodName данного объекта?

Пробовал примерно так:
Var
 Obj: OleVariant;
begin
 Obj := SomeObject;
 Obj[SomeMethod](...);
end;

Но компилятор ругается на то, что SomeMethod должно быть числом.


← →
Eraser ©   (2008-09-01 00:59) [1]

Obj.SomeMethod();


← →
Сергей М. ©   (2008-09-01 08:15) [2]

1. Получить Id метода (см. IDispatch.GetIdsOfNames)
2. Вызвать метод по полученному выше Id (см. IDispatch.Invoke)


← →
Dmitry S ©   (2008-09-01 09:54) [3]


> Сергей М. ©   (01.09.08 08:15) [2]

Так и думал. Жаль, что проще способа нет :(


← →
Сергей М. ©   (2008-09-01 10:04) [4]


> Жаль, что проще способа нет


Откуда ж ему взяться при позднем связывании ?


← →
Dmitry S ©   (2008-09-01 10:06) [5]


> Откуда ж ему взяться при позднем связывании ?

А что тогда код выполняет, если сделать:
Obj.SomeMethod(); ?
Насколько я знаю это и есть неявный GetIdsOfNames и Invoke. Только имя метода записано статично.


← →
oxffff ©   (2008-09-01 10:11) [6]


> Dmitry S ©   (01.09.08 10:06) [5]


За тебя это делает компилятор.
Посмотри реализацию и используй DispatchInvoke из comobj

procedure DispatchInvoke(const Dispatch: IDispatch; CallDesc: PCallDesc;
 DispIDs: PDispIDList; Params: Pointer; Result: PVariant);



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.008 c
11-1194649488
Эдик
2007-11-10 02:04
2008.10.26
Модули для работы с файлами 3D Studio Max.


2-1221729353
[i2e]
2008-09-18 13:15
2008.10.26
Параллельная прокрутка двух CheckListBox


15-1220190358
Синий Дракон
2008-08-31 17:45
2008.10.26
Логическая задача


15-1220332426
Василий Жогарев
2008-09-02 09:13
2008.10.26
DWL-2100AP


2-1221641606
vegarulez
2008-09-17 12:53
2008.10.26
Вопрос про DBGrid.DataSource.DataSet.FieldValues[];




   Наверх