🚀 go-pugleaf

-- Wiadomość oryginalna (wysłana  19.03.2019 11:47) --
> W dniu wtorek, 19 marca 2019 10:46:59 UTC+1 użytkownik MKi napisał:
>>>
>>> A nie powinno być tak?:
>>>
>>> x := dpos.findPostalCodeV1(ad) ;
>>>
>>> wygląda na to, że masz o jeden parametr za dużo
>>>
>>> Paweł
>>>
>>
>> No niestety, deklaracja funkcji w DPDPackageObjServices1.pas jest taka:
>>
>> function  findPostalCodeV1(const postalCodeV1: postalCodeV1; const
>> authDataV1: authDataV1): findPostalCodeResponseV1; stdcall;
>>
>> Przecież trzeba jakoś podać kod pocztowy do sprawdzenia,
>> on jest właśnie w pierwszym parametrze.
>>
>> Pozdrowienia,
>> MKi
> 
> Dokładnie się temu nie przyjrzałem. Jednak w php jest to tylko jeden parametr: struktura zawierająca również kod pocztowy. Ja bym to spróbował zapisać mniej więcej tak:
> 
> TPostalCodeV1 = record
>    countryCode,
>    zipCode: string;
> end;
> 
> TAuthDataV1 = record
>   login,
>   masterFid,
>   password: string
> end;
> 
> Tparam16 = record
>    postalCodeV1: TpostalCodeV1;
>    authDataV1: TauthDataV1;
> end;
> 
> ...
> 
> param16.postalCodeV1.countryCode := 'PL';
> param16.postalCodeV1.zipCode := '02274';
> param16.postalCodeV1.authDataV1 = authData;
> result := clientOBJ.findPostalCodeV1(param16);
> 
> Paweł
> 

Ale przecież muszę dostosować się z parametrami do deklaracji funkcji,
która została wygenerowana przez Delphi na podstawie linka WSDL.
Taka konstrukcja się w ogóle nie skompiluje!

Zresztą Piotr napisał, w XE5 mój programik działa bez problemów.

Pozdrowienia,
MKi