香港购物美食攻略:dbgrideh不同行,不行颜色

来源：百度文库 编辑：九乡新闻网 时间：2024/07/14 02:21:21
【实现 DBGridEh 隔行分色显示】
procedure TForm1.DBGridEh1GetCellParams(Sender: TObject; Column: TColumnEh;
AFont: TFont; var Background: TColor; State: TGridDrawState);
begin
　 if DBGridEh1.SumList.RecNo mod 2 = 1 then
　　 Background := $00FFC4C4
　 else
　　 Background := $00FFDDDD;
end;


【DBGridEh 在某些条件下某行显示特定颜色】
procedure TForm1.DBGridEh1GetCellParams(Sender: TObject; Column: TColumnEh; AFont: TFont; var Background: TColor; State: TGridDrawState);
begin

　//在 name 字段值为 aaa 的行设置行背景色（ado 设置情况下）
　if ADOQuery1.FieldByName('name').AsString = 'aaa' then
　　　Background := $00FFC4C4

　//在 xm 字段值为 Li ming 的行设置行背景色（bde 设置情况下）
　else if DBGridEh1.DataSource.DataSet.FieldByName('xm').AsString = 'Li ming'　then
　　 Background := $00FFC4C4
　else
　　 Background := $00FFDDDD;

end;　

dbgrideh不同行,不行颜色 不笑不行 漫画---不佩服不行 漫画---不佩服不行 缘分呐，原来是同行（不笑都不行） word用法 ----不收藏不行 中国，不打仗都不行 体身全问题...不顶不行 dbgrideh中多选时selection dbgrideh只读录入 不收藏不行的word用法 史上最全word用法！【不收藏不行】 雷人对联 不 服不行 不收藏不行的 史上最全word用法 经典广 告～～不顶不行 看了这对联，不笑不行 不收藏不行的史上最全word用法 不 收藏不行的史上最全word用法 A史上最全word用法 ----不收藏不行 @史上最全word用法 ----不收藏不行 不笑不行，各种有趣图片013 史上全word用法 ----不收藏不行 史上最全word用法 ----不收藏不行 史上最全word用法 ----不收藏不行