📄 agentserverobjects_tlb.pas
字号:
procedure GetAutoPopupMenu(out pbAutoPopupMenu: Integer); safecall;
procedure GetHelpFileName(out pbszName: WideString); safecall;
procedure SetHelpFileName(const bszName: WideString); safecall;
procedure SetHelpModeOn(bHelpModeOn: Integer); safecall;
procedure GetHelpModeOn(out pbHelpModeOn: Integer); safecall;
procedure SetHelpContextID(ulID: Integer); safecall;
procedure GetHelpContextID(out pulID: Integer); safecall;
procedure GetActive(out psState: Smallint); safecall;
procedure Listen(bListen: Integer); safecall;
procedure SetLanguageID(langid: Integer); safecall;
procedure GetLanguageID(out plangid: Integer); safecall;
procedure GetTTSModeID(out pbszModeID: WideString); safecall;
procedure SetTTSModeID(const bszModeID: WideString); safecall;
procedure GetSRModeID(out pbszModeID: WideString); safecall;
procedure SetSRModeID(const bszModeID: WideString); safecall;
procedure GetGUID(out pbszID: WideString); safecall;
procedure GetOriginalSize(out plWidth: Integer; out plHeight: Integer); safecall;
procedure Think(const bszText: WideString; out pdwReqID: Integer); safecall;
procedure GetVersion(out psMajor: Smallint; out psMinor: Smallint); safecall;
procedure GetAnimationNames(out punkEnum: IUnknown); safecall;
procedure GetSRStatus(out plStatus: Integer); safecall;
end;
// *********************************************************************//
// DispIntf: IAgentCharacterExDisp
// Flags: (4416) Dual OleAutomation Dispatchable
// GUID: {98BBE491-2EED-11D1-ACAC-00C04FD97575}
// *********************************************************************//
IAgentCharacterExDisp = dispinterface
['{98BBE491-2EED-11D1-ACAC-00C04FD97575}']
procedure ShowPopupMenu(x: Smallint; y: Smallint); dispid 1610809344;
procedure SetAutoPopupMenu(bAutoPopupMenu: Integer); dispid 1610809345;
procedure GetAutoPopupMenu(out pbAutoPopupMenu: Integer); dispid 1610809346;
procedure GetHelpFileName(out pbszName: WideString); dispid 1610809347;
procedure SetHelpFileName(const bszName: WideString); dispid 1610809348;
procedure SetHelpModeOn(bHelpModeOn: Integer); dispid 1610809349;
procedure GetHelpModeOn(out pbHelpModeOn: Integer); dispid 1610809350;
procedure SetHelpContextID(ulID: Integer); dispid 1610809351;
procedure GetHelpContextID(out pulID: Integer); dispid 1610809352;
procedure GetActive(out psState: Smallint); dispid 1610809353;
procedure Listen(bListen: Integer); dispid 1610809354;
procedure SetLanguageID(langid: Integer); dispid 1610809355;
procedure GetLanguageID(out plangid: Integer); dispid 1610809356;
procedure GetTTSModeID(out pbszModeID: WideString); dispid 1610809357;
procedure SetTTSModeID(const bszModeID: WideString); dispid 1610809358;
procedure GetSRModeID(out pbszModeID: WideString); dispid 1610809359;
procedure SetSRModeID(const bszModeID: WideString); dispid 1610809360;
procedure GetGUID(out pbszID: WideString); dispid 1610809361;
procedure GetOriginalSize(out plWidth: Integer; out plHeight: Integer); dispid 1610809362;
procedure Think(const bszText: WideString; out pdwReqID: Integer); dispid 1610809363;
procedure GetVersion(out psMajor: Smallint; out psMinor: Smallint); dispid 1610809364;
procedure GetAnimationNames(out punkEnum: IUnknown); dispid 1610809365;
procedure GetSRStatus(out plStatus: Integer); dispid 1610809366;
procedure GetVisible(out pbVisible: Integer); dispid 1610743808;
procedure SetPosition(lLeft: Integer; lTop: Integer); dispid 1610743809;
procedure GetPosition(out plLeft: Integer; out plTop: Integer); dispid 1610743810;
procedure SetSize(lWidth: Integer; lHeight: Integer); dispid 1610743811;
procedure GetSize(out plWidth: Integer; out plHeight: Integer); dispid 1610743812;
procedure GetName(out pbszName: WideString); dispid 1610743813;
procedure GetDescription(out pbszDescription: WideString); dispid 1610743814;
procedure GetTTSSpeed(out pdwSpeed: Integer); dispid 1610743815;
procedure GetTTSPitch(out pwPitch: Smallint); dispid 1610743816;
procedure Activate(sState: Smallint); dispid 1610743817;
procedure SetIdleOn(bOn: Integer); dispid 1610743818;
procedure GetIdleOn(out pbOn: Integer); dispid 1610743819;
procedure Prepare(dwType: Integer; const bszName: WideString; bQueue: Integer;
out pdwReqID: Integer); dispid 1610743820;
procedure Play(const bszAnimation: WideString; out pdwReqID: Integer); dispid 1610743821;
procedure Stop(dwReqID: Integer); dispid 1610743822;
procedure StopAll(lTypes: Integer); dispid 1610743823;
procedure Wait(dwReqID: Integer; out pdwReqID: Integer); dispid 1610743824;
procedure Interrupt(dwReqID: Integer; out pdwReqID: Integer); dispid 1610743825;
procedure Show(bFast: Integer; out pdwReqID: Integer); dispid 1610743826;
procedure Hide(bFast: Integer; out pdwReqID: Integer); dispid 1610743827;
procedure Speak(const bszText: WideString; const bszUrl: WideString; out pdwReqID: Integer); dispid 1610743828;
procedure MoveTo(x: Smallint; y: Smallint; lSpeed: Integer; out pdwReqID: Integer); dispid 1610743829;
procedure GestureAt(x: Smallint; y: Smallint; out pdwReqID: Integer); dispid 1610743830;
procedure GetMoveCause(out pdwCause: Integer); dispid 1610743831;
procedure GetVisibilityCause(out pdwCause: Integer); dispid 1610743832;
procedure HasOtherClients(out plNumOtherClients: Integer); dispid 1610743833;
procedure SetSoundEffectsOn(bOn: Integer); dispid 1610743834;
procedure GetSoundEffectsOn(out pbOn: Integer); dispid 1610743835;
procedure SetName(const bszName: WideString); dispid 1610743836;
procedure SetDescription(const bszDescription: WideString); dispid 1610743837;
procedure GetExtraData(out pbszExtraData: WideString); dispid 1610743838;
end;
// *********************************************************************//
// Interface: IAgentEx
// Flags: (4416) Dual OleAutomation Dispatchable
// GUID: {48D12BA0-5B77-11D1-9EC1-00C04FD7081F}
// *********************************************************************//
IAgentEx = interface(IAgent)
['{48D12BA0-5B77-11D1-9EC1-00C04FD7081F}']
procedure GetCharacterEx(dwCharID: Integer; out ppCharacterEx: IAgentCharacterEx); safecall;
procedure GetVersion(out psMajor: Smallint; out psMinor: Smallint); safecall;
procedure ShowDefaultCharacterProperties(x: Smallint; y: Smallint; bUseDefaultPosition: Integer); safecall;
end;
// *********************************************************************//
// DispIntf: IAgentExDisp
// Flags: (4416) Dual OleAutomation Dispatchable
// GUID: {48D12BA0-5B77-11D1-9EC1-00C04FD7081F}
// *********************************************************************//
IAgentExDisp = dispinterface
['{48D12BA0-5B77-11D1-9EC1-00C04FD7081F}']
procedure GetCharacterEx(dwCharID: Integer; out ppCharacterEx: IAgentCharacterEx); dispid 1610809344;
procedure GetVersion(out psMajor: Smallint; out psMinor: Smallint); dispid 1610809345;
procedure ShowDefaultCharacterProperties(x: Smallint; y: Smallint; bUseDefaultPosition: Integer); dispid 1610809346;
procedure Load(vLoadKey: OleVariant; out pdwCharID: Integer; out pdwReqID: Integer); dispid 1610743808;
procedure Unload(dwCharID: Integer); dispid 1610743809;
procedure Register(const punkNotifySink: IUnknown; out pdwSinkID: Integer); dispid 1610743810;
procedure Unregister(dwSinkID: Integer); dispid 1610743811;
procedure GetCharacter(dwCharID: Integer; out ppunkCharacter: IDispatch); dispid 1610743812;
procedure GetSuspended(out pbSuspended: Integer); dispid 1610743813;
end;
// *********************************************************************//
// Interface: IAgentNotifySink
// Flags: (4416) Dual OleAutomation Dispatchable
// GUID: {00D18159-8466-11D0-AC63-00C04FD97575}
// *********************************************************************//
IAgentNotifySink = interface(IDispatch)
['{00D18159-8466-11D0-AC63-00C04FD97575}']
procedure Command(dwCommandID: Integer; const punkUserInput: IUnknown); safecall;
procedure ActivateInputState(dwCharID: Integer; bActivated: Integer); safecall;
procedure Restart; safecall;
procedure Shutdown; safecall;
procedure VisibleState(dwCharID: Integer; bVisible: Integer; dwCause: Integer); safecall;
procedure Click(dwCharID: Integer; fwKeys: Smallint; x: Integer; y: Integer); safecall;
procedure DblClick(dwCharID: Integer; fwKeys: Smallint; x: Integer; y: Integer); safecall;
procedure DragStart(dwCharID: Integer; fwKeys: Smallint; x: Integer; y: Integer); safecall;
procedure DragComplete(dwCharID: Integer; fwKeys: Smallint; x: Integer; y: Integer); safecall;
procedure RequestStart(dwRequestID: Integer); safecall;
procedure RequestComplete(dwRequestID: Integer; hrStatus: Integer); safecall;
procedure BookMark(dwBookMarkID: Integer); safecall;
procedure Idle(dwCharID: Integer; bStart: Integer); safecall;
procedure Move(dwCharID: Integer; x: Integer; y: Integer; dwCause: Integer); safecall;
procedure Size(dwCharID: Integer; lWidth: Integer; lHeight: Integer); safecall;
procedure BalloonVisibleState(dwCharID: Integer; bVisible: Integer); safecall;
end;
// *********************************************************************//
// DispIntf: IAgentNotifySinkDisp
// Flags: (4416) Dual OleAutomation Dispatchable
// GUID: {00D18159-8466-11D0-AC63-00C04FD97575}
// *********************************************************************//
IAgentNotifySinkDisp = dispinterface
['{00D18159-8466-11D0-AC63-00C04FD97575}']
procedure Command(dwCommandID: Integer; const punkUserInput: IUnknown); dispid 1610743808;
procedure ActivateInputState(dwCharID: Integer; bActivated: Integer); dispid 1610743809;
procedure Restart; dispid 1610743810;
procedure Shutdown; dispid 1610743811;
procedure VisibleState(dwCharID: Integer; bVisible: Integer; dwCause: Integer); dispid 1610743812;
procedure Click(dwCharID: Integer; fwKeys: Smallint; x: Integer; y: Integer); dispid 1610743813;
procedure DblClick(dwCharID: Integer; fwKeys: Smallint; x: Integer; y: Integer); dispid 1610743814;
procedure DragStart(dwCharID: Integer; fwKeys: Smallint; x: Integer; y: Integer); dispid 1610743815;
procedure DragComplete(dwCharID: Integer; fwKeys: Smallint; x: Integer; y: Integer); dispid 1610743816;
procedure RequestStart(dwRequestID: Integer); dispid 1610743817;
procedure RequestComplete(dwRequestID: Integer; hrStatus: Integer); dispid 1610743818;
procedure BookMark(dwBookMarkID: Integer); dispid 1610743819;
procedure Idle(dwCharID: Integer; bStart: Integer); dispid 1610743820;
procedure Move(dwCharID: Integer; x: Integer; y: Integer; dwCause: Integer); dispid 1610743821;
procedure Size(dwCharID: Integer; lWidth: Integer; lHeight: Integer); dispid 1610743822;
procedure BalloonVisibleState(dwCharID: Integer; bVisible: Integer); dispid 1610743823;
end;
// *********************************************************************//
// Interface: IAgentNotifySinkEx
// Flags: (4416) Dual OleAutomation Dispatchable
// GUID: {08C75162-3C9C-11D1-91FE-00C04FD701A5}
// *********************************************************************//
IAgentNotifySinkEx = interface(IAgentNotifySink)
['{08C75162-3C9C-11D1-91FE-00C04FD701A5}']
procedure HelpComplete(dwCharID: Integer; dwCommandID: Integer; dwCause: Integer); safecall;
procedure ListeningState(dwCharID: Integer; bListening: Integer; dwCause: Integer); safecall;
procedure DefaultCharacterChange(const bszGUID: WideString); safecall;
procedure AgentPropertyChange; safecall;
procedure ActiveClientChange(dwCharID: Integer; lStatus: Integer); safecall;
end;
// *********************************************************************//
// DispIntf: IAgentNotifySinkExDisp
// Flags: (4416) Dual OleAutomation Dispatchable
// GUID: {08C75162-3C9C-11D1-91FE-00C04FD701A5}
// *********************************************************************//
IAgentNotifySinkExDisp = dispinterface
['{08C75162-3C9C-11D1-91FE-00C04FD701A5}']
procedure HelpComplete(dwCharID: Integer; dwCommandID: Integer; dwCause: Integer); dispid 1610809344;
procedure ListeningState(dwCharID: Integer; bListening: Integer; dwCause: Integer); dispid 1610809345;
procedure DefaultCharacterChange(const bszGUID: WideString); dispid 1610809346;
procedure AgentPropertyChange; dispid 1610809347;
procedure ActiveClientChange(dwCharID: Integer; lStatus: Integer); dispid 1610809348;
procedure Command(dwCommandID: Integer; const punkUserInput: IUnknown); dispid 1610743808;
procedure ActivateInputState(dwCharID: Integer; bActivated: Integer); dispid 1610743809;
procedure Restart; dispid 1610743810;
procedure Shutdown; dispid 1610743811;
procedure VisibleState(dwCharID: Integer; bVisible: Integer; dwCause: Integer); dispid 1610743812;
procedure Click(dwCharID: Integer; fwKeys: Smallint; x: Integer; y: Integer); dispid 1610743813;
procedure DblClick(dwCharID: Integer; fwKeys: Smallint; x: Integer; y: Integer); dispid 1610743814;
procedure DragStart(dwCharID: Integer; fwKeys: Smallint; x: Integer; y: Integer); dispid 1610743815;
procedure DragComplete(dwCharID: Integer; fwKeys: Smallint; x: Integer; y: Integer); dispid 1610743816;
procedure RequestStart(dwRequestID: Integer); dispid 1610743817;
procedure RequestComplete(dwRequestID: Integer; hrStatus: Integer); dispid 1610743818;
procedure BookMark(dwBookMarkID: Integer); dispid 1610743819;
procedure Idle(dwCharID: Integer; bStart: Integer); dispid 1610743820;
procedure Move(dwCharID: Integer; x: Integer; y: Integer; dwCause: Integer); dispid 1610743821;
procedure Size(dwCharID: Integer; lWidth: Integer; lHeight: Integer); dispid 1610743822;
procedure BalloonVisibleState(dwCharID: Integer; bVisible: Integer); dispid 1610743823;
end;
// *********************************************************************//
// Interface: IAgentCommandWindow
// Flags: (4416) Dual OleAutomation Dispatchable
// GUID: {6D0ECB23-9968-11D0-AC6E-00C04FD97575}
// *********************************************************************//
IAgentCommandWindow = interface(IDispatch)
['{6D0ECB23-9968-11D0-AC6E-00C04FD97575}']
procedure SetVisible(bVisible: Integer); safecall;
procedure GetVisible(out pbVisible: Integer); safecall;
procedure GetPosition(out plLeft: Integer; out plTop: Integer); safecall;
procedure GetSize(out plWidth: Integer; out plHeight: Integer); safecall;
end;
// *********************************************************************//
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -