hola
soy nuevo en el foro y tambien estoy tratando de consumir el webservice de forcogsa desde delphi7 pero no logro autenticar, ya copie el codigo de arriba y no se como enviar las instrucciones en delphi para autenticar, le estoy poniendo asi pero me manda error, ojala puedan ayudarme
WSForcogsaService.Autenticar('pruebasWS','pruebasWS');
[Error] AFactur.pas(1967): ')' expected but ',' found
me podran echar la mano, gracias
Que tal maramram bienvenido a DelphiAccess, estas madando llamar mal el método Autenticar, sólo te pide un parámetro que contiene el usuario y contraseña como lo puedes ver en la definición de la clase y de como llamar al método.
Autenticar = class(TRemotable) private Fusuario: WideString; Fcontrasena: WideString; public published property usuario: WideString read Fusuario write Fusuario; property contrasena: WideString read Fcontrasena write Fcontrasena; end; function Autenticar(const parameters: Autenticar): AutenticarResponse; stdcall;
Entonces el método autenticar lo debes consumir de ésta forma.
var userpass: Autenticar; begin userpass := Autenticar.create; userpass.Fusuario := 'pruebasWS'; userpass.Fcontrasena := 'pruebasWS'; :::::::::: WSForcogsaService.Autenticar(userpass); end;
Saludos