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

摘要： 试用的第一个版本是: v12.0.3128.15596 安装很快也很顺利, 就是不喜欢哪个 Start Page; 以前是用 Delphi Distiller 去掉的, 不过现在还没有相应的版本; 那就修改启动参数吧. 从 Delphi 2009 启动菜单上点右键 -> 查看属性: "C:\Program Files\CodeGear\RAD Studio\6.0\bin\bds.exe" ... 阅读全文

摘要： function CompFile(const f1,f2: string): Boolean; var ms1,ms2: TMemoryStream; i,p: Integer; b1,b2: Byte; begin Result := False; if not (FileExists(f1) and FileExists(f2)) then Exit; ms1 :... 阅读全文

摘要： 问题来源: http://www.cnblogs.com/del/archive/2008/08/10/1071357.html#1282779 本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Di... 阅读全文

摘要： 在 Delphi 中使用 json, http://www.json.org/ 已经给出了几种方案, 但 Delphi 2009 使用的 json.pas 又另有不同. //试了一下感觉不太完善, 等正式版出来再说吧. 阅读全文

摘要： JSON(JavaScript Object Notation) 类似与 XML; 虽始于 JavaScript, 但被多种语言支持, 它也成了 Delphi 2009 的新功能之一.假如有一段 XML:2张三99用 json 可以表示为:{"id":2, "name":"张三", "age":99}json 在 JavaScript 中使用异常方便, 譬如://例1:Data = {"id":2... 阅读全文

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

摘要： 问题来源: http://www.cnblogs.com/del/archive/2008/08/02/1022539.html#1275599 本例是在这个例子的基础上修改的: http://www.cnblogs.com/del/archive/2008/01/01/1022539.html 本例效果图: 代码文件: unit Unit1; interface uses Win... 阅读全文

摘要： 问题来源: http://www.cnblogs.com/del/archive/2008/07/30/1039045.html#1272783 在编译器看来, 重载函数根本就是完全不同的几个函数, 当然就会有不同的函数地址; 我们用常规方法获取的地址只是第一种重载的地址. 代码文件: unit Unit1; interface uses Windows, Messages, SysUt... 阅读全文

摘要： 问题来源: http://www.cnblogs.com/del/archive/2008/07/30/1256669.html#1272732 源码下载: http://files.cnblogs.com/del/Dephi-JavaScript.rar 本例测试用的 Html 文件(包含三个要测试的 Js 函数): 本例效果图: 代码文件: unit Uni... 阅读全文