代码也挺简单的,只是当时没有想到:
if ds2.FieldByName('AutoRead').AsInteger=0 then
begin DBGridEh1.Canvas.Brush.Color:=clGrayText; DBGridEh1.Canvas.Font.Color:=clWhite; DBGridEh1.DefaultDrawColumnCell(Rect, DataCol, Column, State);end;本文共 272 字,大约阅读时间需要 1 分钟。
代码也挺简单的,只是当时没有想到:
if ds2.FieldByName('AutoRead').AsInteger=0 then
begin DBGridEh1.Canvas.Brush.Color:=clGrayText; DBGridEh1.Canvas.Font.Color:=clWhite; DBGridEh1.DefaultDrawColumnCell(Rect, DataCol, Column, State);end;转载于:https://www.cnblogs.com/bwdblogs/p/10220060.html