Command (TPDFClosePath)
Create (TPDFObject)
Create (TPDFDocumentObject)
pt
FloatStr (TPDFObject)
SetWidth (TPDFDocumentObject)
Write (TPDFObject)
Write (TPDFClosePath)
WriteString (TPDFObject)