摘要： procedure TxxxxForm.FormMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); const sc_DragMove: Integer = $F012; begin 阅读全文

摘要： 其实 WLW 有历史Blog修改的功能，我只是一直没有找到，就在打开“最近发布的日志”里面， 位于屏幕的右侧“打开”列表下。 最近发现记忆力越来越差了，BLOG看来是必须的了。 阅读全文

摘要： 安装很方便，看看发布的内容是否好用 但发现从博客上取下来的内容是有问题的，不能正常打开 阅读全文

摘要： 很早以前看《Delphi 4从入门到精通》有这么一个概念——CallBack。然后在《Delphi 6从入门到精通》看同样的章节，翻译为“回调”，就有一个疑问了，什么是Callback\“回调”，到底是读回“diao”，还是回“tiao”。 后来明白了——2005年的某天，这个概念在C、Pascal 阅读全文

摘要： 下面的函数用来压缩access数据库 需要增加ComObj单元 //压缩与修复数据库,覆盖源文件 function CompactDatabase(AFileName,APassWord:string):boolean; const SConnectionString = 'Provider=Mic 阅读全文

摘要： (1) 一刻钟 古时利用漏壶滴水计时，壶内有一把尺，尺上横刻了100条线，成为100格，每漏一格水称便为一刻钟，一刻大约等于15分钟左右。虽然如此，古人觉得一刻钟只是很短的时间。不少有刻字的成语，都是代表短暂、急促的意思，例如︰顷刻之间。 (2) 间与顷 谈及很短的时间，中国固有的说法一定包括间或顷 阅读全文

摘要： 看来人真的有些力不从心，半个月前还很得意掌握的简单的Postgresql 存储过程的调试，一段时间没使用，做新功能就忘了！ Postgresql 在开源的数据库里面算是很强悍的了，但现在就是不方便调试 ，以前用firebirdSql,各种工具都支持调试，现在想改改数据库反倒遇到麻烦了。 言归正传，有 阅读全文

摘要： 这个是个很有意思的事情，这一个成熟的模板上更改，同样的属性，同样的方法，新的组件在载入过程中就是报错。 “Stack overflow” 因为有初始化过程，担心是不是那个地方有问题，由于是在属性赋值过程中出现的，开始认为是写操作溢出，逐个逐个排，两个半小时就这么过去了…… 发现原来是那个属性读被自引 阅读全文

摘要： 这段时间又开始用delphi了，才发现我对它这么的不熟悉！ 简单的而有效的调试工具 Logger 这个是“榕树下”的作品，小巧而精悍。稍微调整了一下。在需要的地方加入 {$IFDEF DEBUG} Logger.WriteLog('SetKeyDatetime ok %s', [DateTimeTo 阅读全文

摘要： TOjectList = Class (Tlist); TOjectList继承Tlist,从名字上看就可以知道它是专门为对象列表制作的，那么他到底丰富了那些功能呢？ 首先是 TObject 作为对象可以方便使用，无需指针强制。 丰富了 Notify 针对当前状态处理，比如如果是删除就将该点的引用一 阅读全文