⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 agentobjects_tlb.pas

📁 电脑编程技巧和源码。很不错的。
💻 PAS
📖 第 1 页 / 共 5 页
字号:
    function  Speak(Text: OleVariant; Url: OleVariant): IAgentCtlRequest; dispid 15;
    function  GestureAt(x: Smallint; y: Smallint): IAgentCtlRequest; dispid 17;
    function  MoveTo(x: Smallint; y: Smallint; Speed: OleVariant): IAgentCtlRequest; dispid 18;
    function  Hide(Fast: OleVariant): IAgentCtlRequest; dispid 19;
    function  Show(Fast: OleVariant): IAgentCtlRequest; dispid 20;
    procedure StopAll(Types: OleVariant); dispid 31;
    property MoveCause: Smallint readonly dispid 32;
    property VisibilityCause: Smallint readonly dispid 33;
    property HasOtherClients: WordBool readonly dispid 34;
    property SoundEffectsOn: WordBool dispid 35;
    property ExtraData: WideString readonly dispid 36;
  end;

// *********************************************************************//
// Interface: IAgentCtlCharacterEx
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {DE8EF600-2F82-11D1-ACAC-00C04FD97575}
// *********************************************************************//
  IAgentCtlCharacterEx = interface(IAgentCtlCharacter)
    ['{DE8EF600-2F82-11D1-ACAC-00C04FD97575}']
    function  ShowPopupMenu(x: Smallint; y: Smallint): WordBool; safecall;
    procedure Set_AutoPopupMenu(On_: WordBool); safecall;
    function  Get_AutoPopupMenu: WordBool; safecall;
    procedure Set_HelpModeOn(On_: WordBool); safecall;
    function  Get_HelpModeOn: WordBool; safecall;
    procedure Set_HelpContextID(ID: Integer); safecall;
    function  Get_HelpContextID: Integer; safecall;
    function  Get_Active: Smallint; safecall;
    function  Listen(Listen: WordBool): WordBool; safecall;
    procedure Set_LanguageID(LanguageID: Integer); safecall;
    function  Get_LanguageID: Integer; safecall;
    function  Get_SRModeID: WideString; safecall;
    procedure Set_SRModeID(const EngineModeId: WideString); safecall;
    function  Get_TTSModeID: WideString; safecall;
    procedure Set_TTSModeID(const EngineModeId: WideString); safecall;
    function  Get_HelpFile: WideString; safecall;
    procedure Set_HelpFile(const File_: WideString); safecall;
    function  Get_GUID: WideString; safecall;
    function  Get_OriginalHeight: Smallint; safecall;
    function  Get_OriginalWidth: Smallint; safecall;
    function  Think(const Text: WideString): IAgentCtlRequest; safecall;
    function  Get_Version: WideString; safecall;
    function  Get_AnimationNames: IAgentCtlAnimationNames; safecall;
    function  Get_SRStatus: Integer; safecall;
    property AutoPopupMenu: WordBool read Get_AutoPopupMenu write Set_AutoPopupMenu;
    property HelpModeOn: WordBool read Get_HelpModeOn write Set_HelpModeOn;
    property HelpContextID: Integer read Get_HelpContextID write Set_HelpContextID;
    property Active: Smallint read Get_Active;
    property LanguageID: Integer read Get_LanguageID write Set_LanguageID;
    property SRModeID: WideString read Get_SRModeID write Set_SRModeID;
    property TTSModeID: WideString read Get_TTSModeID write Set_TTSModeID;
    property HelpFile: WideString read Get_HelpFile write Set_HelpFile;
    property GUID: WideString read Get_GUID;
    property OriginalHeight: Smallint read Get_OriginalHeight;
    property OriginalWidth: Smallint read Get_OriginalWidth;
    property Version: WideString read Get_Version;
    property AnimationNames: IAgentCtlAnimationNames read Get_AnimationNames;
    property SRStatus: Integer read Get_SRStatus;
  end;

