TStringGrid怎样做成Flat样式的？

大家用过DBGridEH吧？它的Title就是flat的，我现在想把TStringGrid的Title做成
flat样式的，有什么办法？

解决方案 »

  1.   

    使用advStringGrid,在51delphi.com里面有下载，具有这个功能
      

  2.   

    设置TstringGrid的ctl3D属性为false
      

  3.   

    你设置stringgrid中的FixedRows为0。
    就可以轻松实现了，当然还需修饰一下！
      

  4.   

    将ctl3D设为False；然后uses commctrl
    InitializeFlatSB(stringGrid1.Handle)//使滚动条Flat
      

  5.   

    大家的方法都不行！我觉得应该在OnDrawCell事件中用Canvas画出来，可是无论我怎么画，显示出来的效果都令人不满意！
    好象 lqy169() 知道一点，能不能详细一点，最好有一个例子。谢谢！
      

  6.   

    to blazingfire：你你你......你！
      

  7.   

    if (ARow = 0) then
    begin
      StringGrid1.Canvas.Brush.Color := Rgb(255,255,225);   //背景颜色
      StringGrid1.Font.Color := clBlack;
      StringGrid1.FillRect(Rect);
      StringGrid1.TextOut(Rect.Left+2,Rect.Top+3,sgResult.Cells[ACol,ARow]);    //输出在列中的位置自己调整吧
    end;
      

  8.   

    有没有看TStringGrid的vcl源码啊？