Propriedades do objeto Character
[O Microsoft Agent foi preterido a partir do Windows 7 e pode estar indisponível nas versões subsequentes do Windows.]
O objeto Character expõe as seguintes propriedades:
- Ativo
- AutoPopupMenu
- Descrição
- Extradata
- GUID
- HasOtherClients
- Altura
- HelpContextID
- HelpFile
- HelpModeOn
- IdleOn
- LanguageID
- Deixou
- MoveCause
- Nome
- OriginalHeight
- OriginalWidth
- Densidade
- SoundEffectsOn
- Velocidade
- SRModeID
- SRStatus
- Início
- TTSModeID
- Versão
- VisibilityCause
- Visível
- Largura
Observe que as propriedades Height, Left, Top e Width de um caractere diferem daquelas que podem ser compatíveis com o ambiente de programação para o posicionamento do controle. As propriedades character se aplicam à apresentação visível de um caractere, não ao local do controle do Microsoft Agent.
Assim como acontece com os métodos de objeto Character , você pode acessar as propriedades de um caractere usando a coleção Characters ou simplificar sua sintaxe declarando uma variável de objeto e definindo-a como um caractere na coleção. No exemplo a seguir, Test1 e Test2 serão definidos com o mesmo valor:
Dim Genie
Dim MyRequest
Sub window_Onload
Agent.Characters.Load "Genie", "https://agent.microsoft.com/characters/v2/genie/genie.acf"
Set Genie = Agent.Characters("Genie")
Genie.MoveTo 15,15
Set MyRequest = Genie.Show()
End Sub
Sub Agent_RequestComplete(ByVal Request)
If Request = MyRequest Then
Test1 = Agent.Characters("Genie").Top
Test2 = Genie.Top
MsgBox "Test 1 is " + cstr(Test1) + "and Test 2 is " + cstr(Test2)
End If
End Sub
Como o servidor carrega um caractere de forma assíncrona, verifique se o caractere foi carregado antes de consultar suas propriedades, por exemplo, usando o evento RequestComplete . Caso contrário, as propriedades poderão retornar valores incorretos.