如何把dbgrid的滚动条变成平面风格（flat 风格）的 ？

Question

如何把dbgrid的滚动条变成平面风格（flat 风格）的 ？

Answer 1

建议用TDBGridEh可以改为平面风格

Answer 2

各位老大难道没有感觉到用dbgrideh很慢吗

Answer 3

uses FlatSB;procedure TForm1.FormCreate(Sender: TObject);
begin
  InitializeFlatSB(DBGrid1.Handle);
end;procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  UninitializeFlatSB(DBGrid1.Handle);
end;另外，可以试试FlatSB_SetScrollProp，它可以设置滚动条的一些属性，甚至是背景色，楼主有兴趣可以查查msdn

Answer 4

刚看了下，原来是这样的，上面两个函数只负责外观的显示，至于位置的移动，需要手动写代码来完成。需要截获WM_HSCROLL, WM_VSCROLL, WM_MOUSEWHEEL消息，然后在事件中自己写代码，如：
FlatSB_SetScrollPos(DBGrid1.Handle,SB_VERT,10,True);应该就可以了:-D

Answer 5

to chinaandys,dbgrideh慢吗？我反而觉得dxdbgrid慢啊