Hallöle...
Änderungen:
* BOM ist nun auch bei UTF8 Standard.
* wenn BOM nicht benötigt:
Delphi-Quellcode:
XML.Options :=
XML.Options + [xoDontWriteBOM];
...
Änderungen in himXML.pas ab Zeile 11817:
Delphi-Quellcode:
Procedure TXWriter.WriteBOM;
Begin
If (XMLEncodingData[_Encoding].BOM > '') and (not(xoDontWriteBOM in _Options)) Then Begin
Flush;
_Stream.WriteBuffer(XMLEncodingData[_Encoding].BOM[1],
Length(XMLEncodingData[_Encoding].BOM));
End;
End;
PS: (AllowUTF8BOM: Boolean = False); wurde nie gesetzt...immer False.
...bitteschön.
