![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Midas client [Delphi, Windows]
OlegL © (2003-08-12 15:48:00)Help! Создал Midas сервера и клиента (RemoteDataModule - всё как пологается). На стороне сервера сделал метод которого хочу вызвать, дела ю так:
var ICom : IRevTehSrv;
a : string;
....
DataModule.DCOMConnection.Connected := true;
ICom := IRevTehSrv(IDispatch(DataModule.DCOMConnection.AppServer));
a := ICom.First('a', 's');
DataModule.DCOMConnection.Connected := false;
появляется ошибка типа "Exception EAccesViolation in module RPCRT4.DLL at....." (всё везде зарегистрированно).
что я упустил?
OlegL (2003-08-19 15:04:00) [1]Спасибо
Dok_3D (2003-08-15 09:50:00) [2]Чтобы твоя процедура стала функцией, нужно задать в ней параметр - [out, retval].
OlegL (2003-08-14 13:47:00) [3]WideString. Я не знаю, но у меня не получается делать функции как метод интерфейса. Процедуры делаю и работает всё прекрасно.
clickmaker (2003-08-13 15:35:00) [4]Странно... А тип возвращаемого First значения какой ?
OlegL (2003-08-13 15:18:00) [5]:-))) Дело совсем в другом. Если сделать First не функцией а процедурой с выходным параметром: ICom.First(InParam, InParam, OutParam) то работает.
OlegL (2003-08-13 10:01:00) [6]Та же самая ошибка. Может кто-то знает что это за dll-ка, или где об этом написанно.
clickmaker (2003-08-12 17:17:00) [7]А если так
ICom := (DataModule.DCOMConnection.GetServer as IRevTehSrv);