摘要:
代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; Button2: ...
阅读全文
posted @ 2008-08-23 22:56
万一
阅读(5359)
推荐(1)
摘要:
代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; procedure...
阅读全文
posted @ 2008-08-23 22:18
万一
阅读(3260)
推荐(0)
摘要:
{XP 注册表中的主键} HKEY_CLASSES_ROOT {文件类型信息} HKEY_CURRENT_USER {当前用户信息} HKEY_LOCAL_MACHINE {软硬件信息} HKEY_USERS {所有用户信息} HKEY_CURRENT_CONFIG {当前配置信息} {Delphi 定义的常量} HKEY_CLASSES_ROOT ...
阅读全文
posted @ 2008-08-23 21:51
万一
阅读(5631)
推荐(0)
posted @ 2008-08-23 10:51
万一
阅读(11332)
推荐(1)
摘要:
Bass.dll 功能非常强大, 做了上面 15 个例子, 已经够我的程序用了; 利用 Bass 还可以录音、下载并播放网上的音乐等等, 没时间继续学习了. 另外: 1、如果喜欢动态引入函数, 可以使用其中的 \delphi\dynamic\Dynamic_Bass.pas 单元; 2、建议使用 \mp3-free\bass.dll, 这是免费的; 3、有不少的音乐播放器使用了不同版本的 Ba...
阅读全文
posted @ 2008-08-22 23:17
万一
阅读(5335)
推荐(0)
摘要:
本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ComCtrls; type TForm1 = class(TForm) OpenDialog1: ...
阅读全文
posted @ 2008-08-22 23:04
万一
阅读(4281)
推荐(0)
摘要:
本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ComCtrls, ExtCtrls; type TForm1 = class(TForm) Ope...
阅读全文
posted @ 2008-08-22 19:50
万一
阅读(4271)
推荐(0)
摘要:
本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ComCtrls; type TForm1 = class(TForm) OpenDialog1: ...
阅读全文
posted @ 2008-08-22 16:04
万一
阅读(3780)
推荐(0)
摘要:
问题来源: http://www.cnblogs.com/del/archive/2008/08/22/1002959.html#1294593 //关于父类与子类的类型转换: procedure TForm1.FormCreate(Sender: TObject); var List1: TStrings; List2: TStringList; {TStringList 是 TSt...
阅读全文
posted @ 2008-08-22 11:48
万一
阅读(2994)
推荐(1)
摘要:
本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, ComCtrls; type TForm1 = class(TForm) Ope...
阅读全文
posted @ 2008-08-22 10:51
万一
阅读(6592)
推荐(0)