wwdbgrid(15分)

  • 主题发起人 主题发起人 nter
  • 开始时间 开始时间
N

nter

Unregistered / Unconfirmed
GUEST, unregistred user!
在wwdbgrid(INFOPOWER)中,我想使某列改成其它颜色,怎做,
请帮帮忙!!
 
分数给我吧 :)

请看:
在wwdbgrid的onCalcCellColors事件中写相应代码即可。
设置ABrush.Color的值即可设定背景色。
设置AFont.Color的值即可设定文字色。
举个例子:
procedure TForm1.wwDBGrid1CalcCellColors(Sender: TObject; Field:
TField; State: TGridDrawState; Highlight: Boolean; AFont: TFont;
ABrush: TBrush);
begin
if (Field.FieldName = 'State') then begin
if (Field.Text = 'CO') then begin
AFont.Color := clRed;
if (not Highlight) then ABrush.Color := clYellow;
end;
end;
end;

<<<===Arewen
 
接受答案了.
 
后退
顶部