S shubiao123 Unregistered / Unconfirmed GUEST, unregistred user! 2009-03-04 #1 1、怎样设置advstringgrid某个格子中字体的颜色?我想实现让某个格子中数字为0的字体的颜色为红色?
贝 贝尔 Unregistered / Unconfirmed GUEST, unregistred user! 2009-03-04 #2 procedure Tpfkd_f.advstringgirdGetCellColor(Sender: TObject; ARow, ACol: Integer;AState: TGridDrawState; ABrush: TBrush; AFont: TFont);begintrystrtofloat(advstringgird.cells[acol,arow]);AFont.Color:=clred;exceptend;end;
procedure Tpfkd_f.advstringgirdGetCellColor(Sender: TObject; ARow, ACol: Integer;AState: TGridDrawState; ABrush: TBrush; AFont: TFont);begintrystrtofloat(advstringgird.cells[acol,arow]);AFont.Color:=clred;exceptend;end;