Prueba con
Código Delphi
[-]
dbgrid1.Canvas.TextOut(rect.left + 1, rect.Top + Canvas.TextHeight('Pepito') + 1, 'Pepito');
Al left sólo tienes que sumarle 1 para separarlo de la izquierda. Al Top tienes que sumarle la altura del texto para que lo baje. Después de hacer esto no llames a DefaultDrawColumnCell, sino, pintará por encima el grid.