引言: 第二部分:基类 TCodeColor
一、本章说明 暂时先公开基类代码,和子类的部分代码,子类中字符分析函数 Analyzer 的实现暂时不公开,主要出于这样的考虑: 1、基类已实现大部分共用功能,但是还不完善,代码也不规范。
摘要:unit mlde32unit;
//micro length disassembler engine
interface
//作者忘记了,不好意思。好像出自29a-7。
//sorry, author!
function lde32(opcode: pointer): integer;
implementation
function lde32(opcode: ......
摘要:uses ..., typinfo;
function tform1.isapropexist(ainst: tobject; const propname: string): boolean;var propinfo: ppropinfo;begin result := false; propinfo := getpropinfo(ainst, propname); if propinfo &......
CodeColor相关(二) 基类TCodeColor
第二部分:基类 tcodecolor
【程序编程相关:
Delphi 7 中使用RAVE报表(三】
一.本章说明 【推荐阅读:设计模式之singleton
】
【扩展信息:
delphi8里在VCL.net使用Ad】 暂时先公开基类代码,与子类的部分代码,子类中字符分析函数 analyzer 的实现暂时不公开,主要出于这样的考虑: 1.基类已实现大部分共用功能,但是还不完善,代码也不规范.特别是各个版本的 analyzer 中都会用到这些功能,所以待听取路高手的意见,将基类改进完善后,将重写 analyzer 并在第三部分中公开; 2.如果您急于使用本程序,有两种方法:一是您可以留下邮箱地址,我会寄给您一份程序;二是利用并不完善基类 tcodecolor 继承出一个子类,自己实现 analyzer ,字符分析的方法可以参考 李马 的 行云流水网站 提供的 c 语言版 «pascal 词法分析器»源代码; 3.欢迎大家提出宝贵意见.想法,同时尽可能的留下相应的解决方案....
下一页 摘要:来源:delphi园地
不知道大家在使用qq时有没有想到它的缩入伸出的功能是如何实现的呢?实现这个效果的关键在于如何判断当前鼠标指针下面的窗体是不是我们的程序窗体。getcursorpos()是一个可以获得鼠标指针在屏幕中的坐标的api函数,利用它与findvclwindow()的结合就可以轻易地获得鼠标指针下的vcl可视组件,但当一个窗体中不只一个vcl可视组件,例如可能还有tpanel、t......