摘要： 本例效果图: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Memo1: TMemo; Button1: TBu... 阅读全文

摘要： 首先, 上一个例子, 用数组也可以实现, 并且更简单: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: ... 阅读全文

摘要： unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; Button2: TButton... 阅读全文

摘要： 如果 Pos 函数的第一个参数是 Char 而非 String, 那么编译器也会先把 Char 转换为 String; 从内存结构到管理机制, String 远比 Char 要复杂. 因此, 面对这种情况(要定位的是 Char) Pos 还有优化的余地; 优化后速度会提升 5 倍左右. 测试效果图: unit Unit1; interface uses Windows, Mess... 阅读全文

摘要： 如果参数在函数中不可能修改, 一定要使用 const; 不然, 编译器就会: 假定先修改, 先要备份; 使用前后要增减引用计数; 还要套上 try finally. 指定了 const 就可以避免以上过程从而提高效率. 测试效果图: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes... 阅读全文

摘要： 一个字节有 8 个位, 这些位可能是 0 也可能是 1; 现在要算出一个字节中是 1 的位共有多少个. 第一种方法是一个函数; 第二种方法笨了点, 是先把 256 种可能值给一个数组, 随时调取. 第一种方法虽然灵巧, 但不如第二种方法快(作者书中说: 在非特殊情况下, 一般要快到 10 倍左右); 第二种方法虽然快捷, 并且使用方便, 但要以 256 个字节的数组空间为代价. uni... 阅读全文

摘要： 为了加快硬件的访问速度, 编译器通常要使用"数据对齐", 譬如: //下面结构中: SizeOf(TRec) = 6; 因为 b 在这里也要占 2 字节. TRec = record a: Word; b: Byte; c: Word; end; //下面结构中: SizeOf(TRec) = 16; 这里的 a 和 b 共占了 8 个字节. TRec = record a:... 阅读全文

摘要： 测试效果图: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; Memo1: T... 阅读全文

摘要： 相比其他编程语言, Delphi 的名著可不算多呀; Julian Bucknall[巴克纳尔(美)] 所著的《Delphi 算法与数据结构》就是不可多得的一本! 算法与数据结构是早就该学得, 能有幸同时接近大师的思想, 太幸运了. 目录 前 言 致 谢 第1章 什么是算法 1. 1 什么是算法 1. 2 算法和平台 1. 3 调试与测试 1. 4 小结 第2章 数组 2. 1 数组 2.... 阅读全文

摘要： 先给 ImageList1 添加图标如下: 关于 OverlayIndex 的提示: 在给一个节点指定 OverlayIndex 以前, 需要先用 ImageList1.Overlay 指定可用的 OverlayIndex 号. 测试效果图: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, C... 阅读全文