https://www.packtpub.com/en-us/product/delphi-cookbook-second-edition-9781785287428/chapter/delphi-basics-1/section/customizing-tdbgrid-ch01lvl1sec11procedureTForm13.DBGrid1DrawColumnCell(Sender:TObject;constRect:TRect;DataCol:Integer;Column: