dbgrid操作问题
怎样根据查询条件来设置对应记录的显示颜色,比如:数量大于10000的记录显示为红色,小于10000的为默认 黑色
谢谢!!!
[解决办法]
procedure TForm1.DBGrid1DrawDataCell(Sender: TObject; const Rect: TRect;
Field: TField; State: TGridDrawState);
begin
if Field.FieldNo> 10000 then
DBGrid1.Canvas.Brush.Color:=clRed
else
DBGrid1.Canvas.Brush.Color:=clWhite;
DBGrid1.DefaultDrawDataCell(Rect,Field,State);
end;
[解决办法]
没有table 就加个再在 procedure TForm1.DBGrid1DrawDataCell(Sender: TObject; const Rect: TRect; Field: TField; State: TGridDrawState);中加入 if table1.filedbyname( '字段 ')> 10000 then DBGrid1.Canvas.Brush.Color:=clRed......其实 “HsWong”也一样的意思