P pckite Unregistered / Unconfirmed GUEST, unregistred user! 2002-08-17 #1 如何设DBGRID滚动条的颜色？代码？控件？谁有？ 请E-MAIL至：pckite@163.com 谢谢！
X xinghuang Unregistered / Unconfirmed GUEST, unregistred user! 2002-08-17 #2 DBGrd_F10_Ylb.Canvas.Brush.Color := clyellow; DBGrd_F10_Ylb.DefaultDrawColumnCell( Rect, DataCol, Column,[gdFixed,gdFocused,gdSelected] );
DBGrd_F10_Ylb.Canvas.Brush.Color := clyellow; DBGrd_F10_Ylb.DefaultDrawColumnCell( Rect, DataCol, Column,[gdFixed,gdFocused,gdSelected] );
X xinghuang Unregistered / Unconfirmed GUEST, unregistred user! 2002-08-17 #4 在dbgrid的onrawColumnCell事件里 procedure from1.DBGrid1rawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState); begin DBGrid1.Canvas.Brush.Color := clyellow; DBGrid.DefaultDrawColumnCell( Rect, DataCol, Column,[gdFixed,gdFocused,gdSelected] ); end;
在dbgrid的onrawColumnCell事件里 procedure from1.DBGrid1rawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState); begin DBGrid1.Canvas.Brush.Color := clyellow; DBGrid.DefaultDrawColumnCell( Rect, DataCol, Column,[gdFixed,gdFocused,gdSelected] ); end;
J jsxjd Unregistered / Unconfirmed GUEST, unregistred user! 2002-08-17 #5 好象答非所问，这里讲的是“滚动条”的颜色！ 应该不是太好改变
