Delphi 6.0的一个Bug？？？

Adnil 2001-07-20 04:40:50

请见

http://www.csdn.net/expert/topic/200/200201.shtm

...全文

39 1 打赏收藏转发到动态举报

写回复

1 条回复

切换为时间正序

请发表友善的回复…

发表回复

dana 2001-07-22

打赏
举报

回复

listen

Raize Components 6.0 支持delphi xe2 含bug修复，含源码，含注册码，delphi xe2上亲测可用

转别人的东东 Raize Components 6.0 中的一点瑕疵 2012年02月25日 ? 学习交流 ? 暂无评论 ? 被围观 3 次+ 菲菲的家（ffhome.com）原创，转载请注明！ Raize Components是一组优秀的Delphi和C++builder的控件，6.0版全面支持Embarcadero RAD Studio XE2。为了达到全面支持XE2的目的，Raize公司对源代码进行了大量的改动，除支持Delphi 64bit编译外，对XE2新增的一些特性如VCL Style等也进行了支持。刚刚到手，迫不及待安装试用，却发现了Raize Components 6.0存在的一点点瑕疵。这个瑕疵就是TRzSizePanel组件在Align值为alTop或alBottom时，它的HotSpot自绘小箭头和点线存在问题。哈哈，有人说了，这算什么问题……这的确是个小小的问题，也许你根本用不上TRzSizePanel组件，也许你用TRzSizePanel组件时HotSpotVisible值设为false，但如果你一旦用到HotSpot，没箭头是真的不爽…… Align值为alLeft或alRight时就没有问题，见以下图片，红色框内的就是没有箭头的HotSpot。我花时间看了一下源代码，找到了解决这个瑕疵的办法： 1、到Raize Components 6.0组件的安装目录找到Source文件夹【例如C:\Program Files (x86)\Raize\RC6\Source】，打开RzSplit.pas文件； 2、找到函数定义procedure TRzCustomSizePanel.DrawHotSpot( Highlight: Boolean );【大概是第4476行】 3、在这个函数体中有一句 R := DrawSides( Canvas, FHotSpotRect, HSFrameColor, HSFrameColor, sdAllSides ); 在这句的上面增加以下两行代码： with Canvas, FHotSpotRect do //ffhome begin //ffhome 在函数结尾补上一个 end; //ffhome 保存。 4、将这个改动的文件编译。你可以载入Source文件夹内的RaizeComponentsVcl.dpk编译RzSplit.pas的32bit和64bit，然后把RzSplit.dcu文件拷贝到Lib\RS-XE2下对应的32bit和64bit文件夹内；也可以使用Raize提供的“编译安装一体化批处理文件”完成这项工作，这个文件就在Source文件夹内，文件名是!Build_RC6.cmd。打开!Build_RC6.cmd文件进行修改，英文好一点的就不要往下看了，自己按照提示就可以修改好了，英文不好的，我会提示你更改哪几项，具体要改的值得根据你自己电脑实际更改。 ①找到 rem goto InitComplete 行，吧前面的rem去掉； ②找到 set SysPath32= ，等号后面的路径改为你自己电脑的路径，64位Windows应该是SysWOW64而不是System32； ③找到 set VCLVersion= ，等号后面填写版本，XE2是16； ④找到 set DCC32EXE= 和 set DCC64EXE= ，等号后面是DCC32.exe和DCC64.exe文件的路径，这两个文件都在bin目录下【例如C:\Program Files\Embarcadero\RAD Studio\9.0\Bin\】； ⑤看到以下行 rem **************************************************************************** rem **** DO NOT CHANGE ANYTHING BELOW THIS POINT ******************************* rem **************************************************************************** 之下的内容就不要动了，否则后果自负。至此，!Build_RC6.cmd文件修改好了，应该可以执行了，你一执行，发现RzBorder.pas文件报错，TNND，还要修改这个RzBorder.pas文件。其实修改原则很简单，找到 DotMasks: TRzLEDCharacters 行，把它后面赋值的内容加一些右大括号【 } 】，使得不应该是注释的内容变回代码就行了，本人举个例子：请将 ( {厎 Col0: $00; Col1: $00; Col2: $00; Col3: $00; Col4: $00 ), 改为 ( {厎} Col0: $00; Col1: $00; Col2: $00; Col3: $00; Col4: $00 ), 可不少行呢，认真改哟。全部改好后，保存。执行!Build_RC6.cmd批处理，编译并安装完成。至此，再次使用TRzSizePanel组件，在Align值为alTop或alBottom时完全正常，箭头颜色也会跟着你设置的VCL Style而变化，……大功告成！奇怪，Raize也是个知名公司啊，Raize Components作为公司的招牌组件怎么会有这样的低级错误呢？？菲菲的家（ffhome.com）原创，转载请注明！上述改动的源文件及编译后的dcu文件可以直接在此下载，劝君多动手啊，别老等现成！ Raize Components 6.0的下载就不用提供了吧~~

EurekaLog 6.0.25 (16-Nov-2010) Setup Version 1.Added support for Delphi XE and C++Builder XE; 2.A little Call-stack tracing improvment; 3.Add the SafeMM memory manager support; 4.The EurekaLog IDE integration is now set to OFF by default (to activate it use the “EurekaLog/IDE Integration” menu); 5.Fixed a bug that istructed EurekaLog to catches exceptions also when disabled; 6.Fixed an Installer bug that didn’t activate EurekaLog by default if this option was enabled; 7.Fixed a bug that caused a wrong decode of some assembles views in the EurekaLog Viewer window;

One of the most significant new features with Delphi32 is long dynamic strings. However, the built-in functions don't really exploit the full potential of these new strings. HyperString provides over 400 fast, efficient string management routines to help you realize the full power of this highly versatile new data type. ----Revision History------------------------ v1.0 - 96/12/25, Original release (Happy holidays). v1.5 - 97/06/01, Many new routines, instructions for Delphi 3. v2.0 - 97/08/01, Added dynamic arrays and other new features. v2.2 - 97/12/15, Revised dynamic arrays, more new features. v2.5 - 98/01/30, Bigger and better than ever! v2.8 - 98/05/01, Improved performance, additions, bug fixes. v4.0 - 98/07/30, Modified for D4, changed version to match. v4.2 - 98/11/22, Modified to support SubScript. v5.0 - 99/05/01, Added user-defined case tables, reg expressions. Moved form and shell related code to HyperFrm unit. v6.0 - 01/06/22, Modified for D6 v6.01- 2010/05/28 Modified for Delphi 2010 by xander.xiao@gmail.com

EurekaLog为Delphi和C++Builder开发者提供的，一个完整的Bug决议工具。能让所编写的应用程序有能力捕获任何异常和内存泄露，直接在最终用户的电脑上，生成调用堆栈的详细日志（包括file, class, method and line number），可以设置通过Email或者WEB发送每个日志的副本。据官方的Features介绍，其企业版包含源代码，支持Delphi版本3-7、2005-2010、XE-XE2，编译后的文件大约增加300千字节。

5,388

社区成员

262,730

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章