冀公网安备 13098202000212号 2011年1月23日 星期日
在 Delphi 下使用 DirectSound (12): 测试失真效果器 IDirectSoundFXDistortion8
万一| 万一的 Delphi 博客 |22:54:00
{相关结构:} TDSFXDistortion = packed record fGain: Sinle; //-60 .. 0 : -18 (dB) //好像默认值不是 -18 fEdge: Single; // 0 .. 100 : 15 (%) fPostEQCenterFrequency: Single; //100 .. 8000 : 2400 (Hz) fP...
Exploring Ways to be More Efficient in the Delphi IDE using the Open Tools API
Embarcadero| EDN Delphi Feed |22:00:00
Video: REST Servers in Delphi XE Part II - Extending the REST Server
Embarcadero| EDN Delphi Feed |22:00:00
2011年1月22日 星期六
在 Delphi 下使用 DirectSound (11): 测试压缩效果器 IDirectSoundFXCompressor8
万一| 万一的 Delphi 博客 |21:26:00
{相关结构:} TDSFXCompressor = = packed record fGain: Single; // -60 .. 60 : 0 (dB) fAttack: Single; //0.01 .. 500 : 10 (ms) fRelease: Single; // 50 .. 3000 : 200(ms) fThreshold: Single; // -60 .. 0 : -20(dB) fRatio: Sin...
Delphi Labs: New "Server Methods Lifecycle" episode is live!
Pawel Glowacki| Pawel Glowacki |20:56:49
It is more fun and work as I expected but here there is: The third episode in the Delphi Labs "DataSnap" serie. My goal is to consistently release one new episode about Delphi DataSnap programming every week in this quarter. The demos are intentio...
2011年1月21日 星期五
在 Delphi 下使用 DirectSound (10): 测试合唱效果器 IDirectSoundFXChorus8
万一| 万一的 Delphi 博客 |23:30:00
{相关结构} TDSFXChorus = packed record fWetDryMix: Single; //干湿度; 取值 0..100, 默认 50; fDepth: Single; //深度; 取值 0..100, 默认 10; fFeedback: Single; //声反馈; 取值 -99..99, 默认 25; fFrequency: Single; //频率; 取值 0..10, 默认 ...
如何把一个字符串填充到一个无类型的指针 - 回复 "豪杰的爸爸" 的问题
万一| 万一的 Delphi 博客 |17:43:00
问题来源:http://www.cnblogs.com/del/archive/2008/11/08/1329543.html#2016234procedure TForm1.Button1Click(Sender: TObject); var p: Pointer; str: string; size: Integer; begin str := Edit1.Text; size := (Length(str) + 1) * SizeOf(Char); p...
在 Delphi 下使用 DirectSound (9): 效果器初步及 IDirectSoundFXGargle8 效果器
万一| 万一的 Delphi 博客 |15:53:00
只有使用 IDirectSoundBuffer8 的次缓冲区才能设置"特效", 主缓冲区主要负责的是混音和处理 3D 效果.IDirectSoundBuffer8(非 IDirectSoundBuffer) 支持以下效果器:IDirectSoundFXChorus8 //合唱; 微调原生与回声的延迟 IDirectSoundFXCompressor8 //压缩; 压缩...
Delphi Labs: DataSnap XE - Server Methods Lifecycle
Embarcadero| CodeCentral Delphi Submissions |14:02:45
Delphi XE DataSnap application demonstrating options for declarative lifecycle management of DataSnap server methods instances
Video: REST Servers in Delphi XE Part I - Building a REST Server
Embarcadero| EDN Delphi Feed |06:27:00
Reposition Inherited Control Back to Its Original Position
About.com| About.com Delphi Programming |02:00:40
inDelphi TIPS::When you change any of the properties of a control on the base form, for example, Color - the color of this control on the ...Read Full Post
2011年1月20日 星期四
Finding & Fixing Performance Problems in a Complex Application & Database System
Embarcadero| EDN Delphi Feed |22:00:00
在 Delphi 下使用 DirectSound (8): IDirectSound8.DuplicateSoundBuffer() 与 IDirectSoundBuffer.GetStatus()
万一| 万一的 Delphi 博客 |11:41:00
IDirectSoundBuffer.GetStatus() 用于获取缓冲区的当前状态, 譬如是否正在播放、是否指定为循环播放等等.IDirectSound8.DuplicateSoundBuffer() 是通过根据已存在的缓冲区建立缓冲区副本, 这类似引用; 通过它可以让同一个声音交叉播放.示例:unit Unit1; interface ...
MECSUtils ver1.53
Embarcadero| CodeCentral Delphi Submissions |00:57:29
MECSUtils unit constains several functions and classes to support international characters with AnsiString/UnicodeString/WideString.# Please check source code for detail.Classes:--------------------- - PUnicodeChar(*1) - PUTF8Char - TEastAsianWidt...
2011年1月19日 星期三
在 Delphi 下使用 DirectSound (7): 播放资源文件中的 Wave 数据
万一| 万一的 Delphi 博客 |16:44:00
首先要修改前面自定义的 ReadWaveFile 单元, 给它增加一个 OpenResource() 方法以直接读取资源文件中的 "WAVE" 数据:unit ReadWaveFile; interface uses Windows, Classes, SysUtils, MMSystem; type TReadWaveFile = class private FFileHandle: HMMIO; FFor...