hm.. warum erzeugst Du den response selber und wunderst dich, dass die Fehlermeldung kommt, dass ein Textknoten leer ist?
Versuch es mal so:
Bei mir klappt das nicht, weil die Login-Informationen fehlen, die such ich mir jetzt aber nicht auch noc zusammen...
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var checks : UCheckAddressSimple;
Response : UCheckAddressSimpleResponse;
begin
try
checks := UCheckAddressSimple.Create;
checks.UserName := 'test';
checks.UserPassword := 'test';
checks.Tolerance := 1;
checks.Country := 'DE';
checks.ZIP := '41252';
checks.City := 'Sp';
checks.Street := 'Eugen-Bolz-Straße';
Response := GetQACWebServiceSoap.UCheckAddressSimple(checks);
memo1.Lines.Add(Response.UCheckAddressSimpleResult.ErrorMessage);
Memo1.Lines.Add(IntToStr(Response.UCheckAddressSimpleResult.ErrorCode));
Memo1.Lines.Add(IntToStr(Response.UCheckAddressSimpleResult.ResultStatus));
finally
FreeAndNil(Response);
FreeAndNil(checks);
end;
end;