Hi you old scripting gurus:

It looks like the Overlap window is not firing the wired up OnChildFocus
event handler sub:

What could be doing this?

It looks like Aaron saves all the windows, not sure getting pretty deep for
my vbscript skill set.

You can jump to my specific notes by searching on "RtHere" (without quotes)
or read the below:

I will check out any relevant ideas about what to check out next since I am
running out of my own ideas.

It appears the ClientInformation.Overlap window is not triggering the
OnChild event to fire its sub although it looks wired up and is in fact
being fired in the WEEvent output.

Here is the code with logger left in that i think is failing:

Near top of script:

' General Global Variables

...

Logger( "Test Line From Top")

Logger( "Second Line")

Dim myINIFile : myINIFile = ClientInformation.ScriptPath & "\vs2008.ini"

[RicksNote there is no INI file in the installed files for VS 2008 script
only the vbs and xml files]

Dim myXMLFile : myXMLFile = ClientInformation.ScriptPath & "\vs2008.xml"

Logger( ClientInformation.ScriptPath & " ClientInformation.ScriptPath")

Logger( myINIFile & " myINIFile")

Logger( myXMLFile & " myXMLFile")  

Logger( ClientInformation.Overlap.ModuleName  & " OverlapWindow ModuleName")

Logger( ClientInformation.Overlap.Name & " Overlap Window Name")

Later in the code:

RtHere this line should have wired up the OnChildFocus Event Handler for the
Overlap window and was executed according to the Logger Printout.

ConnectEvent ClientInformation.Overlap, "OnChildFocus", "OnChildFocus"

Logger( "ConnectEvent ClientInformation.Overlap, OnChildFocus,
OnChildFocus")

RtHere This is the event that should, but doesnt, fire upon the OnChildFocus
event of the OverlapWindow with module name DEVENV notice the print
statement and no corresponding output in the logger output.

Sub OnChildFocus(windowObj)

Logger( "OnChildFocus fired")

 

    If Not windowObj Is Nothing Then

        If windowObj.IsValid Then

xxxxx

            On Error Resume Next

            On Error Goto 0

            If SO_InVBArray(supportedModules, windowObj.ModuleName) Then

.... rest removed for brevity

You will notice in the printed logger output the

Sub OnChildFocus(windowObj)

EventHandler is not getting executed.

RtHere Here is the output from the run notice no OnChildFocus fired:

Test Line From Top

Second Line

C:\Users\ricksdell\AppData\Roaming\GW Micro\Window-Eyes\users\default
ClientInformation.ScriptPath

C:\Users\ricksdell\AppData\Roaming\GW
Micro\Window-Eyes\users\default\vs2008.ini myINIFile

C:\Users\ricksdell\AppData\Roaming\GW
Micro\Window-Eyes\users\default\vs2008.xml myXMLFile

DEVENV OverlapWindow ModuleName

HwndWrapper[DefaultDomain;;bc6a Overlap Window Name

myMSAAEventSource.Process = ClientInformation.ApplicationProcess

DEVENV ModuleName

12.0.31101.0 built by: REL (12.0.31101.0) FileVersion

devenv.exe InternalName

devenv.exe OriginalFileName

MicrosoftR Visual StudioR 2013 ProductName

12.0.31101.0 ProductVersion

ConnectEvent OnStateChange

RtHere Here is the actual connect event that should have wired up the
OnChildFocus event to have fired so the event was wired up or at least that
statement was executed as produced by logger.

ConnectEvent ClientInformation.Overlap, OnChildFocus, OnChildFocus

<EndOfLoggerPrintsOutput>

Finally here is the output from WEEVent:

RtHere clicked enter to open Visual Studio

3554 Keyboard.OnKeyDown VirtualKeyCode = 13, keyModifiers  = 0

... a couple of closing windows:

3558 Speech.OnSpeak, "Visual Studio  twenty thirteen "

3562 Window.OnChildActivate, Handle = 280484, Module Name = DEVENV, Class
Name = HwndWrapper[DefaultDomain;;92c786c5-60d2-4d93-9780-9c347e84, Title =
Start Page - Microsoft Visual Studio

3563 Speech.OnSpeak, "Start Page  dash  Microsoft Visual Studio"

3564 Window.OnChildClose, Handle = 590758

3565 Window.OnChildClose, Handle = 590708

RtHere Here is the OnChildFocus event firing as listed in WEEvent, should
have fired the OnChildFocus Event Handler and printed a line in the Logger
Output but didnt:

3566 Window.OnChildFocus, Handle = 280484, Module Name = DEVENV, Class Name
= HwndWrapper[DefaultDomain;;92c786c5-60d2-4d93-9780-9c347e84, Title = Start
Page - Microsoft Visual Studio

3567 Speech.OnSpeak, "Start Page"

[Is this the Overlap Window?]

EndOfMyEMailMessage:

-------------- next part --------------
An HTML attachment was scrubbed...
URL: 
<http://lists.window-eyes.com/private.cgi/scripting-window-eyes.com/attachments/20150320/418e7d96/attachment.htm>
_______________________________________________
Any views or opinions presented in this email are solely those of the author 
and do not necessarily represent those of Ai Squared.

For membership options, visit 
http://lists.window-eyes.com/options.cgi/scripting-window-eyes.com/archive%40mail-archive.com.
For subscription options, visit 
http://lists.window-eyes.com/listinfo.cgi/scripting-window-eyes.com
List archives can be found at 
http://lists.window-eyes.com/private.cgi/scripting-window-eyes.com

Reply via email to