Вниз
Скачать: 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
2-1221658980
smartleds
2008-09-17 17:43
2008.10.26
Господа, напомните пожалуйста функцию задержки в Делфи


2-1221944652
Ruzzz
2008-09-21 01:04
2008.10.26
Unicode в D2009


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


2-1221804460
Wood
2008-09-19 10:07
2008.10.26
TWebBrowser, выделение текста в нужном месте.


15-1220445110
Vlad Oshin
2008-09-03 16:31
2008.10.26
Все таки профессия накладывает .. :)




   Наверх