// *********************************************************************//
// DispIntf:  IAgentCtlCharacterExDisp
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {DE8EF600-2F82-11D1-ACAC-00C04FD97575}
// *********************************************************************//
  IAgentCtlCharacterExDisp = dispinterface
    ['{DE8EF600-2F82-11D1-ACAC-00C04FD97575}']
    function  ShowPopupMenu(x: Smallint; y: Smallint): WordBool; dispid 37;
    property AutoPopupMenu: WordBool dispid 38;
    property HelpModeOn: WordBool dispid 39;
    property HelpContextID: Integer dispid 40;
    property Active: Smallint readonly dispid 41;
    function  Listen(Listen: WordBool): WordBool; dispid 42;
    property LanguageID: Integer dispid 43;
    property SRModeID: WideString dispid 46;
    property TTSModeID: WideString dispid 47;
    property HelpFile: WideString dispid 48;
    property GUID: WideString readonly dispid 49;
    property OriginalHeight: Smallint readonly dispid 50;
    property OriginalWidth: Smallint readonly dispid 51;
    function  Think(const Text: WideString): IAgentCtlRequest; dispid 52;
    property Version: WideString readonly dispid 53;
    property AnimationNames: IAgentCtlAnimationNames readonly dispid 54;
    property SRStatus: Integer readonly dispid 55;
    property Balloon: IAgentCtlBalloonEx readonly dispid 23;
    property Commands: IAgentCtlCommandsEx readonly dispid 25;
    property Name: WideString dispid 24;
    property Description: WideString dispid 28;
    property Visible: WordBool readonly dispid 2;
    property Left: Smallint dispid 3;
    property Top: Smallint dispid 4;
    property Height: Smallint dispid 5;
    property Width: Smallint dispid 6;
    property Speed: Integer readonly dispid 10;
    property Pitch: Integer readonly dispid 11;
    property IdleOn: WordBool dispid 29;
    function  Activate(State: OleVariant): WordBool; dispid 26;
    function  Play(const Animation: WideString): IAgentCtlRequest; dispid 13;
    function  Get(const Type_: WideString; const Name: WideString; Queue: OleVariant): IAgentCtlRequest; dispid 27;
    procedure Stop(Request: OleVariant); dispid 14;
    function  Wait(const WaitForRequest: IDispatch): IAgentCtlRequest; dispid 22;
    function  Interrupt(const InterruptRequest: IDispatch): IAgentCtlRequest; dispid 21;
    function  Speak(Text: OleVariant; Url: OleVariant): IAgentCtlRequest; dispid 15;
    function  GestureAt(x: Smallint; y: Smallint): IAgentCtlRequest; dispid 17;
    function  MoveTo(x: Smallint; y: Smallint; Speed: OleVariant): IAgentCtlRequest; dispid 18;
    function  Hide(Fast: OleVariant): IAgentCtlRequest; dispid 19;
    function  Show(Fast: OleVariant): IAgentCtlRequest; dispid 20;
    procedure StopAll(Types: OleVariant); dispid 31;
    property MoveCause: Smallint readonly dispid 32;
    property VisibilityCause: Smallint readonly dispid 33;
    property HasOtherClients: WordBool readonly dispid 34;
    property SoundEffectsOn: WordBool dispid 35;
    property ExtraData: WideString readonly dispid 36;
  end;

// *********************************************************************//
// Interface: IAgentCtlBalloon
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {F5BE8BD3-7DE6-11D0-91FE-00C04FD701A5}
// *********************************************************************//
  IAgentCtlBalloon = interface(IDispatch)
    ['{F5BE8BD3-7DE6-11D0-91FE-00C04FD701A5}']
    function  Get_Enabled: WordBool; safecall;
    function  Get_NumberOfLines: Integer; safecall;
    function  Get_CharsPerLine: Integer; safecall;
    function  Get_FontName: WideString; safecall;
    function  Get_FontSize: Integer; safecall;
    function  Get_FontBold: WordBool; safecall;
    function  Get_FontItalic: WordBool; safecall;
    function  Get_FontStrikethru: WordBool; safecall;
    function  Get_FontUnderline: WordBool; safecall;
    function  Get_ForeColor: Integer; safecall;
    function  Get_BackColor: Integer; safecall;
    function  Get_BorderColor: Integer; safecall;
    procedure Set_Visible(Visible: WordBool); safecall;
    function  Get_Visible: WordBool; safecall;
    procedure Set_FontName(const FontName: WideString); safecall;
    procedure Set_FontSize(FontSize: Integer); safecall;
    procedure Set_FontCharSet(FontCharSet: Smallint); safecall;
    function  Get_FontCharSet: Smallint; safecall;
    property Enabled: WordBool read Get_Enabled;
    property NumberOfLines: Integer read Get_NumberOfLines;
    property CharsPerLine: Integer read Get_CharsPerLine;
    property FontName: WideString read Get_FontName write Set_FontName;
    property FontSize: Integer read Get_FontSize write Set_FontSize;
    property FontBold: WordBool read Get_FontBold;
    property FontItalic: WordBool read Get_FontItalic;
    property FontStrikethru: WordBool read Get_FontStrikethru;
    property FontUnderline: WordBool read Get_FontUnderline;
    property ForeColor: Integer read Get_ForeColor;
    property BackColor: Integer read Get_BackColor;
    property BorderColor: Integer read Get_BorderColor;
    property Visible: WordBool read Get_Visible write Set_Visible;
    property FontCharSet: Smallint read Get_FontCharSet write Set_FontCharSet;
  end;

