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

使dbgrid的某几笔资料变色-Delphi资料

HTML文档下载 WORD文档下载 PDF文档下载
使dbgrid的某几笔资料变色-Delphi资料

你可在 DBGrid 元件的 DrawDataCell 事件中

依资料的条件性来改变格子或文字的

颜色.

如 :

OnDrawDataCell(...)

begin

with TDBGrid(Sender) do

begin

if (条件) then

Canvas.TextOut(Rect.Left + 4

Rect.Top + 2

'要显示的文字

如表格的资料');

end;

而你会看到 DBGrid 的显示资料怎麽有重叠的情况

那是因为原本DBGrid

要显示的资料与 TextOut 所显示的资料重叠

解决方法 :

在 Query 元件所加入的栏位(在元件上按右键

会有 Add Fields...的选单)

不要显示资料的栏位的 OnGetText 事件中有一参数设定为 False;

procedure TForm1.Query1Detail1GetText(Sender: TField; var Text: string;

DisplayText: Boolean);

begin

// 决定在 DBGrid 得知表格资料时

要不要显示所得到的资料

False -> 不显示

// 就可避免与 TextOut 的文字重叠了

DisplayText : = False;

end;

end;

如果用 Delphi 3 处理很简单.

例如

对表中某字段当其数值小于0时为红字

其他为黑字.

在 DBGrid.OnDrawColumnCell(...) 中:

begin

if TableField.AsInteger < 0 then

DBGrid.Canvas.Font.Color := clRed

else

DBGrid.Canvas.Font.Color := clBlack;

DBGrid.DefaultDrawColumnCell(...);

end;

这样

对 Field 指定的格式仍旧生效

不必重写.

一周消息树: Windows 9系统截图大量曝光,一起来看看它长什么样! 腾讯李朝晖:不移动非互联,投资关注四大领域 【问底】Yao Yu:谈Twitter的百TB级Redis缓存实践 “OKCoin与你&#183;北京一夜”:共商比特币可持续繁荣之道 苹果再发力:推Apple Pay,或将引发新一轮支付变革 CausalImpact,谷歌开源的R时域因果关系分析工具 腾讯云总裁陈磊:互联网和传统企业互联网化是主线 不得不看,苹果Pay技术大起底! 详解Apple Pay:一大波iOS原生应用正在逼近! 高性能微信公众平台开发 【先锋】事务、高性能,王涛谈打造超越MongoDB的NoSQL 浅谈互联网数据中心海量运营之道 一篇文章读懂开源web引擎Crosswalk Facebook创建新开源组织TODO,Google、Twitter等继续捧场 微软明日将启动第二轮裁员 涉及所有的事业部 IBM推出Watson Analytics 将人机对话带进企业决策 参与2014中国移动开发者大调查 MDCC门票等你拿 手游开发经验谈:付费体系决定游戏收成好与坏? 惠普推出全新ProLiant Gen9服务器 腾讯安全出杀手锏 搭建全国最大Wi-Fi开放平台帮助网友免费蹭网 云与数据安全实践尽在ISC 2014(免费门票) 开源的对决,MapR将Apache Drill引入企业应用 令程序员费解的10个语言特性 走进雅虎北京全球研发中心:五年光阴缔造雅虎全球创新引擎 超强集成游戏编辑器!开源跨平台引擎Wave 求别再侵犯儿童隐私!FTC狠罚Yelp和TinyCo 华为应用市场助力开发者 软硬结合造就强大生态系统 【CTO俱乐部看板研修班北京站现场速递】看板方法:渐进变革的过程 《近匠》不背单词,用“沉浸”征服英语学习 ETpl——强复用、灵活、高性能的JavaScript模板引擎 MDCC 2014大会日程概览发布 最新嘉宾议题揭秘 谁有SCO OPENSERVER开发平台的Licence? [给分]请 playking(风雪青松) 来拿分 我的朋友有一个很急的问题! 如何在DELPHI中使用RealSystem Producer ActiveX Control 100分求winsock pbl(pb7.0) 菜鸟问题:一个关于api的别名问题!谢谢!!! ===菜鸟系列===:CSDN上没人了吗?为何无人能回答我的问题???????????? 请教:SQL中动态数据表如何进行查询? 如何将object转化为int?? 讨论:你是从IDL开始所有的编程工作吗? 修改弹出的OPEN对话框? 第二个页面中的FORM怎么传值给第一个页面的隐藏控件?不用SUBMIT 在LotusScript中,如何实现将附件保存于服务器的某目录下? CSDN说这里人气低,决定关了这里,大家快来说话啊,真关了我们就没地方说话了 如何将int转化为char? 如何实现窗口中拖放. 如何确定一个数据窗口有几个参数 数据库程序的运行环境问题求救!!! 寻求vb例程 如何用VB6控制NT的服务 try和catch的问题? 求助~!关于FileListBox的问题 请问要在Web页面中放置ActiveX控件,是不是一定要数字签名才能在客户端安装? 表格内容对齐 where can download the crack about Rational XDE Professional v2002 .Net Edition? 调查:现在大家所用的中文输入法是什么?录入速度是多少? 数据库程序的运行环境建立问题求救!!! 伙计们,帮我看看我的安装差在哪一步了,为何多系统下Linux起不来 如何将文件输入流转化为string? 关一个Servlet调用另一个Servlet的问题 有关报表的一个小问题。 怎样才能做繁体版? 100分请教PHOTOSHOP5.0是如何把CMYK颜色转成RGB显示的? 需求进销存或分销 如何替换某字符串中的指定字符串!!! tcp/ip 如何获取文件的创建时间? 如何再98中删除IE的历史纪录,很怪~~~~~~~~~~~! 讨论:从IDL开始所有的编程工作 大虾们如何动态创建Table的field Editor功能 高分求解!与Delphi的参数问题! xml spy suite4.2需要联机注册,有没有方法可以使用? linux为何没有出现在启动菜单 @_@ 在DELPHI中如何把一目录下的某文件移到另一目录中——急 在C#中如何用BinaryReader把DLL文件的内容读出来,并转来string? 如何根据Task ID或Process ID得到hwnd 如何让程序启动时自动hide()阿! 问一个最大化窗体与任务栏的关系的问题 把一表中一字段(字符型)以一條記錄返回出來. Rational Rose 中没有Delphi方面得模块,哪儿有与Delphi接口下载 谁有ActiveReport 2的中文例子和原程?在线等待!急急急! 关于努力、心态的作文材料(要新颖的) 唐朝诗歌繁荣的条件有哪些 关于音乐(music)的英语单词求求哥哥姐姐,说下! 钢板承受力计算我有一汽缸压一标件,压力面积是6CM的圆形.压力约为2吨受力面积是一块25CM*25CM的钢板,中心受力,受力钢板厚度应最小选择多少 描写唐朝盛世景象的诗句 知道了钢板所受压强和钢板面积,如何求钢板的厚度啊? 求奋斗作文素材要能与陈欧体结合的素材!:你只闻到我的香水,却没看到我的汗水; 你有你的规则,我有我的选择;你否定我 的现在,我决定我的未来;你嘲笑我一无 所有不配去爱,我可怜你总 角焊缝焊接耗材长度如何计算 一块直角三角形的钢板用1:200的比例尺画在图上,两条直角边共长5.4厘米,它们的长度的比是5:4.这块钢板的实际面积是多少平方米? 某班男同学的人数是女同学的2倍,在一次数学测验中,男同学的平均成绩是84分,女同学 的平均成绩是90分,全班的平均成绩是多少? 描写春天的诗句(唐朝的) 精彩的作文片段, 写一句体现大街上热闹的句子当句子不能出现热闹2字 在一个圆形花坛的外围修一条1.5m宽的小路,已知外圆的直径是10m,求小路的面积. 谁有精彩的文章片段最好能150字~200字之间的! 议论文《拼搏与奋斗》该怎样写议论文和说明文是否相似 一个圆形花坛直径为4M,现在要在花坛周围修一条1.5M宽的小路,求小路的面积. 精美文章选段,每段大约100--200之间,最好是名篇名段,易于背诵,文章短小优美,并加以分类.40篇左右.越快越好! 写一句体验节日热闹的句子,但句子中不能出现"热闹"或"闹"字如题 公园里有一圆形花坛,花坛的直径是7.5m,在它的外面铺一条宽1.5m的小路.这条小路的面积是多少平方米. 高中作文精彩段落 关于努力的议论文急----------------------*////***---*****//*------------**//////◎#¥%!……※(!》》/*- 某一学习小组有12人,数学考试时有10人参考,平均分是81.5,后来,缺考的小明和小红补小明的成绩比原来10人的平均分少1.5,而小红却比12人平均分多12.5分,小红考了多少分 国庆英语作文100词 描写热闹的句子8个,不超过10字最好. 一个学习小组有12个同学,一次数学考试,李平请假,其余11人的平均分是85分.后来李平补考,成绩比12人的平成绩还高5.李平考了多少分? 关于庆祝国庆节的英语作文,我要参加作文竞赛,100词左右,要单词简单一点的,句型多一点 写一句体现节日热闹的句子,但句子中不能出现“热闹”或“闹”字顺便再告诉我物流的通俗说法 某学习小组有12人,一次数学测验只有10人参加,平均分是81.后来,缺考的李明和张红进行了补考,李明的补考成绩比原来10人成绩的平均分少1.而张红的补考成绩却比12人的平均分多12.张红考了多 最开心的一件事作文 房间地面是一个长方形,长5米,宽4米.打算铺地砖,需长40厘米,宽25厘米的地砖多少块?多少块? 初中精彩作文片段 200字 一件高兴的事作文 急 急 大街上真热闹,…….(围绕热闹写)补充完整句子,怎么写? 描写父母间的事的作文片段(200字左右)快 一件开心的事作文 求写一篇春节前的作文! 描写重大节日的作文片段200字 精彩美文片段摘抄~ 学校运动场占地四分之一公顷,其中跑道占八分之一,活动场地占三分之一,其余的是绿化带. 我们的校园 有没有很好的关于奥运的文章啊?段落也可以的.一定要是关于奥运的,而且要好,如果有的请快一点,急用! 校园里的绿化面积是4分之3公顷,平均分成6块,每块绿化面积是多少公顷箱子里有糖果12分之11千克。如果每12分之1千克装一袋,那么要装几袋?帮我把这道题的单位“1”写出来 3D MAX 里克隆 的英语单词是什么?xiexie 我需要名家文章精彩段落 一个圆形花坛,它的直径是8米,在它的周围铺一条宽1米的环形小道,环形小道的面积 这个㤗字怎么读?这是我复制的 求精彩美文片段摘抄 在半径为2米的圆形花坛周围,铺一条宽为1米的环形小道,这条小道的面积是多少? 描写秋天的作文好词好句 一群学生郊游,男生看到男女生人数一样,女生看到男生是女生的2倍,一共有多少人?方程怎么列? 一个花坛直径5米在它的周围有一跳宽1米的环形小路小路的面积是多少平方米? 《又是秋天》作文,有没有一点提示,或者素材,好词好句~ 预算对于 钢板制作的天圆地方有规定么 价格只是展开面积么.还是有别的项目.只按面积计算的话够成本么天圆地方 是一个东西 一个异型件。制作起来比较麻烦。而普通的 方箱子 或者圆筒 在面积是21平方米的房间铺地砖,地转的长是2/5m,宽是3/10m,铺满这个房间,至少需要多少块砖? 关于音乐(music)的英语单词千万不要复制!复制的不要! 钢板的重量怎么算? 钢铁承受力怎么计算如题 唐代写风景的诗句 关于音乐(music)的英语单词
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