Delphi TDrawGrid descendant

Need a TDrawGrid descendant for Delphi (2006 or newer) with a couple of extra features: * Generates a **OnCellChange( const AOldCol, ANewCol: integer; const ANewCol, ANewRow: integer )** event after a change in focus. * Ability to merge cells horizontally, through **procedure MergeHorizontal( const ARow: integer; const AStartCol, AColSpan: integer );** There are plenty of third-party components that do this sort of thing, but I need to keep it simple and avoid the extra baggage that comes with them.