John117 Posted December 10, 2007 Posted December 10, 2007 (edited) I have the followig code I have build. I have included a generic picture for testing. I would like for the labels to not move. They are bunching up and messing things up. I am just looking to hide the lower portion of the GUI, not really to move stuff. Any Help? expandcollapse popup#include <GUIConstants.au3> Opt("GUIOnEventMode", 1) HotKeySet("{ESC}", "_Custom_Exit") Opt("GuiResizeMode", $GUI_DOCKALL) ; $GUI_DOCKALL = 802 Global $ParentWin_Width = 450, $ParentWin_Expand = 700, $ParentWin_Collapse = 100, $Top = 25, $Expanded = True Global $ParentWin = GUICreate("Example", $ParentWin_Width, $ParentWin_Expand, Default, $Top, $WS_POPUPWINDOW) GUICtrlCreatePic(@Systemdir & "\oobe\images\wpakey.jpg",0,0, 450,677) GuiCtrlSetState(-1,$GUI_DISABLE) $file_menu = GUICtrlCreateMenu("Start") Global $Expand_Button = GUICtrlCreateButton("Expand", 350, 0, 100, 24) GUICtrlSetOnEvent(-1, "_Expand") $Example_Label_1 = GUICtrlCreateLabel("Example1:", 10, 131, 50, 20) $Example_Label_2 = GUICtrlCreateLabel("Example2:", 10, 352, 50, 20) GUISetState(@SW_SHOW, $ParentWin) While 1 Sleep(1000) Global $size = WinGetPos($ParentWin) Global $pos = MouseGetPos() ;MouseLeft > GuiLeft MouseRight < GuiRight MouseTop > GuiTop MouseBottom < GuiBottom If $pos[0] > $size[0] And $pos[0] < ($size[0] + $size[2]) And $pos[1] > $size[1] And $pos[1] < $size[3] Then ;Do Nothing Else If $Expanded Then _Colapse() EndIf WEnd Func _Colapse() $Expanded = False WinMove($ParentWin, "", $size[0], $size[1], $size[2], $ParentWin_Collapse) Global $Expanded = False EndFunc ;==>_Colapse Func _Expand() WinMove($ParentWin, "", $size[0], $size[1], $size[2], $ParentWin_Expand) Global $Expanded = True EndFunc ;==>_Expand Func _Custom_Exit() Exit EndFunc ;==>_Custom_Exit Edited December 10, 2007 by Hatcheda
PsaltyDS Posted December 10, 2007 Posted December 10, 2007 Add this to the top: Opt("GuiResizeMode", $GUI_DOCKALL) ; $GUI_DOCKALL = 802 Alternatively, you could leave the default alone and just set the mode on particular controls with GUICtrlSetResizing($CtrlID, $GUI_DOCKALL). Valuater's AutoIt 1-2-3, Class... Is now in Session!For those who want somebody to write the script for them: RentACoder"Any technology distinguishable from magic is insufficiently advanced." -- Geek's corollary to Clarke's law
John117 Posted December 10, 2007 Author Posted December 10, 2007 GUICtrlSetResizing -Good function to read up on!
erebus Posted December 10, 2007 Posted December 10, 2007 "Ridiculous" is not such a cosmetic word for somebody who have helped you. Open up your dictionary before your help file.
PsaltyDS Posted December 10, 2007 Posted December 10, 2007 "Ridiculous" is not such a cosmetic word for somebody who have helped you. Open up your dictionary before your help file."...not such a cosmetic word..." Talk about needing to break out the thesaurus... Valuater's AutoIt 1-2-3, Class... Is now in Session!For those who want somebody to write the script for them: RentACoder"Any technology distinguishable from magic is insufficiently advanced." -- Geek's corollary to Clarke's law
John117 Posted December 11, 2007 Author Posted December 11, 2007 @erebus -If you only knew how many times P has helped me with challenging stuff you would know that his *skilz* are "Ridiculous" as stated *implied
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now