TDummyCellObj

pt 

GetCell

pt 

Draw

pt 

DrawLogic2

Create

Clone

TCellObjBase

pt 

GetCell

pt 

Draw

pt 

DrawLogic2

Clone

AssignTo