EhLib中DBGridEh单元格根据不同内容显示不同颜色的方法
在单元格中显示不同颜色,有两种情形,一是对整个表格起作用,另一个是对某一列起作用。
一、作用范围在整张表中,在DBGridEh的OnGetCellParams事件中写如下代码:
procedure TfrmMain.DBGridEh3GetCellParams(Sender: TObject; Column: TColumnEh;
AFont: TFont; var Background: TColor; State: TGridDrawState);
begin
if Column.Field.AsString='优良' then
Background := clRed;
end;
二、作用范围在某列中,在该列的OnGetCellParams事件中写如下代码:
procedure TfrmMain.DBGridEh3Columns5GetCellParams(Sender: TObject;
EditMode: Boolean; Params: TColCellParamsEh);
begin
if Params.Text='优良' then
Params.Background := clRed;
end;
продажа фирм с расчетным счетом – купить готовое ип, ищу обнал