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

摘要： 问题来源: http://www.cnblogs.com/del/archive/2008/05/22/1101470.html#1205901 着色是通过 js 动态实现的, 只用到两个文件: del.js 和 del.css; 类似这样使用即可: //此处嵌入 Delphi 代码 //此处嵌入 C/C++ 代码 因为是配合博客弄的, 博客也才有半年时间,... 阅读全文

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

摘要： Delphi 1 Delphi 2 Delphi 3 Delphi 4 Delphi 5 Delphi 6 Delphi 7 Delphi 8 Delphi 2005 阅读全文

摘要： 问题来源: http://www.cnblogs.com/del/archive/2008/05/21/1192113.html#1204252 首先, 只有字符类型的数组才可以直接转换为字符串! //这是静态数组的例子: var Arr: array[0..9] of Char; s: string; p: PChar; i: Integer; begin {给 Arr 赋... 阅读全文

摘要： 问题来源: http://www.cnblogs.com/del/archive/2008/05/21/1101470.html#1204455 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;... 阅读全文

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

摘要： GetRegionData( RGN: HRGN; {区域句柄} p2: DWORD; {区域数据缓冲区大小} p3: PRgnData {区域数据结构 TRgnData 的指针, 见下表} ): DWORD; {成功返回 1} //TRgnData 是 _RGNDATA 结构的重命名: _RGNDATA = record rdh: TRgnDataHeade... 阅读全文

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

摘要： 问题来源: http://www.cnblogs.com/del/archive/2008/05/19/1089944.html#1203165 1、# 后面跟一个字符编码可以表示这个字符, 字符编码可以用十进制或十六进制表示; 譬如字符 "A" 的编码是 65(十进制) 或 $41(十六进制). ANSII 编码表参见: http://www.cnblogs.com/del/archive/20... 阅读全文