Retractable Window?

[Omga4000]

Hey

I've created a simple GUI with 1 window.

is there a way to make a retractable window that opens once you press button X?

For example:

This is the window I have (just for example, this is actually MSI Afterburner)

I want to be able to "pull" another window from the right once a button is pressed, like this:

How do I do that?

Thank you,

Omga4000

[BrewManNH]

Try doing it with UDF from Melba

[guinness]

Do you also want to theme your GUI?

[Omga4000]

Try doing it with UDF from Melba

 

Thank you, will do

Do you also want to theme your GUI?

Oh no sir, there is no need.

[guinness]

Thank you, will do

Oh no sir, there is no need.

No need for formalities, guinness is just fine. OK, that's good to hear.

[Omga4000]

I've tried using M23's script - but I keep receiving error after error..

What variables should I declare before running my script?

This is what I declared:

Global $aGUIExt_GUI_Data[1][2] = [[0, 0]]
Global $aGUIExt_Obj_Data[1][2] = [[0]]
Global $fGUIExt_SectionAction = False
Local $aActive_Section_Data[1][9] = [[0, 0, 1, 0, "", 9999]]

And now it says:

B:2) ProgramsAutoIt3IncludeGUIExtender.au3 (228) : ==> Array variable has incorrect number of subscripts or subscript dimension range exceeded.:

$aGUIExt_GUI_Data[$iGUI_Index][1] = $aActive_Section_Data

^ ERROR

I've searched M23's file yet I didn't find the place he declares iGUI_Index.

.

Edited May 17, 2013 by Omga4000

[Melba23]

Omga4000,

You do not have to declare any of those - the UDF does it for you. All you need to do is to place GUIExtender.au3 in the same folder as the examples and then run them.

M23

[Omga4000]

Thank you for commenting M23

I've placed GUIExtender.au3 inside "AutoIt3Include" and included your file in the following way: #include <GUIExtender.au3>

Do I also need to add the other files to this folder? (the example files)

Also - for creating a scenario where I want the program to extend the window do I use this?

$iCalc_Section = _GUIExtender_Section_Start($hGUI, 80, 110)
   //All of the GUI content here
_GUIExtender_Section_End($hGUI)

Thanks again

[Melba23]

Omga4000,

I suggest you read the Adding UDFs to AutoIt and SciTE tutorial in the Wiki - putting UDFs in the main Include folder is not recommended.  But as you have done this, you should be able to run the examples from any folder.

I cannot comment on the snippet you posted - I need to see the whole script.  Perhaps you could post it - see here how to do it.  And please add comments so that I know which part is supposed to be retractable/extendable and what control should action it.

M23

Edited May 17, 2013 by Melba23
Fixed link

[Omga4000]

Hey M23,

Sorry - read the entire post and did as mentioned. It now stores the UDF in an external location.

I know how to post AutoIt links of course - used it in this topic a few times

I've wrote comments in the GUI region so you'd know what I need to be extended (although it is pretty obvious).

expandcollapse popup

#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <ProgressConstants.au3>
#include <SendMessage.au3>
#include <GUIExtender.au3>

