请问,怎么在DBGRID中改变CELL内容 Delphi / Windows SDK/API
http://www.delphi2007.net/DelphiDB/html/delphi_20061216104516278.html
我写了以下代码:但是还是显示数字  
  procedure   TMakeTicket.DBGridEh3DrawColumnCell(Sender:   TObject;  
      const   Rect:   TRect;   DataCol:   Integer;   Column:   TColumnEh;  
      State:   TGridDrawState);  
  begin  
      inherited;  
      with   DBGridEh3.Canvas   do  
      case   ADOQuery2.FieldByName('status').AsInteger   of  
      1:TextRect(Rect,Rect.Left,((Rect.Bottom-Rect.Top)-TextHeight('处理'))   div   2,'处理');  
      2:TextRect(Rect,Rect.Left,((Rect.Bottom-Rect.Top)-TextHeight('未处理'))   div   2,'未处理');  
        end;  
    DBGridEh3.DefaultDrawColumnCell(Rect,   DataCol,   Column,   State);  
  }

去掉inherited试试

procedure   TMakeTicket.DBGridEh3DrawColumnCell(Sender:   TObject;  
      const   Rect:   TRect;   DataCol:   Integer;   Column:   TColumnEh;  
      State:   TGridDrawState);  
  begin  
      inherited;  
      if   Column.FieldName   =   'Status'   then  
      begin  
          with   DBGridEh3.Canvas   do  
          begin  
              FillRect(Rect);  
              case   ADOQuery2.FieldByName('status').AsInteger   of  
              1:TextRect(Rect,Rect.Left,((Rect.Bottom-Rect.Top)-TextHeight('处理'))   div     2,'处理');  
              2:TextRect(Rect,Rect.Left,((Rect.Bottom-Rect.Top)-TextHeight('未处理'))   div   2,'未处理');  
          end;  
      end   else  
      DBGridEh3.DefaultDrawColumnCell(Rect,   DataCol,   Column,   State);

1:TextRect(Rect,Rect.Left,((Rect.Bottom-Rect.Top)-TextHeight('处理'))   div     2,'处理');  
              2:TextRect(Rect,Rect.Left,((Rect.Bottom-Rect.Top)-TextHeight('未处理'))   div   2,'未处理');  
   
  ============可以简洁点  
   
    1:TextOout(Rect.Left,   Rect.Top+2,'处理');  
    2:TextOout(Rect.Left,   Rect.Top+2,'未处理');

1:TextOout(Rect.Left+2,   Rect.Top+2,'处理');  
    2:TextOout(Rect.Left+2,   Rect.Top+2,'未处理');

