agentobjects_tlb.pas

电脑编程技巧和源码。很不错的。

    ['{F5BE8BF0-7DE6-11D0-91FE-00C04FD701A5}']
    property Status: Smallint readonly dispid 3;
    property Enabled: WordBool readonly dispid 1;
    property SoundEffects: WordBool readonly dispid 2;
  end;

// *********************************************************************//
// Interface: IAgentCtlSpeechInput
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {F5BE8BDD-7DE6-11D0-91FE-00C04FD701A5}
// *********************************************************************//
  IAgentCtlSpeechInput = interface(IDispatch)
    ['{F5BE8BDD-7DE6-11D0-91FE-00C04FD701A5}']
    function  Get_Enabled: WordBool; safecall;
    function  Get_Language: WideString; safecall;
    function  Get_HotKey: WideString; safecall;
    function  Get_Installed: WordBool; safecall;
    function  Get_Engine: WideString; safecall;
    procedure Set_Engine(const Engine: WideString); safecall;
    function  Get_ListeningTip: WordBool; safecall;
    property Enabled: WordBool read Get_Enabled;
    property Language: WideString read Get_Language;
    property HotKey: WideString read Get_HotKey;
    property Installed: WordBool read Get_Installed;
    property Engine: WideString read Get_Engine write Set_Engine;
    property ListeningTip: WordBool read Get_ListeningTip;
  end;

// *********************************************************************//
// DispIntf:  IAgentCtlSpeechInputDisp
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {F5BE8BDD-7DE6-11D0-91FE-00C04FD701A5}
// *********************************************************************//
  IAgentCtlSpeechInputDisp = dispinterface
    ['{F5BE8BDD-7DE6-11D0-91FE-00C04FD701A5}']
    property Enabled: WordBool readonly dispid 1;
    property Language: WideString readonly dispid 2;
    property HotKey: WideString readonly dispid 3;
    property Installed: WordBool readonly dispid 4;
    property Engine: WideString dispid 5;
    property ListeningTip: WordBool readonly dispid 6;
  end;

// *********************************************************************//
// Interface: IAgentCtlPropertySheet
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {F5BE8BDF-7DE6-11D0-91FE-00C04FD701A5}
// *********************************************************************//
  IAgentCtlPropertySheet = interface(IDispatch)
    ['{F5BE8BDF-7DE6-11D0-91FE-00C04FD701A5}']
    function  Get_Left: Smallint; safecall;
    function  Get_Top: Smallint; safecall;
    function  Get_Height: Smallint; safecall;
    function  Get_Width: Smallint; safecall;
    procedure Set_Visible(Visible: WordBool); safecall;
    function  Get_Visible: WordBool; safecall;
    procedure Set_Page(const Page: WideString); safecall;
    function  Get_Page: WideString; safecall;
    property Left: Smallint read Get_Left;
    property Top: Smallint read Get_Top;
    property Height: Smallint read Get_Height;
    property Width: Smallint read Get_Width;
    property Visible: WordBool read Get_Visible write Set_Visible;
    property Page: WideString read Get_Page write Set_Page;
  end;

// *********************************************************************//
// DispIntf:  IAgentCtlPropertySheetDisp
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {F5BE8BDF-7DE6-11D0-91FE-00C04FD701A5}
// *********************************************************************//
  IAgentCtlPropertySheetDisp = dispinterface
    ['{F5BE8BDF-7DE6-11D0-91FE-00C04FD701A5}']
    property Left: Smallint readonly dispid 1;
    property Top: Smallint readonly dispid 2;
    property Height: Smallint readonly dispid 3;
    property Width: Smallint readonly dispid 4;
    property Visible: WordBool dispid 6;
    property Page: WideString dispid 5;
  end;

