Fórum Data Snap - Delphi 7 - Urgente ! #132618

04/02/2003

0

Bom dia, pessoal !

Meu cenário é o seguinte : Tenho 3 aplicações que se comunicam através de Data Snap :

Cliente ----> Servidor ----> Central de Serviços

No Delphi 6 tudo funcionava perfeitamente, só que quando eu migrei para delphi 7 , a chamada de métodos de uma aplicação a partir de outra mudou. Fiz a mudança de acordo com o que vem indicado no Help do Delphi 7 :

Cliente --> Servidor (Estou usando um TSocketConnection) :

var Servidor : IDMDisp;
begin
Servidor := IDMDisp(IDispatch(Socket.AppServer));
Servidor.MeuMetodo(x,y);
end;

Servidor --> Central de Serviços (Estou usando um TSocketConnection) :

TDM.MeuMetodo(x,y : integer);
var Central : IDMCentralDisp;
begin
Central := IDMCentralDisp(IDispatch(SocketCentral.AppServer));
Central.MeuMetodo(x,y);
end;

Sendo que essa segunda chamada gera um erro com a mensagem : ´Invalid Arguments´.

Se alguém puder ajudar , eu vou agradecer muito. Estou realmente precisando sair dessa situação. Obrigado pela atenção.


Anonymous

Anonymous

Responder

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar