-
關于tts語音引擎的使用方法!很多軟件具有英文發音和朗讀功能,它們都使用了MSTTS(Microsoft Text To Speech)技術。微軟遵照COM的標準,提供了一套Speech API來對MSTTS進行編程。要在程序中使用這套API,必須確保系統已經安裝了MSTTS和Spchapi軟件包。
Speech API可以作為類型庫引用到Delphi中,方法是:打開Project選單下的Import Type Litrary,點擊“Add”加入Windows\Speech目錄下的Vtxauto.tlb文件,在Delphi的Import目錄中就會生成VTxtAuto—TLB.pas文件,其中定義了VTxtAuto—TLB單元,把它加到Uses成員中來。設計如圖2所示的窗口,定義全局變量:
var VoTxt:IVTxtAuto
然后在Form的OnCreate事件中加入:
VoTxt:=CoVTxtAuto_.Create
VoTxt.Register(′′,′Speech Test′) {注冊}
“Read”按鈕代碼為:
VoTxt.Speak(Memo1.Lines.Text,10) {朗讀}
“Stop”按鈕代碼為:
VoTxt.StopSpeaking {停止朗讀}
至此,應用程序已具有朗讀功能,10表示使用普通語氣。借住VoTxt的屬性和方法,我們還可以控制閱讀速度和語氣,實現暫停、跳句等功能,Speech API編程就這么簡單。
標簽:
tts
語音
引擎
多軟件
上傳時間:
2014-01-21
上傳用戶:13681659100
-
delphi 自定義網絡函數:unit net
interface
uses
sysutils
,windows
,dialogs
,winsock
,classes
,comobj
,wininet
//得到本機的局域網ip地址
function getlocalip(var localip:string): boolean
//通過ip返回機器名
function getnamebyipaddr(ipaddr: string var macname: string): boolean
//獲取網絡中sqlserver列表
function getsqlserverlist(var list: tstringlist): boolean
//獲取網絡中的所有網絡類型
function getnetlist(var list: tstringlist): boolean
//獲取網絡中的工作組
標簽:
interface
sysutils
classes
dialogs
上傳時間:
2015-05-09
上傳用戶:wanghui2438
-
這是bios-lt的最新板,(1) bios.img占用的扇區數由4個合并為2個,相應的文件大小由193K減小為66K
(2) 實現了對FLASH芯片BOOT扇區的處理,建立FLASH分區時不用再考慮讓開BOOT扇區
改動的主要目的是想做到:
在29F040上空出384K的空間,建立一個分區存放不含應用程序的uClinux kernel,
將29LV160作為一個大分區,在其上建立JFFS2文件系統,并掛接為uClinux的根文件系統.
系統應用程序全部存儲在JFFS2文件系統中. 再使用tmpfs來做臨時目錄和 /var目錄.
這樣就可以做到建立一個更加通用的,拿來就可以運行的uClinux系統,相當于給開發版
預裝一個操作系統^_^ 由于JFFS2是文件系統是可寫的,開發者只需將編好的用戶程序
通過FTP下載到uClinux中,再改一改啟動腳本即可 省去了配置uClinux環境的重復勞動
標簽:
bios-lt
上傳時間:
2014-01-27
上傳用戶:watch100
-
1. PL/0 語言介紹
●PL/0 程序設計語言是一個較簡單的語言,它以賦值語句為基礎,構造概念有順序、條件和重復(循環)三種。PL/0 有子程序概念,包括過程定義(可以嵌套)與調用且有局部變量說明。PL/0語言編譯程序采用以語法分析為核心、一遍掃描的編譯方法。詞法分析和代碼生成作為獨立的子程序供語法分析程序調用。語法分析的同時,提供了出錯報告和出錯恢復的功能。在源程序沒有錯誤編譯通過的情況下,調用類PCODE解釋程序解釋執行生成的類PCODE代碼。
●保留字(關鍵字):所謂保留字是指在Pascal語言中具有特定的含義。標準Pascal語言中的保留字一共有35個,Turbo Pascal語言一共有51個。下面是Pascal語言的保留字:AND,ARRAY,BEGIN,CASE,CONST,DIV,DO,DOWNTO,ELSE,END,FILE,FOR,FUNTION,GOTO,IF,IN,LABEL,MOD,NIL,NOT,OF,OR,PACKED,PROCEDURE,PROGRAM,RECORD,REPEAT,SET,THEN,TO,TYPE,UNTIL,var,WHILE,WITH,EXPORTS,SHR,STRING,ASM,OBJECT,UNIT,CONSTRUCTOR,IMPLEMENTATION,DESTRUCTOR,USES,INHERITED,INLINE,INTERFACE,LIBRARY,XOR,SHL
標簽:
PL
語言
程序設計語言
上傳時間:
2015-07-17
上傳用戶:zm7516678
-
統計工具軟件,用于金融,保險,銀行等領域進行var風險估計計算
標簽:
軟件
上傳時間:
2013-12-21
上傳用戶:comua
-
Delphi6.0函數大全,Delphi程序員的至愛。∷圖書簡介∷
電子圖書名:Delphi6函數大全 Delphi6函數大全(1) <> 首部 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.Text)
標簽:
Delphi
6.0
函數
上傳時間:
2016-01-25
上傳用戶:mikesering
-
function MagMakeSkillFire_60(PlayObject: TBaseObject UserMagic: pTUserMagic nPower: Integer): Boolean
function MagMakeSkillFire_61(PlayObject: TBaseObject UserMagic: pTUserMagic nTargetX, nTargetY: Integer var TargeTBaseObject: TBaseObject): Boolean
function MagMakeSkillFire_62(PlayObject: TBaseObject UserMagic: pTUserMagic nTargetX, nTargetY: Integer var TargeTBaseObject: TBaseObject): Boolean
function MagMakeSkillFire_63(PlayObject: TBaseObject UserMagic: pTUserMagic nTargetX, nTargetY: Integer TargeTBaseObject: TBaseObject): Boolean
function MagMakeSkillFire_64(PlayObject: TBaseObject UserMagic: pTUserMagic nTargetX, nTargetY: Integer TargeTBaseObject: TBaseObject): Boolean
function MagMakeSkillFire_65(BaseObject: TBaseObject nPower: Integer): Boolean
end
標簽:
MagMakeSkillFire
TBaseObject
pTUserMagic
PlayObject
上傳時間:
2016-02-21
上傳用戶:英雄
-
彈簧隔振器的系數k0=4.5
hc=3.5
d=[3.15 3.23]
a1=tan(pi*(d)./(2*hc))
a2=cot(pi*(d)./(2*hc))
% plot(d,a1)
y=(a1+a2)*2*k0*hc*1e-3./pi
y=y./9.8*8
%
var=1+(tan(pi*(d+0.25)./(2*hc))).^2
k=2*k0*hc/pi*( var*pi./(2*hc)+var*pi./(2*hc)./(var-1
標簽:
hc
3.15
3.23
pi
上傳時間:
2013-12-02
上傳用戶:redmoons
-
構造一個簡單程序設計語言的詞法分析器,要求:
1) 含有保留字program, begin, end, var, integer, if, then, else, do, while.
2) 標識符和無符號的整常數,其中保留字和標識符不區分大小寫.
3) 含有界符和運算符如下:+,-, (, ), =, >, <, , :, :=.,,。
4) 輸出二元組。
標簽:
程序設計語言
分析器
上傳時間:
2014-01-04
上傳用戶:離殤
-
對PL0原編譯器進行了以下的擴充:1.增加以下保留字else(elsesym), for(forsym),to(tosym),downto(downtosym),return(returnsym),[(lmparen),](rmparen)
2.增加了以下的運算符:+=(eplus),-=(eminus),++(dplus),--(dminus)
取址運算符&(radsym),指向運算符@(padsym)
3.修改單詞:修改不等號#為<>
4.擴充語句:(1)增加了else子句
(2)增加了for語句
5.增加運算:(1).++運算 (2).--運算;(3).+=運算 (4).-=運算;(5).&取址運算;
(6).@指向運算;
6.增加類型:(1).增加多維數組a[i1][i2][i3]……[i(n-1)][i(n-2)][in] (2).增加指針類型(任何變量都能存放指針,但不支持指針的指針,如b:=@@a應該改寫為c:=@a,b:=@c)
7.將過程procedure擴展為函數:(1).允許定義過程時在其后加參數(var a, var b,……..,var n) (2)允許通過指針向函數形式參數傳地址;(3)允許返回值;可以用 a:=p(a,b,c….,n) 返回
標簽:
downtosym
returnsym
elsesym
downto
上傳時間:
2016-07-02
上傳用戶:saharawalker