说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

在Delphi中随意控制DBGrid 每一行的颜色

HTML文档下载 WORD文档下载 PDF文档下载
在Delphi中随意控制DBGrid 每一行的颜色

---- 要改变DBGrid每一行的颜色,只要在ONDrawColumnCell事件中设定要改变颜色的行的条件,并指定DBGrid的Canvas.Brush.color属性并且把Canvas.pen.mode属性设成pmmask,再调用DBGrid的DefaultDrawColumnCell方法即可。注意在改变这两个属性前要先保护好原来的Canvas.Brush.color属性的值,调节器用完成 DefaultDrawColumnCell方法后要把原属性值改回,现以Delphi\demos\db\clientmd 目录下的演示程序clintproj.dpr 为例子

做简单说明,下面是对程序中的栅格MemberGrid的合条件的整行进行变色,变成黑体背景黄色的,其它不合条件的行的颜色为正常字体,白色背景,只在DrawColumnCelL 事件中设条件其它的不变,如下:

procedure TClientForm.MemberGridDrawColumnCell(

Sender: TObject; const Rect: TRect;

DataCol: Integer; Column: TColumn;

State: TGridDrawState);

var

oldcolor:tcolor;

oldpm:tpenmode;

begin

if DM.ProjectTEAM_LEADER.Value =

DM.Emp_ProjEMP_NO.Value then {设定变色的行的条件}

MemberGrid.Canvas.Font.Style := [fsBold];

MemberGrid.DefaultDrawColumnCell

(Rect

DataCol

Column

State);

{上面是演示程序的原内容,以下是增加部分}

if DM.ProjectTEAM_LEADER.Value =

DM.Emp_ProjEMP_NO.Value then {设定变色的行的条件}

begin

oldpm:= MemberGrid.Canvas.pen.mode;

oldcolor:= MemberGrid.Canvas.Brush.color;

MemberGrid.Canvas.Brush.color:=clyellow;

MemberGrid.Canvas.pen.mode:=pmmask;

MemberGrid.DefaultDrawColumnCell

(Rect

DataCol

Column

State);

MemberGrid.Canvas.Brush.color:=oldcolor;

MemberGrid.Canvas.pen.mode:=oldpm;

end;

end;

