Hallo,
Ich muß zugeben, dass ich in Sachen Webservices ein totaler Anfänger bin. Es geht wieder um die Anbindung von
Fiskaltrust Middleware. Ich hole mir Daten von einem Windows WCF-Dienst runter. Die Schnittstellendefiniton wird über eine
WSDL Datei definiert, das ich über den Delphi
WSDL Importer konvertiere. Das Endergebbnis ist eine
Unit, dass ich in den Programm einbinden kann. Die Kommunikation funktioniert einwandfrei. Wenn ich Fiddler anwerfe, dann sehe ich, dass vom Server als Antwort eine
XML Datei gesendet wird. Diese
XML wird anscheinend geparst und es wird ein Objekt mit den Variablen zurückgegeben.
Delphi-Quellcode:
var
RRequest: ReceiptRequest;
RResponse: ReceiptResponse;
begin
RRequest:= ReceiptRequest.Create;
RRequest.ftCashBoxID := 'xxxxxx-xxxx-xxxx-xxxx-xxxxxxxxxxxx';
RRequest.cbTerminalID := '1';
RRequest.ftReceiptCase := $4154000000000002;
RResponse:=GetIPOS.Sign(RRequest);
if RResponse<>nil then
begin
Memo1.Lines.Add('ftCashBoxID: '+RResponse.ftCashBoxID);
Memo1.Lines.Add('ftSignatures Length: '+IntToStr(Length(RResponse.ftSignatures)));
end;
Ich möchte aber nicht nur die einzelnen geparsten Variablen vom Objekt "RResponse" haben, sondern die komplette
XML Antwort als Datei abspeichern. Weiss einer wie sowas geht?
lg,
jus