Iagentctlcharacterex.balloon & Api

Тема в разделе "Visual Basic", создана пользователем Conteacky, 15 июл 2007.

Статус темы:
Закрыта.
  1. Conteacky

    Conteacky Гость

    Пытаюсь поработать с баллоном персонажа MS Agent.
    Без труда получаю его handle и на этом все заканчивается. С этим хендлом ни одна функция API не работает. В чем дело ? А вообще возможно ли "юзать" его?
    На всякий случай кусочек кода
    Код (Text):
        AgentChar.Balloon.Style = 1
    AgentChar.Speak "Hello"

    List1.Clear

    Dim hCharacter As Long
    hCharacter = FindWindow("AgentAnim", "Microsoft Agent")
    List1.AddItem "Character handle " & CStr(hCharacter)

    Dim hBalloon As Long
    hBalloon = FindWindow("AgentAnimBalloon", vbNullString)
    List1.AddItem "Balloon handle " & CStr(hBalloon)

    Dim Rct As Rect
    GetWindowRect hBalloon, Rct
    List1.AddItem "Right " & CStr(Rct.Right)
    List1.AddItem "Bottom " & CStr(Rct.Bottom)
     
  2. Conteacky

    Conteacky Гость

    И вдогонку:
    А Office Assistant в VB можно ли вообще использовать ? В VBA то можно, а в VB что-то не получается...
     
  3. Over

    Over Well-Known Member

    Регистрация:
    4 июл 2007
    Сообщения:
    116
    Симпатии:
    0
    Можно всё. Просто в программе VB нужно создать объект OfficeWord или OfficeExcel и дальше вызывать методы, как на ВБА. Это проверено. Хэндлов никаких не нужно.
    Попробуй что-нибудь типа этого:
    Код (Text):
    MyExcelObj = CreateOleObject ('Excel.Application');
     
Статус темы:
Закрыта.

Поделиться этой страницей