修正TListView应用XP Theme时的错误

  Dephi6(及以下版本)并不提供XP风格支持,因为Dephi6推出时XP还在测试当。要使应用程序支持XP风格必须添加"manifest xml”资源文件到应用程序中,告诉系统对此应用程序使用6.0的comctl32.dll,而不是5.0。但有部分VCL控件与6.0存在兼容问题。
  TListView为vsReport时,鼠标移到列头时会抛出异常,修正这个问题需要修改ComCtrls.pas,步骤如下:
  1.打开ComCtrls.pas文件,查找TCustomListView.UpdateColumn;
  2.找到以下语句:
          if FImageIndex <> -1 then
              fmt := fmt or LVCFMT_IMAGE or LVCFMT_COL_HAS_IMAGES;
  3.改为:
          if FImageIndex <> -1 then 
               fmt := fmt or LVCFMT_IMAGE or LVCFMT_COL_HAS_IMAGES 
           else 
               mask := mask and not (LVCF_IMAGE);
  3.保存Comctrls.pas,OK,问题解决!
  另外, www.tmssoftware.com提供免费控件,可以在不改动原VCL控件代码的情况修正问题。
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值