请问,怎么在DBGRID中改变CELL内容相关推荐

  1. Delphi中将DBGRID中的内容输出到WORD中

    这是我很久以前写的一篇文章,现在将它贴出来! 在使用DELPHI开发过程中发现网上有很多的开发朋友询问关于将DBGRID中的内容导出到一个WORD中的方法.想想可以帮帮大家,所以就自己写了一个.希望对 ...

  2. 动态改变UITableView中的Cell高度

    往往在开发iPhone的应用过程中用得最多的应该算是UITableVIew了,凭着IOS给UITableView赋予了这种灵活的框架结构,让它不管在显示列表方面还是在排版方面都有着一定的优势.虽然UI ...

  3. 当一个对象实例作为一个参数被传递到方法中时,参数的值就是对该对象的引用。对象的内容可以在被调用的方法中改变,但对象的引用是永远不会改变的.

    当一个对象被当作参数传递到一个方法后,此方法可改变这个对象的属性,并可返回变化后的结果,那么这里到底是值传递还是引用传递 答:是值传递.Java 编程语言只有值传递参数.当一个对象实例作为一个参数被传 ...

  4. C#在一个form中改变另一个form中控件的内容、C#做登录界面并且密码显示为*

    C#中在一个窗体中改变另外一个窗体中控件的显示 这个问题可以用来改变messageBox中默认显示的"确定",可以使用此方法重新写一个窗体,显示OK: 方法: 1.将要改变的for ...

  5. html改变文字字体视频,修改视频中的文字(怎么修改视频中的文字内容)小视频文字广告替换教程方案(易学)...

    不得不说现在各方面的推广真的是很重要,就像和我们狸窝家园一样,要想让许多人熟知且喜欢上是个非常不容易的事情.我们有时候看视频的时候往往精彩的部分会出现一些乱七八糟的广告,现在连电视剧都给玩坏了,简直就 ...

  6. 在DBGrid中实现Copy、Paste功能 - DELPHI

    在DBGrid中实现Copy.Paste功能 - DELPHI 工具条上的Cut.Copy和Paste加速按钮,对于使用Windows下编辑器的人来说,恐怕都是非常熟悉而且不可缺少的.Delphi中的 ...

  7. 【转】使用Javascript改变HTML内容

    原文地址:http://www.qeefee.com/js/change-html-used-javascript 更多Javascript教程,欢迎访问起飞网>>Javascript教程 ...

  8. js 改变change方法_Linux 中改变主机名的 4 种方法 | Linux 中国

    今天,我们将向你展示使用不同的方法来修改主机名.你可以从中选取最适合你的方法.-- Magesh Maruthamuthu 昨天我们已经在我们的网站中写过如何在 Linux 中修改主机名的文章[1]. ...

  9. js innerHTML 改变div内容的方法

    2019独角兽企业重金招聘Python工程师标准>>> 永远不知道你可以改变的内容,一个HTML元素?也许你要取代的文字段落中,以反映什么访客选定刚刚从下拉框中.通过操纵一个元素的i ...

最新文章

  1. 让逻辑关系破缺的最小空间尺寸
  2. 用Intersects方式联接地理数据,如何进行地理数据分析
  3. Android通过for循环批量发送短信
  4. mandatory oracle 字段,Oracle 数据库需要在2019年April之前Mandatory升级的说明
  5. 实现流水灯以间隔500ms的时间闪烁(系统定时器SysTick实现的精确延时)
  6. python-对象-验证对象与类的关系
  7. Mysql学习总结(32)——MySQL分页技术详解
  8. java什么是反射 代码说明_java编程中,常提到的反射代码指的是什么?
  9. java查看sql视图,java - Spring + JPA + SQL视图 - SO中文参考 - www.soinside.com
  10. Ubuntu14.04创建WiFi热点
  11. python客户端软件开发_用 Python 实现一个简易版 HTTP 客户端
  12. 《单片机》实验——实验2 MCS-51外部中断控制实验
  13. 传奇的缔造者——C语言之父访谈
  14. 使用Jcom组件操作Visio批量导出图片
  15. 小知识:btn.addEventListener is not a function报错处理
  16. 蛙蛙推荐:蛙蛙教你文本聚类
  17. Linux安装视频播放器
  18. 最简单DIY基于STM32单片机的蓝牙智能小车设计方案
  19. 2021-07-15领健医美微医云拓客his软件收藏!从选址到试营业,新开皮肤诊所筹备全攻略
  20. 批量缩小图片大小的方法

热门文章

  1. 解决mysql5数据库连接超时问题
  2. 实现一个Ajax模式的文件上传功能有多难?
  3. 二叉树三种递归和非递归遍历 层序遍历
  4. vue与原生app的对接交互的方法(混合开发)
  5. jquery之DataTables的使用
  6. JVM内存模型、逃逸分析以及发生GC的时机
  7. linux tomcat 改端口号,Ubuntu中Tomcat更改80端口
  8. Java校招笔试题-Java基础部分(四)
  9. Android Retrofit框架请求复杂json数据
  10. 默纳克系统服务器怎么看抱闸,默纳克抱闸制动力检测怎么关闭