SUSE全球OEM联盟总监:为何SAP HANA只选择SUSE? 推荐2013年最佳PHP开发框架 Patrick Wyatt:代码没问题 程序却有bug? NoSQL的可靠性及扩展操作 最新Skype加密技术:“无声”通话能躲过FBI监听 谷歌锁死SDK,能阻止Android碎片化吗? KitCam团队专访:为应用做加法也能雄踞榜首 谷歌哭了:Replicant 4.0 SDK发布搅乱大局 忍者神龟与禅宗启示:如何突破移动广告困境 Linux会是更好的游戏平台?暴雪是这么认为的! 新型恶意软件瞄准Java服务器 AWS被纳为“战略物资”市值或可达到300亿美元? 十张图带你入门Map/Reduce 低端Android野心,Intel发布Atom Z2420处理器 淘宝网的技术发展史(一)——个人网站时代 看Pinterest如何通过架构变化将EC2成本降低了62% 内容vs渠道:法国电信商Free叫板Google 让网站成为应用:Firefox OS掀起革命风潮 屌丝伞兵的逆袭:4人+盛大+远程+最佳手游 新年头彩:Chartboost喜获1900万美元融资 高富帅跻身移动领域 福特开放车载声控API 传低端iPhone最低只要99美元 你怎么看? 辉煌不再 Encanto超级计算机可能被拆分“出售” 知己知彼 企业应用移足云端必须清楚的10大方面 NVIDIA推Android掌机:七年孕育可否成就野心? 人民日报:2013关于新媒体的8个猜想 互联网大时代成就创新小企业 移动互联网创新论坛报道 Mobile Detect:判断移动设备类型的开源PHP类 我是如何Hack Facebook Employees Secure Files Transfer服务的 投资可再生能源:Google 2亿美元投资风力农场 构筑商业生态系统 阿里巴巴集团全面变革组织架构和管理体系 help help : fortran + dll = ? 奇怪的现象:判断不了SQL sum()查询结果!!! 2003高考试题 设置访问表命令:“access-list 2 permit 10.0.0.0 0.0.0.255”中10.0.0.0 和 0.0.0.255分别指什么? 请问谁知道这是什么缘故啊? 如何计算cpu和memory的一般的使用上限 在delphi中使用什么报表控件打印的报表效果较好 谁知道db或dbf头文件的格式? 急急 NMFtp中我想从ftp服务器下载指定文件扩展名的文件,该怎么办? 初始化页面的时候,如何使TextMode="Password"的asp:textbox有默认值显示? IBM软件清库存(大优惠) 又是可恶的乱码问题 struts与数据库!在线等待! 如何开发asp.net程序(基于vb) vc++的链接错误 如何用程序动态的获得activex控件的方法属性事件信息 请教:使用web.xml做资源约束时如何由自己的程序来做用户验证 请问:怎样编程来来虚拟网卡? 急!创建LOOKUP的问题 如何计算cpu和memory的一般的使用上限 新问题请教! 老问题:从Excel文件里把数据导入导数据库中 有汇编玩的非常牛的人吗??? 字符串操作的简单问题 学习J2EE需要装什么软件? >>有关记录的问题??<< 请高手指教:出现“ORA12663:服务器未提供客户机要求的服务”问题,怎么解决? 大侠救我! 动态sql问题请教,谢谢 填充combobox的问题 windowsxp不能创建拨号连接 怎樣轉換時間格式 ACCESS问题 Linux下上网问题?在线等待!急!急!急! 终极讨论:从Excel文件里面导入数据 winsock的问题 关于WINDOWS下邮件程序编写问题 Solaris下的Makefile问题 在lan里面的两台主机之间怎么配ppp连接,没有modem 我的SQL数据库安装的是实例,好象有问题哦! 高分求票据、合同套打代码! 事务问题,请大家帮忙,在线等待,50分相送!!!! xml解析的问题? 关于CRuntimeClass,请指教。 100分求解(在线等待) 终极讨论:从Excel文件里面导入数据 CString怎样转换为char * 类型? 有关爱情与事业的讨论! replace(replace(replace(replace(str,"<","&lt;"),">","&gt;"),chr(13),"<br>")," ","&nbsp;")是什么意思? 非常简单的问题!!! 看看这个portal做的怎么样? 2009初二寒假英语日记5篇 我英语不是非常好 想考本科但是要过英语a及 求方法如题 人寒冷的感觉是怎样造成的? 寒假日记(英语)5篇(初二)带翻译.不要复制的.记得要是想个国中生写得.不要跟外国人写的一样. suggestion怎么用 怎样才能给人一种冰冷的感觉 sb with sb+is sb and 已知二次函数 f(x),f(1)=4,f(2)=7,f(-1)=10.求这个二次函数的解析式 英语翻译Poligono Industrial Baix Ebre H STREET PLOT 79/80 sb with sb +is sb and sb +are English is widely used _____ travellers and business people all over the world.A.to B.as C.by D.for 请翻译, 如图,四边形ABCD中,AD平行BC,点E在CD的延长线上,连接DE,交AB于点F,连接DB,∠AFD=∠DBE,且DE方=BE乘CE,(1)求证:∠DBE=∠CDE,(2)当BD平分∠ABC时,求证:四边形ABCD是菱形. 柔性制造单元FMC与柔性制造系统FMS有什么相同和不同?CIMS有那些基本功能模块组成? 养怡之福可得永年的永年是什么意思? 英语翻译llacer ramirez lerardo laguia numero 49 alzira 46600西班牙巴伦西亚的一个地址。请注明那个是街道什么的 最好能翻译成中文的地址 这是哪国的语言啊,做了一个奇怪的梦,梦中的外国人给我讲了很多,只记住一句.WU MI TANG 乌咪汤 若偶函数f(x)的定义域为【-1,1】,且在【0,1】上单调递减,若f(1-m) 英语翻译CALLE MARIA DE GUZMANNUM 58 Piso BJ 28003 MADRID After discussion,his suggestion is that his brother ( ) to the front.A sendingB should sendC sendD be sent 中华苏维埃第一次全国代表大会和全国第一次代表大会有什么不同?中国苏维埃第一次全国代表大会与全国第一次代表大会有什么不同(就是1921年的那一次)? 英语翻译街道:Avda,fuenlaburad65 地区:leganes Madrid Espana 在三角形ABC中,已知c=根号2+根号6,C=60度,求a+b的取值范围. 阴菜是什么菜 喜阴的农作物有哪些? 英语翻译中远物流是我国最大的中外合资第三方物流企业,随着市场竞争的加剧,企业纷纷在创新战略、加强增值服务上下功夫.中远集团为了更好的物流服务在国内、国际市场中赢得竞争优势, 两会中的人民代表大会和每五年一次的全国代表大会的区别是什么?如果本年度召开了全国代表大会,还要召开两会中的全国代表大会么? 在北方什么农作物喜阴 养怡之福可得永年怎样理解 几何除了欧式几何还有哪些几何大类? 什么作物喜阴 英语翻译1、图片中使用白盒代替彩盒2、这种包装方式不能通过drop test3、详细包装方式,请查看附件的说明4、由于我们没有做过12pcs的包装方式,所以我们没有Die-lines,但我可以提供Color box的参 养怡之福的之,盈缩之期的之我知道这两个之词性一样,但不知是什么词性, 兵的故事;”但此刻,他肯定是最感寒冷的一个人“?这句话和故事的结局有什么关系? 英语翻译This email is to confirm that your email has been received.If you are applying for an advertised vacancy please ensure you attach your CV and supporting documentation.Please note the company does not accept prospective applications. Vien的意思Vien这个英语名字翻译过来叫什么.. 有什么喜阴的作物啊?我想种在我家的大树下! 曹操的"盈缩之期,不但在天;养怡之福,可得永年."是什摸意思? Vien什么意思 为什么说“但此刻,他肯定是最感寒冷的的一个人”?这句话和故事的结尾有什么关系?《兵的故事》天黑了.暴风雪呼啸得更加(愤怒 狂怒).一辆客车已经被暴风雪困在公路上六七个小时.车上 “盈缩之期,不但在天;养怡之福,可得永年.幸甚至哉,歌以咏志.”意思. sinh 《兵的故事》中为什么说"但此刻,他肯定是最感寒冷的一个人”?这句话和故事的结局有什么关系?” 导入柔性化管理机制,以适应市场快速变化的需求.(翻译英文,误用翻译软件) 定义与性质的不同急以三角形为题 为什么说但此刻,他肯定是最感到寒冷的一个人?这句话和故事的结局有什么关系天黑了.暴风雪呼啸得更加(愤怒 狂怒).一辆客车已经被暴风雪困在公路上六七个小时.车上二十几名乘客中,有 已知二次函数f(x)满足f(0)=f(4),且f(x)=0的两根平方和为10,图像经过(0,3)点,求f(x)的解析式如题 英文名Vien感觉怎么样?是什么含义? 中华人民共和国第十一届全国人民代表大会第二次会议是什么时候开的 英语翻译刚刚在微信里头看到前世是怎么死的,由于蛮无聊的,就测了一下,出来的是 粤语 笑西死,你前世既然一棵桉树,= =能帮我翻译一下吗,人家测出来的再奇葩好歹也是国语,这粤语...真心蛮 性质和定义的区别 第十一届全国人民代表大会第四次全体会议什么时候召开? 已知二次函数f(x)满足f(0)=f(4),且f(x)=0的两个平方和为10,图像经过(0,3)点,求f(x)的解析式. “性质”和“意义”有什么区别 第十一届全国人民代表大会什么时候开始,什么时候结束? 大拇指只有两个关节,这样的结构,有什么好处?回答完整一些 考好英语笔试部分的窍门 方法 喜阴的菜有哪些 二年级寒假关于新闻的日记(5篇) 如何使用suggestion 理一理,连句成段.只写序号【】这个八边形的''藻井,还是古代的木质扬声器呢【】最典型的戏台 绍兴柯桥区塘乡的宾舍戏台距今已有400多年的历史.【】藻井壁间画着八仙过海的故事.【】在 美墨边境发现新贩毒地道 配电力轨道和经济滞缓导致欧元区通胀率降至2009英媒窃听案中两名涉案编辑被传系恋人关美将俄歌星列入黑名单 俄抗议表示不可美国一客机收到炸弹威胁 现已紧急转降伊朗“巴斯基”武装力量在伊展开演习 日媒醋意评价朴槿惠外交策略 称其无视德媒:斯诺登与德绿党议员见面 有意前万圣节狂欢化装派对 萌“小鬼”们惹人国际刑事法院再次推迟肯尼亚总统出庭受澳维州出台新法规定性侵犯再犯案将不准秘鲁组成新内阁 塞萨尔 比利亚努埃瓦盟友也要区别对待 日本德国仍是美国监英国房价一年上涨5.8% 专家警告“温家宝2010年与大学生座谈:大学生日议员向天皇塞信望其了解民间疾苦 或温家宝出书谈教育忆童年 部分通信首次观察:中国高层释楼市调控信号 长效机日本大规模夺岛军演科目敏感 专家:在香港立法会将讨论是否暂停对菲律宾人入爱,从头开始“给妈妈梳头”走进北京回■一周义诊大数据看懂留美读工程:学通讯,毕业后公共健康 成留学加拿大“黄金专业”又有两位幸运儿“晒彩票”赢电视把红酒“叫醒”美国记者布莱恩:中医在西方越来越受欢又见11·17,这回拒绝“港囧”奇葩的是工作 还是工作者?“我就是拳王” 结束广州站海选益生菌研讨会 在穗举办专家论彩又见11·17,这回拒绝“港囧”可口可乐天猫 合作跨界启航台湾研究证实塑化剂影响男性生育初冬水果煮着吃?黄妈:我的IQ是0少女时代亚太国际文化交流中心6周年“天河二号”获全球超算六连冠我们的匆匆那年除了抢占本地蚁的地盘和偷种子, 红火
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