// *********************************************************************//
// Interface: IAgentCtlUserInput
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {C4ABF875-8100-11D0-AC63-00C04FD97575}
// *********************************************************************//
  IAgentCtlUserInput = interface(IDispatch)
    ['{C4ABF875-8100-11D0-AC63-00C04FD97575}']
    function  Get_Count: Smallint; safecall;
    function  Get_Name: WideString; safecall;
    function  Get_CharacterID: WideString; safecall;
    function  Get_Confidence: Integer; safecall;
    function  Get_Voice: WideString; safecall;
    function  Get_Alt1Name: WideString; safecall;
    function  Get_Alt1Confidence: Integer; safecall;
    function  Get_Alt1Voice: WideString; safecall;
    function  Get_Alt2Name: WideString; safecall;
    function  Get_Alt2Confidence: Integer; safecall;
    function  Get_Alt2Voice: WideString; safecall;
    property Count: Smallint read Get_Count;
    property Name: WideString read Get_Name;
    property CharacterID: WideString read Get_CharacterID;
    property Confidence: Integer read Get_Confidence;
    property Voice: WideString read Get_Voice;
    property Alt1Name: WideString read Get_Alt1Name;
    property Alt1Confidence: Integer read Get_Alt1Confidence;
    property Alt1Voice: WideString read Get_Alt1Voice;
    property Alt2Name: WideString read Get_Alt2Name;
    property Alt2Confidence: Integer read Get_Alt2Confidence;
    property Alt2Voice: WideString read Get_Alt2Voice;
  end;

// *********************************************************************//
// DispIntf:  IAgentCtlUserInputDisp
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {C4ABF875-8100-11D0-AC63-00C04FD97575}
// *********************************************************************//
  IAgentCtlUserInputDisp = dispinterface
    ['{C4ABF875-8100-11D0-AC63-00C04FD97575}']
    property Count: Smallint readonly dispid 1610743808;
    property Name: WideString readonly dispid 1610743809;
    property CharacterID: WideString readonly dispid 1610743810;
    property Confidence: Integer readonly dispid 1610743811;
    property Voice: WideString readonly dispid 1610743812;
    property Alt1Name: WideString readonly dispid 1610743813;
    property Alt1Confidence: Integer readonly dispid 1610743814;
    property Alt1Voice: WideString readonly dispid 1610743815;
    property Alt2Name: WideString readonly dispid 1610743816;
    property Alt2Confidence: Integer readonly dispid 1610743817;
    property Alt2Voice: WideString readonly dispid 1610743818;
  end;

// *********************************************************************//
// Interface: IAgentCtlCommandsWindow
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {6D0ECB27-9968-11D0-AC6E-00C04FD97575}
// *********************************************************************//
  IAgentCtlCommandsWindow = interface(IDispatch)
    ['{6D0ECB27-9968-11D0-AC6E-00C04FD97575}']
    function  Get_Visible: WordBool; safecall;
    procedure Set_Visible(Visible: WordBool); safecall;
    function  Get_Left: Smallint; safecall;
    function  Get_Top: Smallint; safecall;
    function  Get_Height: Smallint; safecall;
    function  Get_Width: Smallint; safecall;
    property Visible: WordBool read Get_Visible write Set_Visible;
    property Left: Smallint read Get_Left;
    property Top: Smallint read Get_Top;
    property Height: Smallint read Get_Height;
    property Width: Smallint read Get_Width;
  end;

// *********************************************************************//
// DispIntf:  IAgentCtlCommandsWindowDisp
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {6D0ECB27-9968-11D0-AC6E-00C04FD97575}
// *********************************************************************//
  IAgentCtlCommandsWindowDisp = dispinterface
    ['{6D0ECB27-9968-11D0-AC6E-00C04FD97575}']
    property Visible: WordBool dispid 5;
    property Left: Smallint readonly dispid 6;
    property Top: Smallint readonly dispid 7;
    property Height: Smallint readonly dispid 8;
    property Width: Smallint readonly dispid 9;
  end;

