delphi 如何改变符合条件的dbgrid背景色?

我想做一个查询,比如,我想把姓张的员工的姓名都显示出来,dbgrid的显示背景色变为红色,其他的颜色不变。请问如何实现?... 我想做一个查询,比如,我想把姓张的员工的姓名都显示出来,dbgrid的显示背景色变为红色,其他的颜色不变。请问如何实现? 展开
 我来答
快乐居家美食
2006-10-26 · TA获得超过1943个赞
知道大有可为答主
回答量:2392
采纳率:100%
帮助的人:1551万
展开全部
可以在DBGrid的DrawColumnCell事件里面控制
uses
StrUtils;

procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
if AnsiStartsText('张', ADOTable1.FieldByName('name').AsString) then
(Sender as TDBGrid).Canvas.Brush.Color := clRed;
//(Sender as TDBGrid).Canvas.Font.Color := clRed;//如果改字体颜色用这个

(Sender as TDBGrid).DefaultDrawDataCell(Rect, Column.Field, State);
end;
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式