关于Ehlib的ReadOnly小BUG修正。_Web开发_学习笔记★闵涛★计算机学习电脑编程软硬件技巧


	转至繁体中文版	\| 网站首页 \| 图文教程 \| 资源下载 \| 站长博客 \| 图片素材 \| 武汉seo \| 武汉网站优化 \|

关于Ehlib的ReadOnly小BUG修正。

作者：闵涛文章来源：闵涛的学习笔记点击数：779 更新时间：2009/4/23 10:45:36

Ehlib本来是一个非常不错的控件，但是TDBEditEh的ReadOnly有一些问题，在后续版本之间也尚未修正。经追踪源代码后，发现
procedure TCustomDBEditEh.CMEnter(var Message: TCMEnter);
begin
  SetFocused(True);
  inherited;
  if AutoSelect and not (csLButtonDown in ControlState) then SelectAll;
  if SysLocale.FarEast and FDataLink.CanModify then
    SetControlReadOnly(False ); //

有问题，关联数据集后将ReadOnly改为True总是可以为修
                                                //改，因此这里出现问。
end;

//再查看Readonly属性声明，域变量FReadOnly 有问题，将改为即可。
  SetControlReadOnly(FReadOnly);  //将此函数修改
//更早一点的版本我不知道，但是，2.5版本以来就有这个问题，按照此方法可以解决、、ReadOnly问题。
编译包文（Ehlib7.0，或Ehlib6.0，动态包）件即可。如果你用包方式发布，还将编译过的包覆盖原来的BPL文件即可。

另外，为了支持D6,D7特有的扁平风格界面。在单元DBCtrlsEh里的每一个TDBEDITEH,TDBDateTimeEdithEh等等编辑控件加入，
   property BevelEdges;
    property BevelInner;
    property BevelKind default bkNone;
    property BevelOuter;

我们在设计期可以设置 BorderStype := bsNone; BevelKind  :=bkTile;获得扁平风格；可为你的程序编辑控件添加了不少的风格。

别忘了编译包文件。

[聊天工具]小心Foxmail邮件模板BUG  [聊天工具]OICQ---存在重大BUG?
[系统软件]Windows记事本中的Bug  [常用软件]解决压缩软件的Bug技巧
[Delphi程序]Delphi 6 SOAP 源码中的BUG修正  [Delphi程序]改良控件－Delphi自带控件Bug的消除
[Delphi程序]不知您是笨蛋，还是我是笨蛋，关于Delphi的大Bug  [Delphi程序]关于Delphi大Bug的更详细的例子
[Delphi程序]Delphi的大Bug  [Delphi程序]DELPHI 6 Update 2# 的 Bug 及其解决方法

教程录入：mintao 责任编辑：mintao

上一篇教程：在ASP.NET中利用GDI+ 设计Chart控件

下一篇教程： ASP.NET中的应用程序配置

【字体：小大】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口】

注：本站部分文章源于互联网，版权归原作者所有！如有侵权，请原作者与本站联系，本站将立即删除！本站文章除特别注明外均可转载，但需注明出处！ [MinTao学以致用网]

　网友评论：（只显示最新10条。评论内容只代表网友观点，与本站立场无关！）

同类栏目

· Web开发  · 网页制作
· 平面设计  · 网站运营
· 网站推广  · 搜索优化
· 建站心得  · 站长故事
· 互联动态

热门推荐

没有教程

赞助链接

闵涛博文

500 - 内部服务器错误。

您查找的资源存在问题，因而无法显示。

鄂公网安备 42011102001154号

站长：MinTao ICP备案号：鄂ICP备11006601号-18

闵涛站盟:医药大全-武穴网。A打造B、C、D……