在DBGrid1DrawColumnCell中加 { if (DBGrid1.DataSource.DataSet.FieldByName("name")->AsString=="王姓" begin DBGrid1.Canvas.Font.Color := clRed; DBGrid1.DefaultDrawDataCell(Rect, Column.Field, State); end }
在dbgrid的onDrawDataCell事件中写代码就可以了。
在DBGrid1DrawColumnCell中加 { if (DBGrid1.DataSource.DataSet.FieldByName("name").AsString = '王姓' begin DBGrid1.Canvas.Font.Color := clRed; DBGrid1.DefaultDrawDataCell(Rect, Column.Field, State); end }
dbgrid的每一列是一个字段 你可以用 if Table1.fieldbyname('name')='黄' then dbgrid1.canvas.font.color:=clred;
在dbgrid中有一个dbgriddrawcolumncell事件 dbgriddrawcolumncell(sender:tobject;const rect:trect;datacol:integer;column:tcolumn;state:tgriddrawstate); begin if table1.fieldbyname('name')='王' then dbgrid.canvas.font.color:=coblue; dbgrid.defaultdrawdatacell(rect,column.field,state); end;
{
if (DBGrid1.DataSource.DataSet.FieldByName("name")->AsString=="王姓"
begin
DBGrid1.Canvas.Font.Color := clRed;
DBGrid1.DefaultDrawDataCell(Rect, Column.Field, State);
end
}
{
if (DBGrid1.DataSource.DataSet.FieldByName("name").AsString = '王姓'
begin
DBGrid1.Canvas.Font.Color := clRed;
DBGrid1.DefaultDrawDataCell(Rect, Column.Field, State);
end
}
你可以用 if Table1.fieldbyname('name')='黄' then
dbgrid1.canvas.font.color:=clred;
dbgriddrawcolumncell(sender:tobject;const rect:trect;datacol:integer;column:tcolumn;state:tgriddrawstate);
begin
if table1.fieldbyname('name')='王' then
dbgrid.canvas.font.color:=coblue;
dbgrid.defaultdrawdatacell(rect,column.field,state);
end;