delphi的cxgrid特定格子画椭圆形图案

delphi 如何根据筛选在cxgrid的特定格子内画椭圆形图案，这是怎么做到的？
例：
课程表，数学是红色椭圆形加白色字体，语文是黄色椭圆形加黑色字体

现在一个 bitmap上画好所需要的图像,在 oncustomdrawcell 里用 acanvas.DrawGlyph 方法,自己画,画完吧adone置为true