@OldCoot – The AHK script is beneath. Take cautious observe of the feedback. Numerous that is onerous coded to work with my setup, so it’s possible you’ll must make changes. Use at your personal threat.
; AlignTrays – Align Trays
; I’ve to run in administrator mode for this to work with Sketchup 2023
;
; That is arrange for 3 displays.
; My show decision is 2560×1440
; You’ll have to regulate defW/defH variables beneath in your display screen
; This script additionally assumes the middle show is the first monitor,
; with the left monitor having detrimental coordinates, the middle monitor beginning at 0, 0,
; and the fitting monitor beginning on the show width coordinate.
#NoEnv ; Beneficial for efficiency and compatibility with future AutoHotkey releases.
#Warn ; Allow warnings to help with detecting widespread errors.
#Singleinstance power
;SendMode Enter ; Beneficial for brand spanking new scripts as a result of its superior pace and reliability.
;SetWorkingDir %A_ScriptDir% ; Ensures a constant beginning listing.
;————–CRITICAL INFO——————-
;I’m working with the next personalized SketchUp trays:
;T1 (SU Tray 1)
;T2 (SU Tray 2)
;T3 (SU Tray 3)
;Mannequin Information (SU mannequin data)
;Profile Dialog (profile builder dialog)
;set AHK definitions
;Use Alt+F9 to align left, Alt+F10 to align middle, Alt+F11 to align proper
!F9::AlignTrays(1)
!F10::AlignTrays(2)
!F11::AlignTrays(3)
AlignTrays(mon)
{
; Get the system settings for out there monitor house
SysGet, m, Monitor, %mon%
defW := 447 ; default width of the trays, alter as wanted to your monitor decision
defT := 30 ; This may be set to zero, however I want an offset on the high as a result of I’ve WinStep loaded and it takes up some high house.
defH := 1100 ; default top of trays, alter to your monitor decision
if (mon = 1)
{
x1 := (mRight – defW)
}
else
{
x1 := (mLeft)
}
; set the the place of T1, every part else aligns with it.
; the +10 was added right here to resize the window to work round a SketchUp bug.
; the subsequent line could be eliminated as soon as SU fixes the bug
WinMove, T1, %x1%, %defT%, defW+10, 1100 ; take away when bug is fastened
WinMove, T1, %x1%, %defT%, defW, 1100
WinGetPos, x, y, w, h, T1
; some changes to get coordinates to align.
; the sketchup trays don’t report window sizing the identical as different home windows, so needed to alter
if (mon = 1)
{
x1 := x – defW – 1
}
else
{
x1 := x + defW + 1
}
y := defT + 1
; transfer and measurement tray 2 equal to tray 1
; the +10 was added right here to resize the window to work round a SketchUp bug.
; the subsequent line could be eliminated as soon as SU fixes the bug
WinMove, T2, x1, y, defW+10, h ; take away when bug is fastened
WinMove, T2, x1, y, defW, h
if (mon = 1)
{
x1 := x1 – (defW – 1)
}
else
{
x1 := x1 + (defW + 1)
}
; transfer and measurement tray 3 equal to 1 and a couple of
; the +10 was added right here to resize the window to work round a SketchUp bug.
; the subsequent line could be eliminated as soon as SU fixes the bug
WinMove, T3, x1, y, defW+10, h ; take away when bug is fastened
WinMove, T3, x1, y, defW, h
; transfer mannequin data to new coordinates
if (mon = 1)
{
WinGetPos, x, y, w, h, Mannequin Information
x1 := (x1 – w + 6)
}
else
{
WinGetPos, x, y, w, h, T3
x1 := (x1 + w – 6)
}
y := defT – 1
WinMove, Mannequin Information, x1, defT
WinGetPos, x, y, w, h, Mannequin Information
if WinExist(“Profile Dialog”)
{
; alter coordinates for profile builder
y := h + 24
h := defH – h + 12
; transfer profile builder dialog underneath mannequin data
WinMove, Profile Dialog, x, y, w, h
}
}
