codetyphon， Lazarus+FreePascal+Tools+Free Components packages+Free Libraries
摘要：一个整合资源的跨平台Pascal语言开发工具：codetyphonhttp://www.pilotlogic.com/sitejoom/index.php/codetyphon上面是这样介绍的：AboutCodeTyphonis theFREE"Pascal Visual Programming Studio",forCross-Platform Native Development,with Multi-OS, Multi-CPU and Cross-Build abilities.Has Lazarus+FreePascal+Tools+Free Components
阅读全文
posted @
2013-02-28 18:56
garfieldtom
阅读(2048)
推荐(0) 编辑
DebugHook的巧用
摘要：编写信息管理系统类的应用程序,一般都有登录窗口,以便控制用户的登录和权限.但在调试时每次都要输入密码比较麻烦,尤其是对密码的长度和复杂程度有控制,暂时屏蔽也比较麻烦,其实可以使用Delphi的一个变量来简单控制,这个变量就是DebugHook.该变量在调试状态下值为1,运行模式为0,例如,我们可以使用如下的代码来简单控制:if DebugHook=0 then CheckLoginelse LoginSuccess这样,我们在调试程序时可以不再检查登录,而发布应用程序时客户则必须进行登录验证.当然,我们也可以使用这个变量来做一些只在调试模式下才做的工作,比如输出日志等.
阅读全文
posted @
2013-02-19 07:17
garfieldtom
阅读(697)
推荐(0) 编辑
我的闪存汇总
摘要：我的闪存中有些备忘的知识点,现在汇总起来,以便查阅:==> (转)在UltraEdit中删除空行网上搜集的文章中一般都有大量的空行，如果一点一点删除十分麻烦，有没有一个简单的方法解决呢？使用UltraEdit就可以！首先使用UltraEdit打开文件，选择“搜索”菜单的“替换”命令。在替换对话框中，选中“正则表达式”复选框，并在“查找什么”中输入：%[ ^t]++^p，注意^t之前有空格，然后，单击“开始”或“全部替换”按钮，进行替换删除空行。怎么样？一瞬间，文档中的空行全部消失了。简单吧！ [2011-08-08 20:14:48]==> Delphi自动处理含单引号字符串函数：
阅读全文
posted @
2013-02-19 07:10
garfieldtom
阅读(507)
推荐(0) 编辑
