TPenHandleCache

pt 

RemoveItem

 

Create

 

CompareDescriptors

 

FindPen

 

FindPenDesc

 

Add