2011年1月15日 星期六

在 Delphi 下使用 DirectSound (3): 播放第一个 Wave 文件

万一| 万一的 Delphi 博客 |23:43:00

建立 IDirectSound8 对象后, 首先要通过其 SetCooperativeLevel() 方法设置协作优先级;因为其它应用程序有可能同时使用该设备(声卡), 这是必需的步骤.function SetCooperativeLevel( hwnd: HWND; //窗口句柄 dwLevel: DWORD //协作优先级 ): HResult; stdcall...

改良美化版的文本滚动框控件XJSecretPanel

DELPHI盒子| Delphi盒子 |16:01:00

元件名称：TXJSecretPanel（可滚动文本框） 说明： 1、本元件改编自Jvcl里面的TJvSecretPanel 2、已经将它从jvcl元件库中剥离出来，可单独安装 3、必须先安装基础包，再安装XJsecretPanel，安装方法照常规dlephi控件安装。 特点 1、可设置背景：单色，图片，渐?..

如何使用系统级热键捕捉当前窗口保存为 png 图片 - 回复 "巅枫" 的问题

万一| 万一的 Delphi 博客 |13:23:00

问题来源:http://www.cnblogs.com/del/archive/2009/02/16/1392049.html#2011187程序运行后, F8 可保存 bmp, F9 可保存 png; 测试保存目录在 C:\tempunit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, ...