// *********************************************************************//
// Interface: IAgentCtl
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {F5BE8BD1-7DE6-11D0-91FE-00C04FD701A5}
// *********************************************************************//
  IAgentCtl = interface(IDispatch)
    ['{F5BE8BD1-7DE6-11D0-91FE-00C04FD701A5}']
    function  Get_Characters: IAgentCtlCharacters; safecall;
    function  Get_AudioOutput: IAgentCtlAudioObjectEx; safecall;
    function  Get_SpeechInput: IAgentCtlSpeechInput; safecall;
    function  Get_PropertySheet: IAgentCtlPropertySheet; safecall;
    function  Get_CommandsWindow: IAgentCtlCommandsWindow; safecall;
    function  Get_Connected: WordBool; safecall;
    procedure Set_Connected(Connected: WordBool); safecall;
    function  Get_Suspended: WordBool; safecall;
    property Characters: IAgentCtlCharacters read Get_Characters;
    property AudioOutput: IAgentCtlAudioObjectEx read Get_AudioOutput;
    property SpeechInput: IAgentCtlSpeechInput read Get_SpeechInput;
    property PropertySheet: IAgentCtlPropertySheet read Get_PropertySheet;
    property CommandsWindow: IAgentCtlCommandsWindow read Get_CommandsWindow;
    property Connected: WordBool read Get_Connected write Set_Connected;
    property Suspended: WordBool read Get_Suspended;
  end;

// *********************************************************************//
// DispIntf:  IAgentCtlDisp
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {F5BE8BD1-7DE6-11D0-91FE-00C04FD701A5}
// *********************************************************************//
  IAgentCtlDisp = dispinterface
    ['{F5BE8BD1-7DE6-11D0-91FE-00C04FD701A5}']
    property Characters: IAgentCtlCharacters readonly dispid 3;
    property AudioOutput: IAgentCtlAudioObjectEx readonly dispid 4;
    property SpeechInput: IAgentCtlSpeechInput readonly dispid 5;
    property PropertySheet: IAgentCtlPropertySheet readonly dispid 8;
    property CommandsWindow: IAgentCtlCommandsWindow readonly dispid 12;
    property Connected: WordBool dispid 9;
    property Suspended: WordBool readonly dispid 14;
  end;

// *********************************************************************//
// Interface: IAgentCtlEx
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {8563FF20-8ECC-11D1-B9B4-00C04FD97575}
// *********************************************************************//
  IAgentCtlEx = interface(IAgentCtl)
    ['{8563FF20-8ECC-11D1-B9B4-00C04FD97575}']
    procedure ShowDefaultCharacterProperties(x: OleVariant; y: OleVariant); safecall;
    function  Get_RaiseRequestErrors: WordBool; safecall;
    procedure Set_RaiseRequestErrors(RaiseErrors: WordBool); safecall;
    property RaiseRequestErrors: WordBool read Get_RaiseRequestErrors write Set_RaiseRequestErrors;
  end;

// *********************************************************************//
// DispIntf:  IAgentCtlExDisp
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {8563FF20-8ECC-11D1-B9B4-00C04FD97575}
// *********************************************************************//
  IAgentCtlExDisp = dispinterface
    ['{8563FF20-8ECC-11D1-B9B4-00C04FD97575}']
    procedure ShowDefaultCharacterProperties(x: OleVariant; y: OleVariant); dispid 20;
    property RaiseRequestErrors: WordBool dispid 21;
    property Characters: IAgentCtlCharacters readonly dispid 3;
    property AudioOutput: IAgentCtlAudioObjectEx readonly dispid 4;
    property SpeechInput: IAgentCtlSpeechInput readonly dispid 5;
    property PropertySheet: IAgentCtlPropertySheet readonly dispid 8;
    property CommandsWindow: IAgentCtlCommandsWindow readonly dispid 12;
    property Connected: WordBool dispid 9;
    property Suspended: WordBool readonly dispid 14;
  end;

// *********************************************************************//
// DispIntf:  _AgentEvents
// Flags:     (4096) Dispatchable
// GUID:      {F5BE8BD4-7DE6-11D0-91FE-00C04FD701A5}
// *********************************************************************//
  _AgentEvents = dispinterface
    ['{F5BE8BD4-7DE6-11D0-91FE-00C04FD701A5}']
    procedure ActivateInput(const CharacterID: WideString); dispid 1;
    procedure DeactivateInput(const CharacterID: WideString); dispid 3;