XML Send as string
lazarus / 38-Networking and Web Programming

----------------------------------------------------------------------
michoux · 2021-01-27 12:26

Hello,

During my application I am creating a XML document.
Doc: TXMLDocument;

When I finish with creation I would like to send the content of this
document over network with tblocksocket.
At the moment I use writeXMLFile(Doc, 'c:\....');
connection:TBlockSocket;
 connection.SendString(message+CR+LF);

But now I would like to send this xml feed to some server ...  and I
would like to read response of the connection.SendString.


Regards Michoux

----------------------------------------------------------------------
paweld · 2021-01-27 13:13

Code: Pascal  [Select][+][-]window.onload = function(){var x1 =
document.getElementById("main_content_section"); if (x1) { var x =
document.getElementsByClassName("geshi");for (var i = 0; i var  doc:
TXMLDocument;  xmls: TStringStream;begin  //create xml  xmls :=
TStringStream.Create('');  writeXML(Doc, xmls);               //save
to string stream  Doc.Free;  connection.SendString(xmls.DataString +
CRLF);  xmls.Free;end;