NativeXml Help
TXmlNode.WritePen
procedure WritePen(const AName: Utf8String; APen: TPen); virtual;
Description
Write properties Color, Mode, Style and Width of the TPen object APen to the subnode with AName. If AName does not exist, it will be created.