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

Midas client   Найти похожие ветки 

← →
OlegL ©   (2003-08-12 15:48) [0]

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....." (всё везде зарегистрированно).
что я упустил?

---

← →
clickmaker ©   (2003-08-12 17:17) [1]

А если так

ICom := (DataModule.DCOMConnection.GetServer as IRevTehSrv);

---

← →
OlegL ©   (2003-08-13 10:01) [2]

Та же самая ошибка. Может кто-то знает что это за dll-ка, или где об этом написанно.

---

← →
OlegL ©   (2003-08-13 15:18) [3]

:-))) Дело совсем в другом. Если сделать First не функцией а процедурой с выходным параметром: ICom.First(InParam, InParam, OutParam) то работает.

---

← →
clickmaker ©   (2003-08-13 15:35) [4]

Странно... А тип возвращаемого First значения какой ?

---

← →
OlegL ©   (2003-08-14 13:47) [5]

WideString. Я не знаю, но у меня не получается делать функции как метод интерфейса. Процедуры делаю и работает всё прекрасно.

---

← →
Dok_3D ©   (2003-08-15 09:50) [6]

Чтобы твоя процедура стала функцией, нужно задать в ней параметр -  [out, retval].

---

← →
OlegL ©   (2003-08-19 15:04) [7]

Спасибо

---

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

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



Память: 0.46 MB
Время: 0.022 c