📄 agentserverobjects_tlb.pas
字号:
['{A7B93CA0-7B81-11D0-AC5F-00C04FD97575}']
procedure GetStatus(out plStatus: Integer); dispid 1610809344;
procedure GetEnabled(out pbEnabled: Integer); dispid 1610743808;
procedure GetUsingSoundEffects(out pbUsingSoundEffects: Integer); dispid 1610743809;
end;
// *********************************************************************//
// Interface: IAgentPropertySheet
// Flags: (4416) Dual OleAutomation Dispatchable
// GUID: {A7B93C8B-7B81-11D0-AC5F-00C04FD97575}
// *********************************************************************//
IAgentPropertySheet = interface(IDispatch)
['{A7B93C8B-7B81-11D0-AC5F-00C04FD97575}']
procedure GetVisible(out pbVisible: Integer); safecall;
procedure SetVisible(bVisible: Integer); safecall;
procedure GetPosition(out plLeft: Integer; out plTop: Integer); safecall;
procedure GetSize(out plWidth: Integer; out plHeight: Integer); safecall;
procedure GetPage(out pbszPage: WideString); safecall;
procedure SetPage(const bszPage: WideString); safecall;
end;
// *********************************************************************//
// DispIntf: IAgentPropertySheetDisp
// Flags: (4416) Dual OleAutomation Dispatchable
// GUID: {A7B93C8B-7B81-11D0-AC5F-00C04FD97575}
// *********************************************************************//
IAgentPropertySheetDisp = dispinterface
['{A7B93C8B-7B81-11D0-AC5F-00C04FD97575}']
procedure GetVisible(out pbVisible: Integer); dispid 1610743808;
procedure SetVisible(bVisible: Integer); dispid 1610743809;
procedure GetPosition(out plLeft: Integer; out plTop: Integer); dispid 1610743810;
procedure GetSize(out plWidth: Integer; out plHeight: Integer); dispid 1610743811;
procedure GetPage(out pbszPage: WideString); dispid 1610743812;
procedure SetPage(const bszPage: WideString); dispid 1610743813;
end;
// *********************************************************************//
// Interface: IAgentBalloon
// Flags: (4416) Dual OleAutomation Dispatchable
// GUID: {A7B93C8D-7B81-11D0-AC5F-00C04FD97575}
// *********************************************************************//
IAgentBalloon = interface(IDispatch)
['{A7B93C8D-7B81-11D0-AC5F-00C04FD97575}']
procedure GetEnabled(out pbEnabled: Integer); safecall;
procedure GetNumLines(out plLines: Integer); safecall;
procedure GetNumCharsPerLine(out plCharsPerLine: Integer); safecall;
procedure GetFontName(out pbszFontName: WideString); safecall;
procedure GetFontSize(out plFontSize: Integer); safecall;
procedure GetFontBold(out pbFontBold: Integer); safecall;
procedure GetFontItalic(out pbFontItalic: Integer); safecall;
procedure GetFontStrikethru(out pbFontStrikethru: Integer); safecall;
procedure GetFontUnderline(out pbFontUnderline: Integer); safecall;
procedure GetForeColor(out plFGColor: Integer); safecall;
procedure GetBackColor(out plBGColor: Integer); safecall;
procedure GetBorderColor(out plBorderColor: Integer); safecall;
procedure SetVisible(bVisible: Integer); safecall;
procedure GetVisible(out pbVisible: Integer); safecall;
procedure SetFontName(const bszFontName: WideString); safecall;
procedure SetFontSize(lFontSize: Integer); safecall;
procedure SetFontCharSet(sFontCharSet: Smallint); safecall;
procedure GetFontCharSet(out psFontCharSet: Smallint); safecall;
end;
// *********************************************************************//
// DispIntf: IAgentBalloonDisp
// Flags: (4416) Dual OleAutomation Dispatchable
// GUID: {A7B93C8D-7B81-11D0-AC5F-00C04FD97575}
// *********************************************************************//
IAgentBalloonDisp = dispinterface
['{A7B93C8D-7B81-11D0-AC5F-00C04FD97575}']
procedure GetEnabled(out pbEnabled: Integer); dispid 1610743808;
procedure GetNumLines(out plLines: Integer); dispid 1610743809;
procedure GetNumCharsPerLine(out plCharsPerLine: Integer); dispid 1610743810;
procedure GetFontName(out pbszFontName: WideString); dispid 1610743811;
procedure GetFontSize(out plFontSize: Integer); dispid 1610743812;
procedure GetFontBold(out pbFontBold: Integer); dispid 1610743813;
procedure GetFontItalic(out pbFontItalic: Integer); dispid 1610743814;
procedure GetFontStrikethru(out pbFontStrikethru: Integer); dispid 1610743815;
procedure GetFontUnderline(out pbFontUnderline: Integer); dispid 1610743816;
procedure GetForeColor(out plFGColor: Integer); dispid 1610743817;
procedure GetBackColor(out plBGColor: Integer); dispid 1610743818;
procedure GetBorderColor(out plBorderColor: Integer); dispid 1610743819;
procedure SetVisible(bVisible: Integer); dispid 1610743820;
procedure GetVisible(out pbVisible: Integer); dispid 1610743821;
procedure SetFontName(const bszFontName: WideString); dispid 1610743822;
procedure SetFontSize(lFontSize: Integer); dispid 1610743823;
procedure SetFontCharSet(sFontCharSet: Smallint); dispid 1610743824;
procedure GetFontCharSet(out psFontCharSet: Smallint); dispid 1610743825;
end;
// *********************************************************************//
// Interface: IAgentBalloonEx
// Flags: (4416) Dual OleAutomation Dispatchable
// GUID: {D7A6D440-8872-11D1-9EC6-00C04FD7081F}
// *********************************************************************//
IAgentBalloonEx = interface(IAgentBalloon)
['{D7A6D440-8872-11D1-9EC6-00C04FD7081F}']
procedure SetStyle(lStyle: Integer); safecall;
procedure GetStyle(out plStyle: Integer); safecall;
procedure SetNumLines(lLines: Integer); safecall;
procedure SetNumCharsPerLine(lCharsPerLine: Integer); safecall;
end;
// *********************************************************************//
// DispIntf: IAgentBalloonExDisp
// Flags: (4416) Dual OleAutomation Dispatchable
// GUID: {D7A6D440-8872-11D1-9EC6-00C04FD7081F}
// *********************************************************************//
IAgentBalloonExDisp = dispinterface
['{D7A6D440-8872-11D1-9EC6-00C04FD7081F}']
procedure SetStyle(lStyle: Integer); dispid 1610809344;
procedure GetStyle(out plStyle: Integer); dispid 1610809345;
procedure SetNumLines(lLines: Integer); dispid 1610809346;
procedure SetNumCharsPerLine(lCharsPerLine: Integer); dispid 1610809347;
procedure GetEnabled(out pbEnabled: Integer); dispid 1610743808;
procedure GetNumLines(out plLines: Integer); dispid 1610743809;
procedure GetNumCharsPerLine(out plCharsPerLine: Integer); dispid 1610743810;
procedure GetFontName(out pbszFontName: WideString); dispid 1610743811;
procedure GetFontSize(out plFontSize: Integer); dispid 1610743812;
procedure GetFontBold(out pbFontBold: Integer); dispid 1610743813;
procedure GetFontItalic(out pbFontItalic: Integer); dispid 1610743814;
procedure GetFontStrikethru(out pbFontStrikethru: Integer); dispid 1610743815;
procedure GetFontUnderline(out pbFontUnderline: Integer); dispid 1610743816;
procedure GetForeColor(out plFGColor: Integer); dispid 1610743817;
procedure GetBackColor(out plBGColor: Integer); dispid 1610743818;
procedure GetBorderColor(out plBorderColor: Integer); dispid 1610743819;
procedure SetVisible(bVisible: Integer); dispid 1610743820;
procedure GetVisible(out pbVisible: Integer); dispid 1610743821;
procedure SetFontName(const bszFontName: WideString); dispid 1610743822;
procedure SetFontSize(lFontSize: Integer); dispid 1610743823;
procedure SetFontCharSet(sFontCharSet: Smallint); dispid 1610743824;
procedure GetFontCharSet(out psFontCharSet: Smallint); dispid 1610743825;
end;
// *********************************************************************//
// Interface: IAgentCharacter
// Flags: (4416) Dual OleAutomation Dispatchable
// GUID: {A7B93C8F-7B81-11D0-AC5F-00C04FD97575}
// *********************************************************************//
IAgentCharacter = interface(IDispatch)
['{A7B93C8F-7B81-11D0-AC5F-00C04FD97575}']
procedure GetVisible(out pbVisible: Integer); safecall;
procedure SetPosition(lLeft: Integer; lTop: Integer); safecall;
procedure GetPosition(out plLeft: Integer; out plTop: Integer); safecall;
procedure SetSize(lWidth: Integer; lHeight: Integer); safecall;
procedure GetSize(out plWidth: Integer; out plHeight: Integer); safecall;
procedure GetName(out pbszName: WideString); safecall;
procedure GetDescription(out pbszDescription: WideString); safecall;
procedure GetTTSSpeed(out pdwSpeed: Integer); safecall;
procedure GetTTSPitch(out pwPitch: Smallint); safecall;
procedure Activate(sState: Smallint); safecall;
procedure SetIdleOn(bOn: Integer); safecall;
procedure GetIdleOn(out pbOn: Integer); safecall;
procedure Prepare(dwType: Integer; const bszName: WideString; bQueue: Integer;
out pdwReqID: Integer); safecall;
procedure Play(const bszAnimation: WideString; out pdwReqID: Integer); safecall;
procedure Stop(dwReqID: Integer); safecall;
procedure StopAll(lTypes: Integer); safecall;
procedure Wait(dwReqID: Integer; out pdwReqID: Integer); safecall;
procedure Interrupt(dwReqID: Integer; out pdwReqID: Integer); safecall;
procedure Show(bFast: Integer; out pdwReqID: Integer); safecall;
procedure Hide(bFast: Integer; out pdwReqID: Integer); safecall;
procedure Speak(const bszText: WideString; const bszUrl: WideString; out pdwReqID: Integer); safecall;
procedure MoveTo(x: Smallint; y: Smallint; lSpeed: Integer; out pdwReqID: Integer); safecall;
procedure GestureAt(x: Smallint; y: Smallint; out pdwReqID: Integer); safecall;
procedure GetMoveCause(out pdwCause: Integer); safecall;
procedure GetVisibilityCause(out pdwCause: Integer); safecall;
procedure HasOtherClients(out plNumOtherClients: Integer); safecall;
procedure SetSoundEffectsOn(bOn: Integer); safecall;
procedure GetSoundEffectsOn(out pbOn: Integer); safecall;
procedure SetName(const bszName: WideString); safecall;
procedure SetDescription(const bszDescription: WideString); safecall;
procedure GetExtraData(out pbszExtraData: WideString); safecall;
end;
// *********************************************************************//
// DispIntf: IAgentCharacterDisp
// Flags: (4416) Dual OleAutomation Dispatchable
// GUID: {A7B93C8F-7B81-11D0-AC5F-00C04FD97575}
// *********************************************************************//
IAgentCharacterDisp = dispinterface
['{A7B93C8F-7B81-11D0-AC5F-00C04FD97575}']
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: IAgentCharacterEx
// Flags: (4416) Dual OleAutomation Dispatchable
// GUID: {98BBE491-2EED-11D1-ACAC-00C04FD97575}
// *********************************************************************//
IAgentCharacterEx = interface(IAgentCharacter)
['{98BBE491-2EED-11D1-ACAC-00C04FD97575}']
procedure ShowPopupMenu(x: Smallint; y: Smallint); safecall;
procedure SetAutoPopupMenu(bAutoPopupMenu: Integer); safecall;
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -