[DUG] Importing XML Into THTTPRIO?
David Moorhouse
David.Moorhouse at pegasus.org.nz
Tue Apr 12 11:03:43 NZST 2016
Use the XML importer which gives 3 global functions:
· function Getdoc(Doc: IXMLDocument): IXMLDocType;
· function Loaddoc(const FileName: string): IXMLDocType;
· function Newdoc: IXMLDocType;
No need to use RIO (Remote Invocation Object) here.
Cheers
D
David Moorhouse (BCom) | Principal Software Engineer - HealthOne
Pegasus Health (Charitable) Ltd
P: 03 353 0871 | W: www.pegasus.org.nz<http://www.pegasus.org.nz/>
E: david.moorhouse at pegasus.org.nz<mailto:david.moorhouse at pegasus.org.nz>
PO Box 741, Christchurch 8140
160 Bealey Ave, Christchurch 8014
[cid:image003.jpg at 01CEE516.6F544D00]
From: delphi-bounces at listserver.123.net.nz [mailto:delphi-bounces at listserver.123.net.nz] On Behalf Of Jeremy Coulter
Sent: Tuesday, 12 April 2016 10:45 a.m.
To: NZ Borland Developers Group - Delphi List
Subject: [DUG] Importing XML Into THTTPRIO?
Hi all.
A while back I created a class based on a SOAP XML. Doc.
Basically what I need to do is by-pass the THTTPRIO call to the SOAP server and "import" an XML file that has some XML data in it that was retrieved by the THTTPRIO call.
The idea is that I say, "here is a file, import then process it then give me the value for 'X'".
When I look at the code, I see the following in the code in the function that does the RIO call:
Result := (RIO as MyPortType);
MyPortType is:
MyPortType = interface(IInvokable)
so, is there a way I can basically open a file, and assign it to an object of the above so I can access the data?
I hope I am being clear :-)
Thanks, Jeremy
********************************************************************************
This email or attachment(s) may contain confidential or legally privileged
information intended for the sole use of the addressee(s). Any use, redistribution,
disclosure, or reproduction of this message, except as intended, is prohibited.
If you received this email in error, please notify the sender and erase all
copies of the message, including any attachments.
Any views or opinions expressed in this email (unless otherwise stated) may not
represent those of Pegasus Health Ltd.
********************************************************************************
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://listserver.123.net.nz/pipermail/delphi/attachments/20160411/aa731de1/attachment-0001.html
-------------- next part --------------
A non-text attachment was scrubbed...
Name: image001.jpg
Type: image/jpeg
Size: 3614 bytes
Desc: image001.jpg
Url : http://listserver.123.net.nz/pipermail/delphi/attachments/20160411/aa731de1/attachment-0001.jpg
More information about the Delphi
mailing list