Propriedade conectada

[O Microsoft Agent foi preterido a partir do Windows 7 e pode não estar disponível em versões subsequentes do Windows.]

Descrição

Retorna ou define se o controle atual está conectado ao servidor do Microsoft Agent.

Sintaxe

*agent.*Connected [ = booleano ]

Peça	Descrição
booleano	Uma expressão booleana especificando se o controle está conectado. True O controle está conectado.

Comentários

Em muitas situações, especificar o controle cria automaticamente uma conexão com o servidor do Microsoft Agent. Por exemplo, especificar o CLSID do controle Microsoft Agent na marca <OBJECT> em uma página da Web abre automaticamente uma conexão de servidor e sair da página fecha a conexão. Da mesma forma, para Visual Basic ou outras linguagens que permitem soltar um controle em um formulário, executar o programa abre automaticamente uma conexão e sair do programa fecha a conexão. Se o servidor não estiver em execução no momento, ele será iniciado automaticamente.

No entanto, se você quiser criar um controle Agent em tempo de execução, também talvez seja necessário abrir explicitamente uma nova conexão com o servidor usando a propriedade Connected. Por exemplo, no Visual Basic você pode criar um objeto ActiveX em tempo de execução usando a instrução set com a palavra-chave New (ou função CreateObject). Embora isso crie o objeto, ele pode não criar a conexão com o servidor. Você pode usar a propriedade Connected antes de qualquer código que chame a interface de programação do Microsoft Agent, conforme mostrado no exemplo a seguir:

   ' Declare a global variable for the control
   Dim MyAgent as Agent

   ' Create an instance of the control using New
   Set MyAgent = New Agent

   ' Open a connection to the server
   MyAgent.Connected = True

   ' Load a character
   MyAgent.Characters.Load "Genie", " Genie.acs"

   ' Display the character
   MyAgent.Characters("Genie").Show

Criar um controle usando essa técnica não expõe os eventos do controle Agente. No Visual Basic 5.0 (e posterior), você pode acessar os eventos do controle incluindo o controle nas referências do seu projeto e usar o WithEvents palavra-chave em sua declaração de variável:

   Dim WithEvents MyAgent as Agent

   ' Create an instance of the control using New
   Set MyAgent = New Agent

Usar WithEvents para criar uma instância do controle Agent em tempo de execução abre automaticamente a conexão com o servidor Microsoft Agent. Portanto, não é necessário incluir uma instrução Connected.

Você pode fechar sua conexão com o servidor liberando todas as referências criadas para objetos Agent, como IAgentCtlCharacterEx e IAgentCtlCommandEx. Você também deve liberar sua referência ao próprio controle do Agente. No Visual Basic, você pode liberar uma referência a um objeto definindo sua variável como Nothing. Se você tiver carregado caracteres, descarregue-os antes de liberar o objeto de caractere.

   Dim WithEvents MyAgent as Agent
   Dim Genie as IAgentCtlCharacterEx
   
   Sub Form_Load

   ' Create an instance of the control using New
   Set MyAgent = New Agent

   ' Open a connection to the server
   MyAgent.Connected = True

   ' Load the character into the Characters collection
   MyAgent.Characters.Load "Genie", " Genie.acs"

   ' Create a reference to the character
   Set Genie = MyAgent.Characters("Genie")

   End Sub

   Sub CloseConnection

   ' Unload the character
   MyAgent.Characters.Unload "Genie"

   ' Release the reference to the character object
   Set Genie = Nothing

   ' Release the reference to the Agent control
   Set MyAgent = Nothing
   End Sub