Свойства символьного объекта

[Microsoft Agent является нерекомендуемым начиная с Windows 7 и может быть недоступен в последующих версиях Windows.]

Объект Character предоставляет следующие свойства:

• Активен
• AutoPopupMenu
• Описание
• ExtraData
• GUID
• HasOtherClients
• Высота
• HelpContextID
• HelpFile
• HelpModeOn
• IdleOn
• LanguageID
• Левой
• MoveCause
• Имя
• OriginalHeight
• OriginalWidth
• Высота тона
• SoundEffectsOn
• Speed
• SRModeID
• SRStatus
• Вверх
• TTSModeID
• Версия
• VisibilityCause
• Видимый
• Ширина

Обратите внимание, что свойства Height, Left, Top и Width символа отличаются от свойств, поддерживаемых средой программирования для размещения элемента управления. Свойства Character применяются к видимому представлению символа, а не к расположению элемента управления Microsoft Agent.

Как и в случае с методами объекта Character , вы можете получить доступ к свойствам символа с помощью коллекции Characters или упростить синтаксис, объявив переменную объекта и задав для нее символ в коллекции. В следующем примере test1 и Test2 будут иметь одно и то же значение:

   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

Так как сервер загружает символ асинхронно, убедитесь, что он загружен, прежде чем запрашивать его свойства, например с помощью события RequestComplete . В противном случае свойства могут возвращать неверные значения.