ДубльГИС

[Sok-San]

Я выложу исходник нужно поменять размеры окна и настроить заново клики мышки начальное положение окна у меня х=43 у=25 дополнительная подвижка окна нужна чтобы заставить закрыться ненужные панели.

#include <GUIConstants.au3> 

Opt( "WinSearchChildren", 1) 
Opt( "WinTitleMatchMode", 2)  
Opt( "WinDetectHiddenText", 1)

If ProcessExists("grym.exe") Then Exit
Run("C:\Program Files\2gis\3.0\grym.exe") 
Sleep(500) 
WinActivate("Городская информационная система", "")
WinWait("Городская информационная система", "Загрузка завершена")
Sleep(500)
ControlFocus("Городская информационная система", "", "")
ControlClick("Городская информационная система", "", "[CLASS:Button; INSTANCE:1]") ;нажимаем "далее"
WinWaitActive(" - ДубльГИС", "") 
Sleep(500)
MouseMove(340, 70, 0); включаем навигацию
MouseClick("left")
MouseMove(110, 90, 5)
MouseClick("left")
;~ 
WinMove(" - ДубльГИС", "", 43, 25, 721, 549) ;устанавливаем размер окна несколько меньше
ControlHide(" - ДубльГИС", "", "[CLASS:XTPDockBar; INSTANCE:1]"); удаляем все ненужные 
ControlHide(" - ДубльГИС", "", "[CLASS:Grym_ToolbarBanner; INSTANCE:1]"); компоненты окна
ControlHide(" - ДубльГИС", "", "[CLASS:Grym_MainBanner; INSTANCE:1]")
ControlHide(" - ДубльГИС", "", "[CLASS:ATL:009BA898; INSTANCE:1]")
ControlHide(" - ДубльГИС", "", "[CLASS:Grym_DirectoryCollection; INSTANCE:1]")
WinMove(" - ДубльГИС", "", 43, 25, 761, 579) ;;устанавливаем размер окна 
Sleep(1500) 
ControlMove(" - ДубльГИС", "", "[CLASS:Grym_MapView; INSTANCE:1]", -3, -2, 761, 579) ;убираем рамку
ControlHide(" - ДубльГИС", "", "[CLASS:Grym_ToolbarBanner; INSTANCE:1]") ; убираем банер
;закрываем на карте логотипы и т.п.
MouseMove(400, 300, 0)
MouseClick("right")
MouseMove(500, 384, 0)
MouseClick("left")
MouseMove(400, 300, 0)
MouseClick("right")
MouseMove(500, 404, 0)
MouseClick("left")
MouseMove(400, 300, 0)
MouseClick("right")
MouseMove(500, 424, 0)
MouseClick("left")

Exit