Data Snap - Delphi 7 - Urgente !

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

Assista grátis a nossa aula inaugural

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

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

Aceitar