Hola foro,
Espero estén de lo mejor. Les comento que estoy iniciando con webservice en delphi y estoy fatal.
Detalles: El webservice utiliza soap con wsdl y esta ejecutandose en localhost. Windows 10. Delphi 10.1.
Intento llamar una función, que se genero de la importación, y que esta estructurada de la siguiente forma:
Código Delphi
[-]
function login(const user_auth: user_auth; const application_name: string; const name_value_list: name_value_list): entry_value; stdcall;
Mediante una acción en un boton, intento cargar el resultado en un memo
Código Delphi
[-]
procedure TForm1.Button2Click(Sender: TObject);
begin
Memo1.Text := login(user_auth,'','admin','clave');
end;
Sin embargo, me indica que el identificador login no esta declarado.
[dcc32 Error] Unit1.pas(49): E2003 Undeclared identifier: 'login'.
El unit generado de la importacion, lo incorporo en la clausula USES.
Intento hacer algo similar a esto:
Código:
$client=new SoapClient("http://localhost/sugarCRM/service/v4/soap.php?wsdl");
$response=$client->__soapCall("login",
array("user_auth"=>
array(
'user_name'=>'admin',
'password'=>md5('clave'),
'version'=>"0.1",),
"application_name"=>''));
$session_id=$response->id;
echo "Session ID".$session_id;
Esto lo realice en php y todo funciona sin problema.
Sin embargo en Delphi, no me ha funcionado.
Alguien me puede orientar, sobre que puedo estar haciendo mal.
Cualquier ayuda es bienvenida.
Saludos.