// *********************************************************************//
// DispIntf:  IAgentCtlBalloonDisp
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {F5BE8BD3-7DE6-11D0-91FE-00C04FD701A5}
// *********************************************************************//
  IAgentCtlBalloonDisp = dispinterface
    ['{F5BE8BD3-7DE6-11D0-91FE-00C04FD701A5}']
    property Enabled: WordBool readonly dispid 1;
    property NumberOfLines: Integer readonly dispid 2;
    property CharsPerLine: Integer readonly dispid 3;
    property FontName: WideString dispid 4;
    property FontSize: Integer dispid 5;
    property FontBold: WordBool readonly dispid 10;
    property FontItalic: WordBool readonly dispid 11;
    property FontStrikethru: WordBool readonly dispid 12;
    property FontUnderline: WordBool readonly dispid 13;
    property ForeColor: Integer readonly dispid 7;
    property BackColor: Integer readonly dispid 8;
    property BorderColor: Integer readonly dispid 9;
    property Visible: WordBool dispid 14;
    property FontCharSet: Smallint dispid 15;
  end;

// *********************************************************************//
// Interface: IAgentCtlBalloonEx
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {822DB1C0-8879-11D1-9EC6-00C04FD7081F}
// *********************************************************************//
  IAgentCtlBalloonEx = interface(IAgentCtlBalloon)
    ['{822DB1C0-8879-11D1-9EC6-00C04FD7081F}']
    procedure Set_Style(Style: Integer); safecall;
    function  Get_Style: Integer; safecall;
    property Style: Integer read Get_Style write Set_Style;
  end;

// *********************************************************************//
// DispIntf:  IAgentCtlBalloonExDisp
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {822DB1C0-8879-11D1-9EC6-00C04FD7081F}
// *********************************************************************//
  IAgentCtlBalloonExDisp = dispinterface
    ['{822DB1C0-8879-11D1-9EC6-00C04FD7081F}']
    property Style: Integer dispid 16;
    property Enabled: WordBool readonly dispid 1;
    property NumberOfLines: Integer readonly dispid 2;
    property CharsPerLine: Integer readonly dispid 3;
    property FontName: WideString dispid 4;
    property FontSize: Integer dispid 5;
    property FontBold: WordBool readonly dispid 10;
    property FontItalic: WordBool readonly dispid 11;
    property FontStrikethru: WordBool readonly dispid 12;
    property FontUnderline: WordBool readonly dispid 13;
    property ForeColor: Integer readonly dispid 7;
    property BackColor: Integer readonly dispid 8;
    property BorderColor: Integer readonly dispid 9;
    property Visible: WordBool dispid 14;
    property FontCharSet: Smallint dispid 15;
  end;

// *********************************************************************//
// Interface: IAgentCtlCommands
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {F5BE8BE1-7DE6-11D0-91FE-00C04FD701A5}
// *********************************************************************//
  IAgentCtlCommands = interface(IDispatch)
    ['{F5BE8BE1-7DE6-11D0-91FE-00C04FD701A5}']
    function  Get_Item(const Name: WideString): IAgentCtlCommandEx; safecall;
    function  Command(const Name: WideString): IAgentCtlCommandEx; safecall;
    function  Get_Count: Integer; safecall;
    function  Get_Caption: WideString; safecall;
    procedure Set_Caption(const Caption: WideString); safecall;
    function  Get_Voice: WideString; safecall;
    procedure Set_Voice(const Voice: WideString); safecall;
    function  Get_Visible: WordBool; safecall;
    procedure Set_Visible(Visible: WordBool); safecall;
    function  Get_Enum: IUnknown; safecall;
    function  Add(const Name: WideString; Caption: OleVariant; Voice: OleVariant; 
                  Enabled: OleVariant; Visible: OleVariant): IAgentCtlCommand; safecall;
    function  Insert(const Name: WideString; const RefName: WideString; Before: OleVariant; 
                     Caption: OleVariant; Voice: OleVariant; Enabled: OleVariant; 
                     Visible: OleVariant): IAgentCtlCommand; safecall;
    procedure Remove(const Name: WideString); safecall;
    procedure RemoveAll; safecall;
    property Item[const Name: WideString]: IAgentCtlCommandEx read Get_Item; default;
    property Count: Integer read Get_Count;
    property Caption: WideString read Get_Caption write Set_Caption;
    property Voice: WideString read Get_Voice write Set_Voice;
    property Visible: WordBool read Get_Visible write Set_Visible;
    property Enum: IUnknown read Get_Enum;
  end;

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -