Command (TPDFCurveC)

Create (TPDFObject)

Create (TPDFDocumentObject)

Create (TPDFCurveC)

pt 

FloatStr (TPDFObject)

SetWidth (TPDFDocumentObject)

pt 

Write (TPDFObject)

pt 

Write (TPDFCurveC)

pt 

WriteString (TPDFObject)