話題686854的標(biāo)題是： 誰(shuí)知道如何創(chuàng)建類似office2000助手模樣的窗體？ (100分)
分類：圖形圖象 Blackdell (2001-10-23 10:26:00)  
就是只顯示一幅透明的圖片，圖片外的任何區(qū)域都是透明的。多謝，急用[:)][:)][:)] 
 
卷起千堆雪tyn (2001-10-23 10:37:00)  
給你轉(zhuǎn)載一篇文章：

Agent技術(shù)的應(yīng)用

---- Microsoft Agent是微軟公司于1997年9月發(fā)布的一項(xiàng)代理軟件開(kāi)發(fā)技術(shù)，
而后被集成到Internet Explorer 4.0 Plus及更高版本中，目前版本為2.0，支持簡(jiǎn)體中文。
作為一種軟件代理工具，Agent以其強(qiáng)大的交互功能、鮮明的人性特點(diǎn)、優(yōu)美的操作界面和
簡(jiǎn)便統(tǒng)一的編程方法，對(duì)由菜單、按鈕、提示框等組成的傳統(tǒng)人機(jī)交互方式產(chǎn)生了很大影響，
在多媒體創(chuàng)作、Web應(yīng)用、教育軟件、軟件幫助系統(tǒng)和輔助工具制作等方面，具有廣闊的應(yīng)用前景。

一、 Microsoft Agent技術(shù)簡(jiǎn)介

---- Agent一詞的中文意思是“代理”，故名思意，這類代理軟件的主要作用是提供一種
易于理解和使用的操作界面，接受用戶的指令、代替用戶完成某些復(fù)雜繁瑣的工作、或?yàn)橛脩?提供幫助。科學(xué)研究表明：從人機(jī)工程的角度考慮，賦予電腦或程序更多人性化色彩，如支持
語(yǔ)音合成輸出信息、語(yǔ)音識(shí)別輸入指令、智能提示、動(dòng)畫(huà)等，能夠充分提高人機(jī)交互的有效性
和易用性。

---- 我們知道，在Office 97幫助系統(tǒng)中有一種叫作Office助手的代理軟件，其中幽默風(fēng)趣的
動(dòng)畫(huà)人物，如“大眼夾”，能夠根據(jù)用戶的操作步驟“智能化”地提出一些建議或幫助信息。
與Office助手相比，Agent功能更加豐富強(qiáng)大，表現(xiàn)在：

Office助手沿用傳統(tǒng)的不透明矩形窗口，窗口后面的背景被完全擋住；Agent動(dòng)畫(huà)人物本身是
一個(gè)“AlwaysOnTop”窗口，只有人物身體部分擋住背景，其余部分透明。

Office助手只允許Office 97的各個(gè)組件調(diào)用，Agent動(dòng)畫(huà)人物可由任何Windows程序調(diào)用；

Agent支持文字氣球和輸入提示條，在輸出語(yǔ)音的同時(shí)把文字輸出至一個(gè)卡通式文字氣球中。
如果電腦系統(tǒng)中安裝有Agent語(yǔ)音識(shí)別引擎，當(dāng)用戶按住輸入鍵，如Scroll Lock鍵，在Agent
人物下方出現(xiàn)一個(gè)輸入命令窗口，表示它正在“聆聽(tīng)”用戶的語(yǔ)音命令。

Agent提供Genie、Merlin、Bobby和Peedy等動(dòng)畫(huà)人物，不僅具有優(yōu)美詼諧的動(dòng)作，而且可以
通過(guò)聲卡、麥克風(fēng)與用戶交談。

二、 Microsoft Agent安裝方法

---- Agent是一種ActiveX控件，其服務(wù)器程序（C:\WINDOWS\MSAGENT\Agentsvr.exe）運(yùn)行
在Win95/98/NT操作平臺(tái)上，為其它調(diào)用Agent的客戶程序提供服務(wù)。客戶程序可以是利用VB、
C++、Delphi、VFP、PB等開(kāi)發(fā)的應(yīng)用軟件，也可以是HTML文件中的Visual Script、Java Script
腳本語(yǔ)言代碼。

安裝Agent核心組件Msagent.exe。

安裝Lernout & Hauspie TruVoice Text-to-Speech Engine（完成從文字合成語(yǔ)音的工作，
目前版本只支持英語(yǔ)）Cgram.exe。