#Region ### START Koda GUI section ### Form=b:\2) programs\autoit3\koda 1.7.3.0\forms\diablo iii auto-gem v1.kxf
$Form1 = GUICreate("Form1", 330, 380, 779, 310)
$Num_of_Radiants_Label = GUICtrlCreateLabel("Num. of Radiants(1-24):", 16, 8, 116, 17)
$Num_of_Radiants_Input = GUICtrlCreateInput("", 16, 32, 105, 21)
$Label1 = GUICtrlCreateLabel("Start From:", 168, 8, 55, 17)
$Start_From_Combo = GUICtrlCreateCombo("", 168, 32, 145, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUICtrlSetData(-1, "Perfect Square|Radiant Square|Star|Flawless Star|Perfect Star|Radiant Star", "Perfect Square")

;;;;
;;Would like this to be extended - Starting here;;
$Flaw_SQR_Label = GUICtrlCreateLabel("Flawless Square Needed:", 48, 112, 125, 17)
$Flaw_SQR_Input = GUICtrlCreateInput("", 176, 108, 105, 21)
$Perf_SQR_Label = GUICtrlCreateLabel("Perfect Square Needed:", 48, 145, 119, 17)
$Perf_SQR_Input = GUICtrlCreateInput("", 176, 141, 105, 21)
$Rada_SQR_Label = GUICtrlCreateLabel("Radiant Sqaure Needed:", 48, 178, 122, 17)
$Rada_SQR_Input = GUICtrlCreateInput("", 176, 174, 105, 21)
$Star_Label = GUICtrlCreateLabel("Star Needed:", 48, 211, 67, 17)
$Star_Input = GUICtrlCreateInput("", 176, 207, 105, 21)
$Flaw_Star_Label = GUICtrlCreateLabel("Flawless Star Needed:", 48, 244, 110, 17)
$Flaw_Star_Input = GUICtrlCreateInput("", 176, 240, 105, 21)
$Perf_Star_Label = GUICtrlCreateLabel("Perfect Star Needed:", 48, 277, 104, 17)
$Perf_Star_Input = GUICtrlCreateInput("", 176, 273, 105, 21)
$Tome_Label = GUICtrlCreateLabel("Tome of Secrets Needed:", 48, 310, 126, 17)
$Tome_Input = GUICtrlCreateInput("", 176, 306, 105, 21)
;;Ending Here;;
;;;;

$OK_Button = GUICtrlCreateButton("Go!", 127, 344, 75, 25)
$Calc_Label = GUICtrlCreateLabel("Calculations:", 29, 80, 64, 17)

;;;;
;;This is the button that should activate the extension process;;
$Calc_Button = GUICtrlCreateButton("-->", 96, 77, 27, 20)
;;Ending here;;
;;;;

GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###




While 1
    $Flaw_to_Rada = 729
   $Perf_to_Rada = 243
   $Rad_to_Rada = 81
   $Star_to_Rada = 27
   $Flaw_Star_to_Rada = 9
   $Perf_Start_to_Rada = 3

   $Tome_Flaw_to_Rada = 1631
   $Tome_Perf_to_Rada = 902
   $Tome_Rad_to_Rada = 416
   $Tome_Star_to_Rada = 173
   $Tome_Flaw_Star_to_Rada = 65
   $Tome_Perf_Start_to_Rada = 20
   $nMsg = GUIGetMsg()

   Switch $nMsg
   Case $GUI_EVENT_CLOSE
      Exit

   Case  $Start_From_Combo OR $Num_of_Radiants_Input

      $Start_From = GUICtrlRead($Start_From_Combo)
      $Num_Rada = GUICtrlRead($Num_of_Radiants_Input)

      If $Start_From = "Perfect Square" Then
         GUICtrlSetData($Flaw_SQR_Input, 729*$Num_Rada)
         GUICtrlSetData($Perf_SQR_Input, 243*$Num_Rada)
         GUICtrlSetData($Rada_SQR_Input, 81*$Num_Rada)
         GUICtrlSetData($Star_Input, 27*$Num_Rada)
         GUICtrlSetData($Flaw_Star_Input, 9*$Num_Rada)
         GUICtrlSetData($Perf_Star_Input, 3*$Num_Rada)
         GUICtrlSetData($Tome_Input, 1631*$Num_Rada)
      EndIf

      If $Start_From = "Radiant Square" Then
         GUICtrlSetData($Flaw_SQR_Input, 0)
         GUICtrlSetData($Perf_SQR_Input, 243*$Num_Rada)
         GUICtrlSetData($Rada_SQR_Input, 81*$Num_Rada)
         GUICtrlSetData($Star_Input, 27*$Num_Rada)
         GUICtrlSetData($Flaw_Star_Input, 9*$Num_Rada)
         GUICtrlSetData($Perf_Star_Input, 3*$Num_Rada)
         GUICtrlSetData($Tome_Input, 902*$Num_Rada)
      EndIf

      If $Start_From = "Star" Then
         GUICtrlSetData($Flaw_SQR_Input, 0)
         GUICtrlSetData($Perf_SQR_Input, 0)
         GUICtrlSetData($Rada_SQR_Input, 81*$Num_Rada)
         GUICtrlSetData($Star_Input, 27*$Num_Rada)
         GUICtrlSetData($Flaw_Star_Input, 9*$Num_Rada)
         GUICtrlSetData($Perf_Star_Input, 3*$Num_Rada)
         GUICtrlSetData($Tome_Input, 416*$Num_Rada)
      EndIf

      If $Start_From = "Flawless Star" Then
         GUICtrlSetData($Flaw_SQR_Input, 0)
         GUICtrlSetData($Perf_SQR_Input, 0)
         GUICtrlSetData($Rada_SQR_Input, 0)
         GUICtrlSetData($Star_Input, 27*$Num_Rada)
         GUICtrlSetData($Flaw_Star_Input, 9*$Num_Rada)
         GUICtrlSetData($Perf_Star_Input, 3*$Num_Rada)
         GUICtrlSetData($Tome_Input, 173*$Num_Rada)
      EndIf

      If $Start_From = "Perfect Star" Then
         GUICtrlSetData($Flaw_SQR_Input, 0)
         GUICtrlSetData($Perf_SQR_Input, 0)
         GUICtrlSetData($Rada_SQR_Input, 0)
         GUICtrlSetData($Star_Input, 0)
         GUICtrlSetData($Flaw_Star_Input, 9*$Num_Rada)
         GUICtrlSetData($Perf_Star_Input, 3*$Num_Rada)
         GUICtrlSetData($Tome_Input, 65*$Num_Rada)
      EndIf

      If $Start_From = "Radiant Star" Then
         GUICtrlSetData($Flaw_SQR_Input, 0)
         GUICtrlSetData($Perf_SQR_Input, 0)
         GUICtrlSetData($Rada_SQR_Input, 0)
         GUICtrlSetData($Star_Input, 0)
         GUICtrlSetData($Flaw_Star_Input, 0)
         GUICtrlSetData($Perf_Star_Input, 3*$Num_Rada)
         GUICtrlSetData($Tome_Input, 20*$Num_Rada)
      EndIf

   Case $OK_Button


    EndSwitch
WEnd

Thank you for being so patient with me!

Regards,

Omga4000.

Edited May 17, 2013 by Omga4000

[Melba23]

Omga4000,

Apologies for the "how to post code" bit - I have used it so much since the forum was updated that I added it by default.

Here is a small script that shows how to implement the UDF with the GUI you have:

expandcollapse popup

#include <GUIConstantsEx.au3>

#include <GUIExtender.au3>

$Form1 = GUICreate("Form1", 330, 380)

; Initialise GUI
_GUIExtender_Init($Form1)

; Create first static section
$iSection = _GUIExtender_Section_Start($Form1, 0, 100) ; Starts at 0 and is 100 deep
; Create action button for next section
_GUIExtender_Section_Action($Form1, $iSection + 1, "-->", "<--", 96, 77, 27, 20)
; Close this section
_GUIExtender_Section_End($Form1)

; Start the next retractable section
_GUIExtender_Section_Start($Form1, 100, 220) ; Starts at 100 (sum of coords of previous section) and is 220 deep)
; Create alabel to show the area
GUICtrlCreateLabel("", 0, 100, 330, 220)
GUICtrlSetBkColor(-1, 0xCCFFCC)
GUICtrlSetState(-1, $GUI_DISABLE)
; Close the section
_GUIExtender_Section_End($Form1)

; Create and close the final static section
_GUIExtender_Section_Start($Form1, 320, 60) ; Note the same formula for the coords
_GUIExtender_Section_End($Form1)

GUISetState(@SW_SHOW)

While 1

    $nMsg = GUIGetMsg()

    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
    EndSwitch

    ; This actions the button
    _GUIExtender_Action($Form1, $nMsg)

WEnd

However, as the text of your script makes it abundantly clear that the GUI is intended for use as within Diablo III, that is as far as my help goes.  And you only got that much because adding the UDF to the script is purely cosmetic and has no effect on its running.  Please read the Forum rules (the link is also at bottom right of each page) - particularly the bit about not discussing game interaction - before you post again.  Thread locked.

M23