From 0bd7bee51bf11353f37b86c5ba45d4567aae14b9 Mon Sep 17 00:00:00 2001 From: mattias Date: Wed, 15 Feb 2012 14:16:40 +0000 Subject: [PATCH] laz2_xmlwrite: added flags for WriteXML git-svn-id: trunk@35373 - --- components/lazutils/laz2_xmlwrite.pas | 18 +++++++++--------- 1 file changed, 9 insertions(+), 9 deletions(-) diff --git a/components/lazutils/laz2_xmlwrite.pas b/components/lazutils/laz2_xmlwrite.pas index 95410976f0..b74cd3fb29 100644 --- a/components/lazutils/laz2_xmlwrite.pas +++ b/components/lazutils/laz2_xmlwrite.pas @@ -40,9 +40,9 @@ procedure WriteXMLFile(doc: TXMLDocument; const AFileName: String; Flags: TXMLWr procedure WriteXMLFile(doc: TXMLDocument; var AFile: Text; Flags: TXMLWriterFlags = []); overload; procedure WriteXMLFile(doc: TXMLDocument; AStream: TStream; Flags: TXMLWriterFlags = []); overload; -procedure WriteXML(Element: TDOMNode; const AFileName: String); overload; -procedure WriteXML(Element: TDOMNode; var AFile: Text); overload; -procedure WriteXML(Element: TDOMNode; AStream: TStream); overload; +procedure WriteXML(Element: TDOMNode; const AFileName: String; Flags: TXMLWriterFlags = []); overload; +procedure WriteXML(Element: TDOMNode; var AFile: Text; Flags: TXMLWriterFlags = []); overload; +procedure WriteXML(Element: TDOMNode; AStream: TStream; Flags: TXMLWriterFlags = []); overload; // =================================================================== @@ -902,19 +902,19 @@ begin end; end; -procedure WriteXML(Element: TDOMNode; const AFileName: String); +procedure WriteXML(Element: TDOMNode; const AFileName: String; Flags: TXMLWriterFlags = []); begin - WriteXMLFile(TXMLDocument(Element), AFileName); + WriteXMLFile(TXMLDocument(Element), AFileName, Flags); end; -procedure WriteXML(Element: TDOMNode; var AFile: Text); +procedure WriteXML(Element: TDOMNode; var AFile: Text; Flags: TXMLWriterFlags = []); begin - WriteXMLFile(TXMLDocument(Element), AFile); + WriteXMLFile(TXMLDocument(Element), AFile, Flags); end; -procedure WriteXML(Element: TDOMNode; AStream: TStream); +procedure WriteXML(Element: TDOMNode; AStream: TStream; Flags: TXMLWriterFlags = []); begin - WriteXMLFile(TXMLDocument(Element), AStream); + WriteXMLFile(TXMLDocument(Element), AStream, Flags); end;