再次提问：关于dbgrid转存到excel中的问题

Question

上此发帖，一个礼拜都没有人回，这次再次提问
如果dbgrid中某些栏位使用红色标注的，当把dbgrid中资料存到excel中的时候，希望这些颜色属性也保存进取，怎么做到？就是说，如果dbgrid显示的这个cell是红底黄字，那么存到excel中的时候也是红底黄字，拜托各位了！

Answer 1

你可以先通过流的形式写成HTML文件,再通过流的COPY转成XLS文件.
这就是这样做的,用流速度很快的.

Answer 2

for I:=0 to dbgridname.Columns.Count-1 do begin
                if dbgridname.Columns[I].Visible=False then
                   Continue;
                Sheet.Cells[J,I+1] := trim(dbgridname.DataSource.DataSet.Fieldbyname(dbgridname.Columns[i].FieldName).asstring);
               //关键是下面两句，一句是改变字体颜色，第二句是改变底色，至于颜色的号，你自己试着调                Sheet.Cells[J,I+1].font.ColorIndex := 3;
                sheet.Cells[J,I+1].Interior.ColorIndex := 50
            end;