安裝Microsoft Command and Control Speech Engine（提供語(yǔ)音識(shí)別功能，目前版本只支持
英語(yǔ)）Actcnc.exe。

Agent動(dòng)畫(huà)人物人物數(shù)據(jù)文件。Agent支持單結(jié)構(gòu)角色文件（.acs，角色數(shù)據(jù)與動(dòng)畫(huà)數(shù)據(jù)存于同一個(gè)文件），
也支持分離結(jié)構(gòu)角色文件（.acf，角色數(shù)據(jù)存于.acf中，動(dòng)畫(huà)數(shù)據(jù)存于.aca中）。基于本地硬盤(pán)和網(wǎng)絡(luò)的
應(yīng)用程序可采用.acs文件，基于Web頁(yè)面的HTML文件在瀏覽器中訪問(wèn)時(shí)會(huì)自動(dòng)調(diào)用，習(xí)慣上多使用.acs文件。

---- 上述文件可從 http://www.microsoft.com//workshop/imedia/agent/default.asp下載。

三、 Microsoft Agent編程要點(diǎn)

---- 1、 在Delphi中添加Agent控件

---- 在Delphi IDE中選擇菜單Component，Import ActiveX Control——在Import ActiveX
下的列表框中選擇Microsoft Agent Control 2.0（Version 2.0），點(diǎn)擊按鈕Install——在
Install對(duì)話框中點(diǎn)擊按鈕OK——在Confirm對(duì)話框中點(diǎn)擊按鈕Yes——在對(duì)話框中點(diǎn)擊按鈕OK。
至此，Agent控件被添加到Delphi組件板ActiveX頁(yè)上。

---- 2、 在Delphi中調(diào)用Agent控件

---- ⑴、在Delphi IDE 中新建Project1（包含F(xiàn)orm1），在Form1上放置Agent1
（Name屬性為MyAgent）、Button1。

---- ⑵、定義變量。

Var

  Peedy: IagentCtlCharacterEx;

  Request1,Request2: IagentCtlRequest;

---- ⑶Agent主要屬性、方法、事件。

 

---- ①Characters屬性與Load、Unload方法：初始化Agent，加載動(dòng)畫(huà)數(shù)據(jù)，卸載動(dòng)畫(huà)人物

---- Request1 := MyAgent.Characters.Load( 'Peedy', 'C:\Windows\System\Peedy.acs' );

---- Peedy := MyAgent.Characters.Character( 'Peedy' );

---- MyAgent.Characters.Unload('Peedy');

---- ②Show與Hide方法：顯示、隱藏Agent動(dòng)畫(huà)人物。參數(shù)Fast表示動(dòng)畫(huà)人物顯示、隱藏的
速度。Fast為0表示Agent飛入、飛出，F(xiàn)ast為1表示Agent直接出現(xiàn)、消失，沒(méi)有動(dòng)畫(huà)過(guò)程。

---- Peedy.Show(0);

---- Peedy.Hide(1);

---- ③StopAll、Stop方法：停止所有動(dòng)作。

---- Peedy.StopAll('');

---- Peedy.Stop(Request);

---- ④Connected屬性：Agent是否與Microsoft Agent服務(wù)器連接。

---- MyAgent.Connected := True;

---- ⑤Get_Height、Get_Width、Set_Height、Set_Width方法：獲得、設(shè)置Agent動(dòng)畫(huà)人物的高度、寬度。

AgentHight := Peedy.Get_Height;

AgentWidth := Peedy.Get_Width;

Peedy.Set_Height( round(AgentHeight / 2 ));

Peedy.Set_Width( round( AgentWidth / 2 ));

---- ⑥MoveTo方法：參數(shù)x，y表示Agent動(dòng)畫(huà)人物移動(dòng)到的坐標(biāo)，參數(shù)Speed表示移動(dòng)的速度。

---- Peedy.MoveTo( (Screen.Width-Peedy.Get_Width) Div 2, (Screen.Height-Peedy.Get_Height) Div 2, 2 );

---- ⑦Interrupt方法：中斷指定角色的動(dòng)畫(huà)。在幾十種動(dòng)畫(huà)動(dòng)作中，有一類后綴名為“ing” 的動(dòng)作
比較特殊，如“processing”、“searching”、“reading”、“writing”，一旦執(zhí)行就必須通過(guò)調(diào)用
另外一個(gè)動(dòng)畫(huà)人物的Interrupt方法才能中斷 。角色不能中斷自身的動(dòng)作，否則會(huì)導(dǎo)致異常。

