Code: Select all
loop 50
gui, add, edit, w200
gui, +vscroll
gui, show
Code: Select all
loop 50
gui, add, edit, w200
gui, +vscroll
gui, show
Code: Select all
SysGet,SM_CXVSCROLL,2
Gui,Margin,% SM_CXVSCROLL
Code: Select all
loop 50
gui, add, edit, w200
gui, +vscroll
gui, show, Hide
Gui,+LastFound
GetWindowRect(Winexist(),(rc:=Struct("l,t,r,b"))[])
Gui, Show,% "w" rc.r-rc.l+5
Return
GuiClose:
ExitApp
Code: Select all
loop 10
gui, add, edit, w200
gui, +vscroll
gui, show, Hide
Gui,+LastFound
; define structures for GetWindowRect and GetScrollBarInfo
RECT:="left,top,right,bottom",SCROLLBARINFO:="DWORD cbSize;RECT rcScrollBar;int dxyLineButton;int xyThumbTop;int xyThumbBottom;int reserved;DWORD rgstate[6]"
; Create a SCROLLBARINFO structure and set its size
si:=Struct(SCROLLBARINFO,{cbSize:sizeof(SCROLLBARINFO)})
; Get information about scrollbar to check if it exist
GetScrollBarInfo(WinExist(),-5, si[])
; Check if Scrollbar is visible (0x8000 = STATE_SYSTEM_INVISIBLE)
if (si.rgstate[1] & 0x8000)
Gui, Show ; if not visible just show Gui
else { ; if Scrollbar is visible, get size of Gui and increase it by 5 pixels to fit in Scrollbar
rc:=Struct(RECT)
GetWindowRect(Winexist(),rc[])
Gui, Show,% "w" rc.right-rc.left+5
}
Return
GuiClose:
ExitApp
Code: Select all
loop 100
gui, add, edit, w200
gui, +vscroll
ResizeFitVScroll()
Gui,Show
Return
GuiClose:
ExitApp
ResizeFitVScroll(Gui:=1){
gui, %Gui%:show, Hide
Gui,%Gui%:+LastFound
; define structures for GetWindowRect and GetScrollBarInfo
RECT:="left,top,right,bottom",SCROLLBARINFO:="DWORD cbSize;RECT rcScrollBar;int dxyLineButton;int xyThumbTop;int xyThumbBottom;int reserved;DWORD rgstate[6]"
; Create a SCROLLBARINFO structure and set its size
si:=Struct(SCROLLBARINFO,{cbSize:sizeof(SCROLLBARINFO)})
; Get information about scrollbar to check if it exist
GetScrollBarInfo(WinExist(),-5, si[])
; Check if Scrollbar is visible (0x8000 = STATE_SYSTEM_INVISIBLE)
if (si.rgstate[1] & 0x8000)
Gui, Show ; if not visible just show Gui
else { ; if Scrollbar is visible, get size of Gui and increase it by 5 pixels to fit in Scrollbar
rc:=Struct(RECT)
GetWindowRect(Winexist(),rc[])
Gui, Show,% "w" rc.right-rc.left+5
}
}
Code: Select all
loop 50
gui, add, edit, w200
gui, show, Hide, MyWIndow
DetectHiddenWindows, On
WinGetPos,,,, H, MyWIndow
if (H>=A_ScreenHeight-40)
Gui, +vScroll
Gui,Show
Return
GuiClose:
ExitApp
Users browsing this forum: No registered users and 32 guests