cxgrid 这两 个控件 能否 实现 鼠标 经过 每一条数据行 时 改变 整行 的 底颜色 ？？？？？
cxgrid 这两 个控件 能否 实现 鼠标 经过 每一条数据行 时 改变 整行 的 底颜色 ？？？？？
鼠标移走后变回原来的底颜色
如何实现？？
问题点数：20、回复次数：16Top
1 楼fsqman（q）回复于 2006-06-03 22:56:30 得分 0
upTop
2 楼fsqman（q）回复于 2006-06-04 08:47:25 得分 0
upTop
3 楼cncharles（旺仔）回复于 2006-06-04 11:47:15 得分 0
这样的问题才给20分???????Top
4 楼fsqman（q）回复于 2006-06-04 12:08:18 得分 0
你要多少分?? 我给你Top
5 楼reizedelphi（）回复于 2006-06-04 15:07:26 得分 0
easy 有时间给你 下次给分也不要太小气Top
6 楼reizedelphi（）回复于 2006-06-04 15:09:12 得分 0
procedure TForm1.cxGrid1DBTableView1CustomDrawCell(
Sender: TcxCustomGridTableView; ACanvas: TcxCanvas;
AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);在这个事件中
begin
var
ATextToDraw, val,chk1,chk2: String;
// ARec: TRect;
procedure SetTextToDraw;
begin
ATextToDraw := AViewInfo.GridRecord.DisplayTexts[AViewInfo.Item.Index];
end;
begin
inherited;
SetTextToDraw;
val := VarAsType(AViewInfo.GridRecord.DisplayTexts[cxGrid1DBTableView1pur_no.Index], varString);//
chk2 := VarAsType(AViewInfo.GridRecord.DisplayTexts[cxGrid1DBTableView1uqty.Index], varString);
chk1 := VarAsType(AViewInfo.GridRecord.DisplayTexts[cxGrid1DBTableView1DBColumn5.Index], varString);
if val = '' then//判断某一列的值是否为空
ACanvas.Canvas.Brush.Color := clInfoBk
else
if chk1<>chk2 then
ACanvas.Canvas.Brush.Color := clmoneygreen;
if AViewInfo.Selected then
ACanvas.Canvas.font.Color := clRed;
ACanvas.DrawText(ATextToDraw, AViewInfo.Bounds, 0);
end;
前面满足条件的获得后颜色不一样
自己再改一下就可以了Top
7 楼fsqman（q）回复于 2006-06-04 17:55:20 得分 0
reizedelphi 你又再这里乱说根本不行Top
8 楼reizedelphi（）回复于 2006-06-04 18:22:47 得分 0
放屁 老子天天做总帐统计 自己瓜Top
9 楼fsqman（q）回复于 2006-06-04 20:19:45 得分 0
你的代码根本实现不了 鼠标 经过 每一条数据行 时 改变 整行 的 底颜色!!!!!!!!!!!!!!!!Top
10 楼cncharles（旺仔）回复于 2006-06-05 08:11:20 得分 20
给你一个思路:要用WM_HMOUSEMOVE或WM_MOUSELEVE 消息,
再从这个消息中提取Mouse Piont, 再得到该点的cxGrid
RowInfo, 再Draw.Top
11 楼reizedelphi（）回复于 2006-06-05 09:57:13 得分 0
不知道改吗?Top
12 楼fsqman（q）回复于 2006-06-06 21:04:01 得分 0
upTop
13 楼xiaocuo_zrf（小错——淫雄所贱略同）回复于 2006-06-07 10:07:03 得分 0
放100分就回答
Top
14 楼fsqman（q）回复于 2006-06-09 22:22:14 得分 0
帮帮忙吧,版主Top
15 楼fsqman（q）回复于 2006-06-12 15:04:38 得分 0
upTop
16 楼cangwu_lee（橙子）回复于 2006-06-12 16:36:45 得分 0
那么复杂的grid ，不如不用！Top
