专注于互联网--专注于架构

最新标签
网站地图
文章索引
Rss订阅
 李国柱   Direct X是微软公司提供给游戏编写人员套应用编程接口(APIs)它为编写高效、实时应用提供了有力支持因此有必要将这个接口封装到Delphi组件库中Direct X SDK是面向Visual C/C和Watcom C/C因而使用Object Pascal直接存取Direct X SDK将带来诸多不便但我们可先在VC下将Direct X接口封装成动态链接库然后在Delphi下通过该动态链接库去存取Direct X   本文介绍用Delphi封装Direct Sound思路方法这种思路方法同样也可以应用到Direct Draw(但建议不要使用独占模式否则会带来不少 [阅读全文] [PDF]
首部 function AnsiResemblesText(const AText, AOther: string): Boolean; $[StrUtils.pas功能 返回两个字符串是否相似说明 ANSI(American National Standards Institute)美国国家标准协会;不区分大小写参考 function StrUtils.SoundexProc; var StrUtils.AnsiResemblesProc例子 CheckBox1.Checked := AnsiResemblesText(Edit1.Text, Edit2 [阅读全文] [PDF]
首部 function FindNext(var F: TSearchRec): Integer; $[SysUtils.pas功能 返回继续文件搜索说明 搜索成功则返回0参考 function Windows.FindNextFile例子 <参见FindFirst>━━━━━━━━━━━━━━━━━━━━━首部 procedure FindClose(var F: TSearchRec); $[SysUtils.pas功能 结束当前文件搜索说明 不关闭查询会占用系统资源参考 function Windows.FindClose例子 <参 [阅读全文] [PDF]
首部 function Languages: TLanguages; $[SysUtils.pas功能 返回系统语言对象说明 通过此函数可以得到系统的语言环境参考 type SysUtils.TLanguages例子 ///////Begin Languagesprocedure TForm1.Button1Click(Sender: TObject);varI: Integer;beginMemo1.Clear;for I := 0 to Languages.Count - 1 doMemo1.Lines.Add(Languages.Name[I]);e [阅读全文] [PDF]
首部 function InquireSignal(RtlSigNum: Integer): TSignalState; $[SysUtils.pas功能 <NULL>说明 Kylix函数参考 <NULL>例子 <NULL>━━━━━━━━━━━━━━━━━━━━━首部 procedure AbandonSignalHandler(RtlSigNum: Integer); $[SysUtils.pas功能 <NULL>说明 Kylix函数参考 <NULL>例子 <NULL>━━━━━━ [阅读全文] [PDF]
首部 function FormatFloat(const Format: string; Value: Extended): string; $[SysUtils.pas功能 返回浮点数类型以指定格式字符串Format转换成字符串说明 FormatFloat(\',.00\', 1234567890) = \'1,234,567,890.00\'参考 function SysUtils.FloatToTextFmt例子 Edit1.Text := FormatFloat(Edit2.Text, StrToFloatDef(Edit3.Text, 0)); [阅读全文] [PDF]
1 共6条 分1页