急求　CxGrid　的问题　，在线等！！祝各位大哥工作快乐！

刘物峰 2006-10-08 09:11:27

有没有朋友知道　CxGrid　的中如何让符合条件的记录显示不同的颜色？？？在线等！！

...全文

334 13 打赏收藏转发到动态举报

写回复

用AI写文章

13 条回复

切换为时间正序

请发表友善的回复…

发表回复

firefox2000 2006-10-14

打赏
举报

aiq和wqrz答对了,开帖给分说话算数

wqrz 2006-10-13

打赏
举报

TableView里的optionView里的一个属性设置成false就不出来了属性名忘了，来点分啊

firefox2000 2006-10-12

打赏
举报

帮你顶
顺便提一个这个控件的问题,cxGrid上方默认有一个分组拖放Panel怎么才能隐藏起来,原来的TdxDBGrid有个属性可以隐藏,但cxGrid好像没找到.

第一个回复正确的我另外开帖给100分! 请大家帮忙.

xjjrocker 2006-10-11

打赏
举报

晕，你干吗开了两个帖子问了同一个问题哦，我竟然回答了两遍同样的，晕

xjjrocker 2006-10-11

打赏
举报

{设定Grid的不同行颜色显示}
procedure TfmTotalSum_NCJCSJTJ.cxGrid1DBTableView1CustomDrawCell(
Sender: TcxCustomGridTableView; ACanvas: TcxCanvas;
AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
var
str,str1:string;
begin
str:=trim(VarAsType(AViewInfo.GridRecord.DisplayTexts[cxGrid1DBTableView1Column4.Index], varString));
str1:=trim(VarAsType(AViewInfo.GridRecord.DisplayTexts[cxGrid1DBTableView1Column10.Index], varString));
if str='不合格' then
begin
//ACanvas.Canvas.Brush.Color :=clred;
ACanvas.canvas.Font.Color :=clred;// clblack;
end
else if str='合格' then
begin
//ACanvas.Canvas.Brush.Color :=clgreen;
ACanvas.canvas.Font.Color :=clgreen;// clblack;
end;
if AViewInfo.Selected then
begin
ACanvas.Canvas.Font.Color :=clwhite; //clBlue ;字体颜色
ACanvas.Canvas.Brush.Color :=clNavy ;//clwhite;背景颜色
end;
if str1='已上传'then
begin
ACanvas.Canvas.Brush.Color :=clGradientActiveCaption ;
end;

end;

llh6795 2006-10-11

打赏
举报

路过

AOCOC 2006-10-09

打赏
举报

要是真的很多种，就没必要这样了。。。。不然眼睛都看花了。。。嘿嘿。。

csnight 2006-10-09

打赏
举报

在IF 后面多加几个条件，不觉得麻烦啊
其他还有什么更好的办法？

GARNETT2183 2006-10-09

打赏
举报

楼上只解决了一种情况，如果有非常多的情况，就麻烦了。。。

csnight 2006-10-09

打赏
举报

procedure Tform1.cxGridDBTableView2StylesGetContentStyle(
Sender: TcxCustomGridTableView; ARecord: TcxCustomGridRecord;
AItem: TcxCustomGridTableItem; out AStyle: TcxStyle);
begin
if ARecord is TcxGridDataRow then
begin
if USER＿ID = '001' then
begin
AStyle.Color := clRed;
end;
end;
end;

楼主给分吧

sunxianyu 2006-10-09