如何取得dbgrid單元格的字顏色和背景色(100)

我现在在写一个功能，就是将dbgrid中的数据导出到excel中，想要实现一个效果，就是：dbgrid上显示的字是什么颜色，导出到excel中字也是什么颜色；dbgrid中单元格背景是什么颜色，导出到excel中背景也是什么颜色。不知大家有没有什么好办法。设定字颜色及背景颜色是用的下面的办法：在OnDrawColumnCell中写： dbgrid15.canvas.Brush.color:=clMoneyGreen; dbgrid15.canvas.font.color:=clblue; dbgrid15.DefaultDrawColumnCell(Rect,DataCol,Column,State);但用dbgrid15.canvas.Brush.color或是dbgrid15.canvas.font.color却取不出颜色。经我试验，如果在dbgrid上点一个单元格，上面方法可以得到颜色，但我是用for循环，无法取得某一个单元格的颜色。