Request1 := Robby.Play('reading');

Peedy.Interrupt(Request1);

---- ⑧Wait方法：在多個(gè)不同動(dòng)畫(huà)人物之間協(xié)調(diào)動(dòng)畫(huà)動(dòng)作，如等待sRobby的當(dāng)前動(dòng)作執(zhí)行完畢后，
Peedy做另外一個(gè)動(dòng)作。

Request1 := Robby.Play('read');

Peedy.Wait(Request1);

Peedy.Play('search');

---- ⑨Play方法：執(zhí)行指定的動(dòng)畫(huà)動(dòng)作，參數(shù)Animation為一常量，表示動(dòng)畫(huà)類型。
Agent提供了幾十種預(yù)定義動(dòng)作，開(kāi)發(fā)軟件時(shí)只需直接調(diào)用這些常量即可。下面簡(jiǎn)要
介紹其中常用的一些常量?jī)H供編程參考。

---- 動(dòng)作類型 中文含意 動(dòng)作類型 中文含意 動(dòng)作類型 中文含意

Acknowledge 承認(rèn) LookDown 向下看 Sad 悲傷

Alert 警告 LookDownBlink 向下看眨眼 Search 尋找

Announce 聲明 LookUp 向上看 StartListening 開(kāi)始聆聽(tīng)

Blink 眨眼 LookUpBlink 向下看眨眼 StopListening 停止聆聽(tīng)

Confused 迷惑 LookLeft 向左看 Suggest 建議

Congratulate 祝賀 LookLeftBlink 向左看眨眼 Surprised 吃驚

Decline 拒絕 LookRight 向右看 Think 思考

DontRecognize 不承認(rèn) LookRightBlink 向右看眨眼 Wave 揮動(dòng)

Explain 解釋 MoveDown 向下移動(dòng) Write 書(shū)寫(xiě)

GestureDown 向下姿勢(shì) MoveUp 向上移動(dòng) Processing 計(jì)算……

GestureUp 向上姿勢(shì) MoveRight 向右移動(dòng) Reading 閱讀……

GestureLeft 向左姿勢(shì) MoveLeft 向左移動(dòng) Searching 尋找……

GestureRight 向右姿勢(shì) Pleased 高興 Writing 書(shū)寫(xiě)……

GetAttention 獲得注意 Read 閱讀 Greet

  問(wèn)候 RestPose 恢復(fù)初始狀態(tài)

Request := peedy.Play('search');

---- ⑩Speak方法：Agent通過(guò)調(diào)用語(yǔ)音合成引擎，支持英語(yǔ)的語(yǔ)音合成輸出功能，只需
輸入英文字符串，Agent就能通過(guò)聲卡、音箱“說(shuō)話”。Agent的當(dāng)前版本尚不具備支持
中文語(yǔ)音合成功能，所以只能以.wav文件的形式播放中文。使用時(shí)可以將想要說(shuō)的中文
句子預(yù)先錄好，以.wav形式存儲(chǔ)，在程序中調(diào)用即可。參數(shù)Text表示文字氣球中顯示的
文字，參數(shù)url表示.wav文件的路徑。

---- Peedy.speak('嗨，朋友們，你們好，現(xiàn)在由我為您提供幫助！','C:\新建文件夾\Help.wav');

---- Peedy.Speak( 'Do you like my help? If so, Please send me an email! Thank you!', '' );

---- ⑾Commands.Add方法：在Button1Click事件中為Agent添加自定義語(yǔ)音識(shí)別命令，參數(shù)
const Name表示語(yǔ)音命令的標(biāo)識(shí)，參數(shù)Caption表示該命令在輸入命令窗口中的顯示標(biāo)題，
參數(shù)Voice表示該命令對(duì)應(yīng)的語(yǔ)句。當(dāng)用戶通過(guò)麥克風(fēng)向動(dòng)畫(huà)人物發(fā)出語(yǔ)音命令時(shí)，觸發(fā)
Agent的Command事件，因此我們可以另外編寫(xiě)一個(gè)過(guò)程完成語(yǔ)音識(shí)別功能。