fikri1979 Posted November 17, 2013 Share Posted November 17, 2013 Hello all,... how to create Gui like this picture below, when i click checkbox "Show Setting" then appears "Setting Account" then appears Help me please, how to do that? Link to comment Share on other sites More sharing options...
Starstar Posted November 17, 2013 Share Posted November 17, 2013 (edited) Do you want some thing like this? #cs ---------------------------------------------------------------------------- AutoIt Version: 3.3.9.22 (Beta) Author: AdnanBaloch(Starstar) Script Function: Open a Gui from Gui. #ce ---------------------------------------------------------------------------- #include <GUIConstantsEx.au3> Global $hGui $hGui = GUICreate ( 'First Gui', 430, 350 ) ; Gui Title and it width and height GUISetBkColor ( 0xFFFFFF, $hGui ) ;Gui Backgroung colour $iChkBox = GUICtrlCreateCheckbox ('Show Setting', 120, 290, 80, 20 ) GUISetState (@SW_SHOW) While 1 $iMsg = GUIGetMsg ( ) Switch $iMsg Case $GUI_EVENT_CLOSE ExitLoop Case $iChkBox GUICreate("Setting",240,200) GUISetState (@SW_SHOW) EndSwitch WEnd or you want to click on showed CheckBox(to check it)? Tell me. Edited November 17, 2013 by Starstar fikri1979 1 Life is like a coin. You can spend it Anyway as you wish and for your kind information. "you can spend it only once." Link to comment Share on other sites More sharing options...
Danyfirex Posted November 17, 2013 Share Posted November 17, 2013 (edited) sure It can do it. #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> Opt("GUIResizeMode", $GUI_DOCKALL) Example() Func Example() Local $msg Local $widht=200,$height=200 GUICreate("My GUI",$widht,$height) GUISetState(@SW_SHOW) $check=GUICtrlCreateCheckbox("Show Options",10,100,100,100) While 1 $msg = GUIGetMsg() If $msg = $GUI_EVENT_CLOSE Then ExitLoop if $msg= $check Then if GUICtrlRead($check)=1 then winmove("","",Default,Default,Default,$height*2) GUICtrlSetData($check,"Hide Options") Else winmove("","",Default,Default,Default,$height) GUICtrlSetData($check,"Show Options") EndIf Endif WEnd GUIDelete() EndFunc saludos Edited November 17, 2013 by Danyfirex fikri1979 1 Danysys.com AutoIt... UDFs: VirusTotal API 2.0 UDF - libZPlay UDF - Apps: Guitar Tab Tester - VirusTotal Hash Checker Examples: Text-to-Speech ISpVoice Interface - Get installed applications - Enable/Disable Network connection PrintHookProc - WINTRUST - Mute Microphone Level - Get Connected NetWorks - Create NetWork Connection ShortCut Link to comment Share on other sites More sharing options...
Starstar Posted November 17, 2013 Share Posted November 17, 2013 (edited) another good idea wow..........Great job Danyfirex...... Edited November 17, 2013 by Starstar Danyfirex 1 Life is like a coin. You can spend it Anyway as you wish and for your kind information. "you can spend it only once." Link to comment Share on other sites More sharing options...
Guest Posted November 17, 2013 Share Posted November 17, 2013 '?do=embed' frameborder='0' data-embedContent>> Link to comment Share on other sites More sharing options...
Moderators Melba23 Posted November 17, 2013 Moderators Share Posted November 17, 2013 fikri1979,GUIExtender is just what you want. M23 Rogue5099 and fikri1979 2 Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind Open spoiler to see my UDFs: Spoiler ArrayMultiColSort ---- Sort arrays on multiple columnsChooseFileFolder ---- Single and multiple selections from specified path treeview listingDate_Time_Convert -- Easily convert date/time formats, including the language usedExtMsgBox --------- A highly customisable replacement for MsgBoxGUIExtender -------- Extend and retract multiple sections within a GUIGUIFrame ---------- Subdivide GUIs into many adjustable framesGUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView itemsGUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeViewMarquee ----------- Scrolling tickertape GUIsNoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxesNotify ------------- Small notifications on the edge of the displayScrollbars ----------Automatically sized scrollbars with a single commandStringSize ---------- Automatically size controls to fit textToast -------------- Small GUIs which pop out of the notification area Link to comment Share on other sites More sharing options...
fikri1979 Posted November 17, 2013 Author Share Posted November 17, 2013 thank you so much for all Starstar 1 Link to comment Share on other sites More sharing options...
fikri1979 Posted November 19, 2013 Author Share Posted November 19, 2013 sure It can do it. #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> Opt("GUIResizeMode", $GUI_DOCKALL) Example() Func Example() Local $msg Local $widht=200,$height=200 GUICreate("My GUI",$widht,$height) GUISetState(@SW_SHOW) $check=GUICtrlCreateCheckbox("Show Options",10,100,100,100) While 1 $msg = GUIGetMsg() If $msg = $GUI_EVENT_CLOSE Then ExitLoop if $msg= $check Then if GUICtrlRead($check)=1 then winmove("","",Default,Default,Default,$height*2) GUICtrlSetData($check,"Hide Options") Else winmove("","",Default,Default,Default,$height) GUICtrlSetData($check,"Show Options") EndIf Endif WEnd GUIDelete() EndFunc saludos i'had tried with your scrip but appeart like this picture below, how to fix it? become this my script expandcollapse popup#include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #Region ### START Koda GUI section ### Form=d:\latihan autoit\konsep tool baru.kxf $Formoninotool = GUICreate("0nin0 ", 343, 215, 420, 339) $MenuItemtutor = GUICtrlCreateMenu("&TUTOR") $MenuItemtools = GUICtrlCreateMenu("T&OOLS") $MenuItemxl = GUICtrlCreateMenu("&XL") GUISetBkColor(0xC0DCC0) $btnstart = GUICtrlCreateButton("START", 16, 24, 65, 25) $btnstop = GUICtrlCreateButton("STOP", 96, 24, 65, 25) $Inputportproxy = GUICtrlCreateInput("Port injek", 184, 24, 65, 21) $Checkboxproxy = GUICtrlCreateCheckbox("use proxy", 264, 24, 73, 17) $Status = GUICtrlCreateGroup("Status", 8, 112, 321, 49) $Copyright = GUICtrlCreateLabel("Copyright@0nin0 Faundation 2013", 32, 136, 168, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) $Checkboxdataakun = GUICtrlCreateCheckbox("Data Akun", 8, 168, 97, 17) $GroupMode = GUICtrlCreateGroup("Mode", 8, 56, 321, 49) $Radio1ssh = GUICtrlCreateRadio("2 SSH", 16, 80, 57, 17) $Radio2ssh = GUICtrlCreateRadio("3 SSH", 80, 80, 57, 17) $Radio4ssg = GUICtrlCreateRadio("4 SSH", 144, 80, 57, 17) $Radio5ssh = GUICtrlCreateRadio("5 SSH", 208, 80, 57, 17) $Radio6ssh = GUICtrlCreateRadio("6 SSH", 272, 80, 49, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Checkboxdataakun checkboxdataakun() EndSwitch WEnd Func checkboxdataakun() if $Checkboxdataakun = 1 Then winmove("","",Default,Default,Default,215) GUICtrlSetData($Checkboxdataakun,"Hide Options") Else winmove("","",Default,Default,Default,600) GUICtrlSetData($Checkboxdataakun,"Data Akun") EndIf EndFunc Link to comment Share on other sites More sharing options...
Starstar Posted November 19, 2013 Share Posted November 19, 2013 hi fikri1979 what do you want from this code? Life is like a coin. You can spend it Anyway as you wish and for your kind information. "you can spend it only once." Link to comment Share on other sites More sharing options...
fikri1979 Posted November 19, 2013 Author Share Posted November 19, 2013 (edited) hi fikri1979 what do you want from this code? I just want like this : when i click check box "data akun" then appears i'm beginner how create script? Edited November 19, 2013 by fikri1979 Link to comment Share on other sites More sharing options...
Solution Starstar Posted November 19, 2013 Solution Share Posted November 19, 2013 (edited) Check this one... expandcollapse popup#include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> Opt("GUIResizeMode", $GUI_DOCKALL) EX() Func EX() Local $msg $Formoninotool = GUICreate("0nin0 ", 343, 215, 420, 100) $MenuItemtutor = GUICtrlCreateMenu("&TUTOR") $MenuItemtools = GUICtrlCreateMenu("T&OOLS") $MenuItemxl = GUICtrlCreateMenu("&XL") GUISetBkColor(0xC0DCC0) $btnstart = GUICtrlCreateButton("START", 16, 24, 65, 25) $btnstop = GUICtrlCreateButton("STOP", 96, 24, 65, 25) $Inputportproxy = GUICtrlCreateInput("Port injek", 184, 24, 65, 21) $Checkboxproxy = GUICtrlCreateCheckbox("use proxy", 264, 24, 73, 17) $Status = GUICtrlCreateGroup("Status", 8, 112, 321, 49) $Copyright = GUICtrlCreateLabel("Copyright@0nin0 Faundation 2013", 32, 136, 168, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) $Checkboxdataakun = GUICtrlCreateCheckbox("Data Akun", 8, 168, 97, 17) $GroupMode = GUICtrlCreateGroup("Mode", 8, 56, 321, 49) $Radio1ssh = GUICtrlCreateRadio("2 SSH", 16, 80, 57, 17) $Radio2ssh = GUICtrlCreateRadio("3 SSH", 80, 80, 57, 17) $Radio4ssg = GUICtrlCreateRadio("4 SSH", 144, 80, 57, 17) $Radio5ssh = GUICtrlCreateRadio("5 SSH", 208, 80, 57, 17) $Radio6ssh = GUICtrlCreateRadio("6 SSH", 272, 80, 49, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) GUISetState(@SW_SHOW) While 1 $msg = GUIGetMsg() If $msg = $GUI_EVENT_CLOSE Then ExitLoop If $msg=$Checkboxdataakun Then If GUICtrlRead($Checkboxdataakun)=1 Then winmove("","",Default,Default,Default,600) GUICtrlSetData($Checkboxdataakun,"Hide Akun") $ExInput = GUICtrlCreateLabel("AdnanBaloch[Starstar]", 32, 200, 168, 17) $ExInput = GUICtrlCreateLabel("AdnanBaloch[Starstar]", 32, 250, 168, 17) $ExInput = GUICtrlCreateLabel("AdnanBaloch[Starstar]", 32, 300, 168, 17) $ExInput = GUICtrlCreateLabel("AdnanBaloch[Starstar]", 32, 350, 168, 17) $ExInput = GUICtrlCreateLabel("AdnanBaloch[Starstar]", 32, 400, 168, 17) $ExInput = GUICtrlCreateLabel("AdnanBaloch[Starstar]", 32, 450, 168, 17) $ExInput = GUICtrlCreateLabel("AdnanBaloch[Starstar]", 32, 500, 168, 17) Else winmove("","",Default,Default,Default,240) GUICtrlSetData($Checkboxdataakun,"Show Akun") EndIf Endif WEnd GUIDelete() EndFunc Edited November 19, 2013 by Starstar fikri1979 1 Life is like a coin. You can spend it Anyway as you wish and for your kind information. "you can spend it only once." Link to comment Share on other sites More sharing options...
fikri1979 Posted November 19, 2013 Author Share Posted November 19, 2013 Check this one... expandcollapse popup#include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> Opt("GUIResizeMode", $GUI_DOCKALL) EX() Func EX() Local $msg $Formoninotool = GUICreate("0nin0 ", 343, 215, 420, 100) $MenuItemtutor = GUICtrlCreateMenu("&TUTOR") $MenuItemtools = GUICtrlCreateMenu("T&OOLS") $MenuItemxl = GUICtrlCreateMenu("&XL") GUISetBkColor(0xC0DCC0) $btnstart = GUICtrlCreateButton("START", 16, 24, 65, 25) $btnstop = GUICtrlCreateButton("STOP", 96, 24, 65, 25) $Inputportproxy = GUICtrlCreateInput("Port injek", 184, 24, 65, 21) $Checkboxproxy = GUICtrlCreateCheckbox("use proxy", 264, 24, 73, 17) $Status = GUICtrlCreateGroup("Status", 8, 112, 321, 49) $Copyright = GUICtrlCreateLabel("Copyright@0nin0 Faundation 2013", 32, 136, 168, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) $Checkboxdataakun = GUICtrlCreateCheckbox("Data Akun", 8, 168, 97, 17) $GroupMode = GUICtrlCreateGroup("Mode", 8, 56, 321, 49) $Radio1ssh = GUICtrlCreateRadio("2 SSH", 16, 80, 57, 17) $Radio2ssh = GUICtrlCreateRadio("3 SSH", 80, 80, 57, 17) $Radio4ssg = GUICtrlCreateRadio("4 SSH", 144, 80, 57, 17) $Radio5ssh = GUICtrlCreateRadio("5 SSH", 208, 80, 57, 17) $Radio6ssh = GUICtrlCreateRadio("6 SSH", 272, 80, 49, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) GUISetState(@SW_SHOW) While 1 $msg = GUIGetMsg() If $msg = $GUI_EVENT_CLOSE Then ExitLoop If $msg=$Checkboxdataakun Then If GUICtrlRead($Checkboxdataakun)=1 Then winmove("","",Default,Default,Default,600) GUICtrlSetData($Checkboxdataakun,"Hide Akun") $ExInput = GUICtrlCreateLabel("AdnanBaloch[Starstar]", 32, 200, 168, 17) $ExInput = GUICtrlCreateLabel("AdnanBaloch[Starstar]", 32, 250, 168, 17) $ExInput = GUICtrlCreateLabel("AdnanBaloch[Starstar]", 32, 300, 168, 17) $ExInput = GUICtrlCreateLabel("AdnanBaloch[Starstar]", 32, 350, 168, 17) $ExInput = GUICtrlCreateLabel("AdnanBaloch[Starstar]", 32, 400, 168, 17) $ExInput = GUICtrlCreateLabel("AdnanBaloch[Starstar]", 32, 450, 168, 17) $ExInput = GUICtrlCreateLabel("AdnanBaloch[Starstar]", 32, 500, 168, 17) Else winmove("","",Default,Default,Default,240) GUICtrlSetData($Checkboxdataakun,"Show Akun") EndIf Endif WEnd GUIDelete() EndFunc Thanks very much...... Link to comment Share on other sites More sharing options...
Starstar Posted November 19, 2013 Share Posted November 19, 2013 (edited) Lets check anotherone For you.........According your givan images. expandcollapse popup#include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> Opt("GUIResizeMode", $GUI_DOCKALL) EX() Func EX() Local $msg $Formoninotool = GUICreate("0nin0 ", 343, 215, 420, 100) $MenuItemtutor = GUICtrlCreateMenu("&TUTOR") $MenuItemtools = GUICtrlCreateMenu("T&OOLS") $MenuItemxl = GUICtrlCreateMenu("&XL") GUISetBkColor(0xC0DCC0) $btnstart = GUICtrlCreateButton("START", 16, 24, 65, 25) $btnstop = GUICtrlCreateButton("STOP", 96, 24, 65, 25) $Inputportproxy = GUICtrlCreateInput("Port injek", 184, 24, 65, 21) $Checkboxproxy = GUICtrlCreateCheckbox("use proxy", 264, 24, 73, 17) $Status = GUICtrlCreateGroup("Status", 8, 112, 321, 49) $Copyright = GUICtrlCreateLabel("Copyright@0nin0 Faundation 2013", 32, 136, 168, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) $Checkboxdataakun = GUICtrlCreateCheckbox("Data Akun", 8, 168, 97, 17) $GroupMode = GUICtrlCreateGroup("Mode", 8, 56, 321, 49) $Radio1ssh = GUICtrlCreateRadio("2 SSH", 16, 80, 57, 17) $Radio2ssh = GUICtrlCreateRadio("3 SSH", 80, 80, 57, 17) $Radio4ssg = GUICtrlCreateRadio("4 SSH", 144, 80, 57, 17) $Radio5ssh = GUICtrlCreateRadio("5 SSH", 208, 80, 57, 17) $Radio6ssh = GUICtrlCreateRadio("6 SSH", 272, 80, 49, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) GUISetState(@SW_SHOW) While 1 $msg = GUIGetMsg() If $msg = $GUI_EVENT_CLOSE Then ExitLoop If $msg=$Checkboxdataakun Then If GUICtrlRead($Checkboxdataakun)=1 Then winmove("","",Default,Default,Default,600) GUICtrlSetData($Checkboxdataakun,"Hide Akun") $ExLaInput1 = GUICtrlCreateLabel("Host:", 32, 200, 30, 17) $ExLAInput2 = GUICtrlCreateLabel("Port: ", 32, 250, 30, 17) $ExLaInput3 = GUICtrlCreateLabel("User: ", 32, 300, 30, 17) $Inputproxy = GUICtrlCreateInput("Host",100, 198, 100, 17) $Inputport = GUICtrlCreateInput("Port", 100, 248, 100, 17) $InputUser = GUICtrlCreateInput("User", 100, 298, 100, 17) $ExInput4 = GUICtrlCreateLabel("AdnanBaloch[Starstar]", 32, 350, 168, 17) $ExInput5 = GUICtrlCreateLabel("AdnanBaloch[Starstar]", 32, 400, 168, 17) $ExInput6 = GUICtrlCreateLabel("AdnanBaloch[Starstar]", 32, 450, 168, 17) $ExInput7 = GUICtrlCreateLabel("AdnanBaloch[Starstar]", 32, 500, 168, 17) Else winmove("","",Default,Default,Default,240) GUICtrlSetData($Checkboxdataakun,"Show Akun") EndIf Endif WEnd GUIDelete() EndFunc Edited November 19, 2013 by Starstar fikri1979 1 Life is like a coin. You can spend it Anyway as you wish and for your kind information. "you can spend it only once." Link to comment Share on other sites More sharing options...
fikri1979 Posted November 19, 2013 Author Share Posted November 19, 2013 Lets check anotherone For you.........According your givan images. expandcollapse popup#include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> Opt("GUIResizeMode", $GUI_DOCKALL) EX() Func EX() Local $msg $Formoninotool = GUICreate("0nin0 ", 343, 215, 420, 100) $MenuItemtutor = GUICtrlCreateMenu("&TUTOR") $MenuItemtools = GUICtrlCreateMenu("T&OOLS") $MenuItemxl = GUICtrlCreateMenu("&XL") GUISetBkColor(0xC0DCC0) $btnstart = GUICtrlCreateButton("START", 16, 24, 65, 25) $btnstop = GUICtrlCreateButton("STOP", 96, 24, 65, 25) $Inputportproxy = GUICtrlCreateInput("Port injek", 184, 24, 65, 21) $Checkboxproxy = GUICtrlCreateCheckbox("use proxy", 264, 24, 73, 17) $Status = GUICtrlCreateGroup("Status", 8, 112, 321, 49) $Copyright = GUICtrlCreateLabel("Copyright@0nin0 Faundation 2013", 32, 136, 168, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) $Checkboxdataakun = GUICtrlCreateCheckbox("Data Akun", 8, 168, 97, 17) $GroupMode = GUICtrlCreateGroup("Mode", 8, 56, 321, 49) $Radio1ssh = GUICtrlCreateRadio("2 SSH", 16, 80, 57, 17) $Radio2ssh = GUICtrlCreateRadio("3 SSH", 80, 80, 57, 17) $Radio4ssg = GUICtrlCreateRadio("4 SSH", 144, 80, 57, 17) $Radio5ssh = GUICtrlCreateRadio("5 SSH", 208, 80, 57, 17) $Radio6ssh = GUICtrlCreateRadio("6 SSH", 272, 80, 49, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) GUISetState(@SW_SHOW) While 1 $msg = GUIGetMsg() If $msg = $GUI_EVENT_CLOSE Then ExitLoop If $msg=$Checkboxdataakun Then If GUICtrlRead($Checkboxdataakun)=1 Then winmove("","",Default,Default,Default,600) GUICtrlSetData($Checkboxdataakun,"Hide Akun") $ExLaInput1 = GUICtrlCreateLabel("Host:", 32, 200, 30, 17) $ExLAInput2 = GUICtrlCreateLabel("Port: ", 32, 250, 30, 17) $ExLaInput3 = GUICtrlCreateLabel("User: ", 32, 300, 30, 17) $Inputproxy = GUICtrlCreateInput("Host",100, 198, 100, 17) $Inputport = GUICtrlCreateInput("Port", 100, 248, 100, 17) $InputUser = GUICtrlCreateInput("User", 100, 298, 100, 17) $ExInput4 = GUICtrlCreateLabel("AdnanBaloch[Starstar]", 32, 350, 168, 17) $ExInput5 = GUICtrlCreateLabel("AdnanBaloch[Starstar]", 32, 400, 168, 17) $ExInput6 = GUICtrlCreateLabel("AdnanBaloch[Starstar]", 32, 450, 168, 17) $ExInput7 = GUICtrlCreateLabel("AdnanBaloch[Starstar]", 32, 500, 168, 17) Else winmove("","",Default,Default,Default,240) GUICtrlSetData($Checkboxdataakun,"Show Akun") EndIf Endif WEnd GUIDelete() EndFunc very good and helpful...thanks so much Link to comment Share on other sites More sharing options...
Moderators Melba23 Posted November 19, 2013 Moderators Share Posted November 19, 2013 fikri1979,If you had wanted to use my UDF then it works like this: expandcollapse popup#include <GUIConstantsEx.au3> #include "GUIExtender.au3" Example() Func Example() $Formoninotool = GUICreate("0nin0 ", 343, 600, 420, 100) _GUIExtender_Init($Formoninotool) $MenuItemtutor = GUICtrlCreateMenu("&TUTOR") $MenuItemtools = GUICtrlCreateMenu("T&OOLS") $MenuItemxl = GUICtrlCreateMenu("&XL") GUISetBkColor(0xC0DCC0) _GUIExtender_Section_Start($Formoninotool, 0, 215) $btnstart = GUICtrlCreateButton("START", 16, 24, 65, 25) $btnstop = GUICtrlCreateButton("STOP", 96, 24, 65, 25) $Inputportproxy = GUICtrlCreateInput("Port injek", 184, 24, 65, 21) $Checkboxproxy = GUICtrlCreateCheckbox("use proxy", 264, 24, 73, 17) $Status = GUICtrlCreateGroup("Status", 8, 112, 321, 49) $Copyright = GUICtrlCreateLabel("Copyright@0nin0 Faundation 2013", 32, 136, 168, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) $GroupMode = GUICtrlCreateGroup("Mode", 8, 56, 321, 49) $Radio1ssh = GUICtrlCreateRadio("2 SSH", 16, 80, 57, 17) $Radio2ssh = GUICtrlCreateRadio("3 SSH", 80, 80, 57, 17) $Radio4ssg = GUICtrlCreateRadio("4 SSH", 144, 80, 57, 17) $Radio5ssh = GUICtrlCreateRadio("5 SSH", 208, 80, 57, 17) $Radio6ssh = GUICtrlCreateRadio("6 SSH", 272, 80, 49, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) _GUIExtender_Section_Action($Formoninotool, 2, "Hide Akun", "Data Akun", 8, 168, 97, 17) ; Normal button _GUIExtender_Section_End($Formoninotool) _GUIExtender_Section_Start($Formoninotool, 215, 385) $ExLaInput1 = GUICtrlCreateLabel("Host:", 32, 200, 30, 17) $ExLAInput2 = GUICtrlCreateLabel("Port: ", 32, 250, 30, 17) $ExLaInput3 = GUICtrlCreateLabel("User: ", 32, 300, 30, 17) $Inputproxy = GUICtrlCreateInput("Host",100, 198, 100, 17) $Inputport = GUICtrlCreateInput("Port", 100, 248, 100, 17) $InputUser = GUICtrlCreateInput("User", 100, 298, 100, 17) $ExInput4 = GUICtrlCreateLabel("Melba23", 32, 350, 168, 17) $ExInput5 = GUICtrlCreateLabel("Melba23", 32, 400, 168, 17) $ExInput6 = GUICtrlCreateLabel("Melba23", 32, 450, 168, 17) $ExInput7 = GUICtrlCreateLabel("Melba23", 32, 500, 168, 17) _GUIExtender_Section_End($Formoninotool) ; Retract lower section _GUIExtender_Section_Extend($Formoninotool, 2, False) GUISetState(@SW_SHOW) While 1 $aMsg = GUIGetMsg(1) Switch $aMsg[0] Case $GUI_EVENT_CLOSE Exit EndSwitch Switch $aMsg[1] Case $Formoninotool _GUIExtender_Action($aMsg[1], $aMsg[0]) ; Check for click on Action control EndSwitch WEnd EndFuncM23 fikri1979 and Danyfirex 2 Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind Open spoiler to see my UDFs: Spoiler ArrayMultiColSort ---- Sort arrays on multiple columnsChooseFileFolder ---- Single and multiple selections from specified path treeview listingDate_Time_Convert -- Easily convert date/time formats, including the language usedExtMsgBox --------- A highly customisable replacement for MsgBoxGUIExtender -------- Extend and retract multiple sections within a GUIGUIFrame ---------- Subdivide GUIs into many adjustable framesGUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView itemsGUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeViewMarquee ----------- Scrolling tickertape GUIsNoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxesNotify ------------- Small notifications on the edge of the displayScrollbars ----------Automatically sized scrollbars with a single commandStringSize ---------- Automatically size controls to fit textToast -------------- Small GUIs which pop out of the notification area Link to comment Share on other sites More sharing options...
fikri1979 Posted November 19, 2013 Author Share Posted November 19, 2013 fikri1979, If you had wanted to use my UDF then it works like this: expandcollapse popup#include <GUIConstantsEx.au3> #include "GUIExtender.au3" Example() Func Example() $Formoninotool = GUICreate("0nin0 ", 343, 600, 420, 100) _GUIExtender_Init($Formoninotool) $MenuItemtutor = GUICtrlCreateMenu("&TUTOR") $MenuItemtools = GUICtrlCreateMenu("T&OOLS") $MenuItemxl = GUICtrlCreateMenu("&XL") GUISetBkColor(0xC0DCC0) _GUIExtender_Section_Start($Formoninotool, 0, 215) $btnstart = GUICtrlCreateButton("START", 16, 24, 65, 25) $btnstop = GUICtrlCreateButton("STOP", 96, 24, 65, 25) $Inputportproxy = GUICtrlCreateInput("Port injek", 184, 24, 65, 21) $Checkboxproxy = GUICtrlCreateCheckbox("use proxy", 264, 24, 73, 17) $Status = GUICtrlCreateGroup("Status", 8, 112, 321, 49) $Copyright = GUICtrlCreateLabel("Copyright@0nin0 Faundation 2013", 32, 136, 168, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) $GroupMode = GUICtrlCreateGroup("Mode", 8, 56, 321, 49) $Radio1ssh = GUICtrlCreateRadio("2 SSH", 16, 80, 57, 17) $Radio2ssh = GUICtrlCreateRadio("3 SSH", 80, 80, 57, 17) $Radio4ssg = GUICtrlCreateRadio("4 SSH", 144, 80, 57, 17) $Radio5ssh = GUICtrlCreateRadio("5 SSH", 208, 80, 57, 17) $Radio6ssh = GUICtrlCreateRadio("6 SSH", 272, 80, 49, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) _GUIExtender_Section_Action($Formoninotool, 2, "Hide Akun", "Data Akun", 8, 168, 97, 17) ; Normal button _GUIExtender_Section_End($Formoninotool) _GUIExtender_Section_Start($Formoninotool, 215, 385) $ExLaInput1 = GUICtrlCreateLabel("Host:", 32, 200, 30, 17) $ExLAInput2 = GUICtrlCreateLabel("Port: ", 32, 250, 30, 17) $ExLaInput3 = GUICtrlCreateLabel("User: ", 32, 300, 30, 17) $Inputproxy = GUICtrlCreateInput("Host",100, 198, 100, 17) $Inputport = GUICtrlCreateInput("Port", 100, 248, 100, 17) $InputUser = GUICtrlCreateInput("User", 100, 298, 100, 17) $ExInput4 = GUICtrlCreateLabel("Melba23", 32, 350, 168, 17) $ExInput5 = GUICtrlCreateLabel("Melba23", 32, 400, 168, 17) $ExInput6 = GUICtrlCreateLabel("Melba23", 32, 450, 168, 17) $ExInput7 = GUICtrlCreateLabel("Melba23", 32, 500, 168, 17) _GUIExtender_Section_End($Formoninotool) ; Retract lower section _GUIExtender_Section_Extend($Formoninotool, 2, False) GUISetState(@SW_SHOW) While 1 $aMsg = GUIGetMsg(1) Switch $aMsg[0] Case $GUI_EVENT_CLOSE Exit EndSwitch Switch $aMsg[1] Case $Formoninotool _GUIExtender_Action($aMsg[1], $aMsg[0]) ; Check for click on Action control EndSwitch WEnd EndFunc M23 i've tried with that scrip but i get some error.......why get an error message? n how to fix it? Link to comment Share on other sites More sharing options...
Starstar Posted November 19, 2013 Share Posted November 19, 2013 (edited) Download GUIExtender.au3 From >here. and past it in Include Folder normly Include is in autoit dirictory(C:Program FilesAutoIt3Include). Edited November 19, 2013 by Starstar fikri1979 1 Life is like a coin. You can spend it Anyway as you wish and for your kind information. "you can spend it only once." Link to comment Share on other sites More sharing options...
Moderators Melba23 Posted November 19, 2013 Moderators Share Posted November 19, 2013 fikri1979,You can download the UDF from the link in my sig below. Do NOT put it in the AutoIt "Include" folder as suggested above. Either put it in the same folder as the script - or create your own "Include" folder as explained in the Adding UDFs to AutoIt and SciTE tutorial in the Wiki.M23 fikri1979 1 Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind Open spoiler to see my UDFs: Spoiler ArrayMultiColSort ---- Sort arrays on multiple columnsChooseFileFolder ---- Single and multiple selections from specified path treeview listingDate_Time_Convert -- Easily convert date/time formats, including the language usedExtMsgBox --------- A highly customisable replacement for MsgBoxGUIExtender -------- Extend and retract multiple sections within a GUIGUIFrame ---------- Subdivide GUIs into many adjustable framesGUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView itemsGUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeViewMarquee ----------- Scrolling tickertape GUIsNoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxesNotify ------------- Small notifications on the edge of the displayScrollbars ----------Automatically sized scrollbars with a single commandStringSize ---------- Automatically size controls to fit textToast -------------- Small GUIs which pop out of the notification area Link to comment Share on other sites More sharing options...
Starstar Posted November 19, 2013 Share Posted November 19, 2013 (edited) Thanks Melba23 i didn't know about article(Adding PDFs to AutoIt and SciTE). fikri1979... Click on GuiExtender from Melba23 signatures and download it and past it in same folder......as your script. Edited November 19, 2013 by Starstar fikri1979 1 Life is like a coin. You can spend it Anyway as you wish and for your kind information. "you can spend it only once." Link to comment Share on other sites More sharing options...
fikri1979 Posted November 19, 2013 Author Share Posted November 19, 2013 fikri1979, You can download the UDF from the link in my sig below. Do NOT put it in the AutoIt "Include" folder as suggested above. Either put it in the same folder as the script - or create your own "Include" folder as explained in the Adding UDFs to AutoIt and SciTE tutorial in the Wiki. M23 thanks so much..very helpful Link to comment Share on other sites More sharing options...
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