#Persistent
EVENT_OBJECT_SHOW := 0x8002
Hook := new WinEventHook(EVENT_OBJECT_SHOW, EVENT_OBJECT_SHOW, "HookProc")

HookProc(hWinEventHook, event, hwnd, idObject)
{
   static OBJID_WINDOW := 0
   if (idObject != OBJID_WINDOW)
      Return
   
   WinGetTitle, Title, ahk_id %hwnd%
   WinGetClass, Class, ahk_id %hwnd%
   if (Class = "#32770" && Title = "Сохранить как")
      TrayTip, New Window Opened, Title:`t%Title%`nClass:`t%Class%
}

class WinEventHook
{
   __New(eventMin, eventMax, hookProc, idProcess := 0, idThread := 0, dwFlags := 0) {
      this.hHook := DllCall("SetWinEventHook", "UInt", eventMin, "UInt", eventMax
                                             , "Ptr", 0, "Ptr", RegisterCallback(hookProc, "F")
                                             , "UInt", idProcess, "UInt", idThread, "UInt", dwFlags, "Ptr")
   }
   __Delete() {
      DllCall("UnhookWinEvent", "Ptr", this.hHook)
   }
}

#Persistent
Gui +LastFound
hWnd := WinExist()

DllCall( "RegisterShellHookWindow", UInt,hWnd )
MsgNum := DllCall( "RegisterWindowMessage", Str,"SHELLHOOK" )
OnMessage( MsgNum, "ShellMessage" )
Return

ShellMessage( wParam,lParam ) {
  Local k
  If ( wParam = 1 ) ;  HSHELL_WINDOWCREATED := 1
     {
       NewID := lParam
       SetTimer, MsgBox, -1
     }
}

MsgBox:
 WinGetTitle, Title, ahk_id %NewID%
 WinGetClass, Class, ahk_id %NewID%
 TrayTip, New Window Opened, Title:`t%Title%`nClass:`t%Class%
Return