Sign in to follow this  
Followers 0
MadBoy

How to clear GUI so it would go back to begining or so

5 posts in this topic

When you start the program and choose any radio button from GRP one or GRP 2 and then you switch to 2nd tab shit that was supposed to be only in 1st tab is also visible in 2nd tab. How to clear it, eventually not appear on the 2nd tab when i jump to 2nd tab? Or/and how to make it this way so when things in first tab are selected and you go to 2nd tab they dissapear but appear again when you switch back to TAB1 ?

Here goes the code (ignore polish comments and names as i am too lazy to remove/translate them every time i paste the code ;p):

; Installer
#NoTrayIcon
; Dane programu
$autor = "dfd"
; Wersja;)
$version = 0.5
; Lokalizacja - Nazwa serwera
$location = "\\server\Install"

#include <GUIConstants.au3>

;FileInstall("c:\logo.gif", "C:\Windows\Temp.gif")
Opt("GUICoordMode", 1)
GUICreate(" Installer ver. " & $version & " - " & $autor, 600,460)
; Logo
;$n=GUICtrlCreatePic("c:\Windows\Temp.gif",0,0, $position2 + 75,35)


$tab=GUICtrlCreateTab (10,5, 585,450)
; OPROGRAMOWANIE - MENU
$tab0=GUICtrlCreateTabitem ( "Oprogramowanie")

; Utworzenie kontrolek
$button_1 = GUICtrlCreateButton ("Zainstaluj", 300, 400, 120, 40)
; Grupa pierwsza - profile
$nr0 = 14 ; pierwsza wspolrzedna kontrolek
$group_1 = GUICtrlCreateGroup ("Wybierz profil:", $nr0, 50, 175, 220)
$nr1 = 17 ; pierwsza wspolrzedna dla guzikow radio tabelki
$nr2 = 70 ; druga wspolrzedna dla guzikow radio tabelki
GUIStartGroup()
$radio_1 = GUICtrlCreateRadio ("Standardowy", $nr1, $nr2, 150, 20)
$radio_2 = GUICtrlCreateRadio ("Standardowy mobilny", $nr1, $nr2 + 30, 150, 20)
$radio_3 = GUICtrlCreateRadio ("Zaawansowany", $nr1, $nr2 + 60, 150, 20)
$radio_4 = GUICtrlCreateRadio ("Zaawansowany mobilny", $nr1, $nr2 + 90, 150, 20)
$radio_5 = GUICtrlCreateRadio ("Super", $nr1, $nr2 +120, 150, 20)
$radio_6 = GUICtrlCreateRadio ("Super mobilny", $nr1, $nr2 + 150, 150, 20)
; Grupa druga - wybor reczny
$group_2 = GUICtrlCreateGroup ("", 200, 50, 175, 35)
$radio_7 = GUICtrlCreateRadio ("Wybór ręczny", 202, 60, 150, 20)
;GUICtrlSetState(-1,$GUI_DISABLE)


; STEROWNIKI MENU
$tab1=GUICtrlCreateTabitem ("Sterowniki")

GUICtrlCreateTabitem ("")   




; Show the GUI
GUISetState ()
;-----------------------------------------------------------------------------
;-----------------------------------------------------------------------------
;-----------------------------------------------------------------------------
;-----------------------------------------------------------------------------
;-----------------------------------------------------------------------------
; Sciezki do programow
$7zip = $location &"\Main\Zip\zip.exe /S"
$7zip_comment = "7zip"
$Adobe7 = $location &"\Main\Adobe_Acrobat\Adobe_Reader_7.0.msi -qn"
$Adobe7_comment = "Adobe Acrobat Reader 7.0"
$Notes502 = $location &"\Main\Lotus_Notes_5.02c\Setup.exe -s -f1 SETUP.ISS"
$Notes502_comment = "Lotus Notes 5.02c"
$Notes510 = $location &"\Main\Lotus_Notes_5.10a\Setup.exe -s -f1 SETUP.ISS"
$Notes510_comment = "Lotus Notes 5.10a"
$Main = $location &"\Files\Main.bat"
$Main_comment = "Windows - Personalizacja"
$OfficeXP = $location &"\Main\Microsoft_OfficeXP\setup.exe TRANSFORMS=Unattended.MST /qb-"
$OfficeXP_comment = "Microsoft Office XP"
$Office2003 = $location &"\Advanced\Microsoft_Office2003\setup.exe TRANSFORMS=Unattended.MST /qb-"
$Office2003_comment = "Microsoft Office 2003"
$Project2003 = $location &"\Advanced\Microsoft_Project2003\setup.exe TRANSFORMS=Unattended.MST /qb-"
$Project2003_comment = "Microsoft Project 2003"
$Symantec = $location &"\Main\Symantec_Antivirus\Symantec_AntiVirus.msi /qn RUNLIVEUPDATE=0 REBOOT=REALLYSUPPRESS"
$Symantec_comment = "Symantec Antivirus 10"
$Visio2003 = $location &"\Advanced\Microsoft_Visio2003\setup.exe TRANSFORMS=Unattended.MST /qb-"
$Visio2003_comment = "Microsoft Visio 2003"
$Vpn = $location &"\Main\Cisco_VPN\setup.exe"
$Vpn_comment = "Vpn Client 4.7"

$position1 = 19
$position2 = 300

While 1
   $msg = GUIGetMsg()
   Select
     Case $msg = $GUI_EVENT_CLOSE
         FileRecycle ("C:\Windows\Temp.gif")
         Exit
     Case $msg = $radio_1
         $group_3 = GUICtrlCreateGroup ("Do zainstalowania:", $nr0, 280, 175, 165)
         GUICtrlCreateLabel ($7zip_comment,  $position1, $position2, 150)
         GUICtrlCreateLabel ($Adobe7_comment,  $position1, $position2 + 15, 150)
         GUICtrlCreateLabel ($Notes502_comment,  $position1, $position2 + 30, 150)
         GUICtrlCreateLabel ($OfficeXP_comment,  $position1, $position2 + 45, 150)
         GUICtrlCreateLabel ($Symantec_comment,  $position1, $position2 + 60, 150)
         GUICtrlCreateLabel ($Main_comment,  $position1, $position2 + 75, 150)
         GUICtrlCreateLabel ("                      ",  $position1, $position2 + 90, 150)
         GUICtrlCreateLabel ("                      ",  $position1, $position2 + 105, 150)
         GUICtrlCreateLabel ("                      ",  $position1, $position2 + 120, 150)
     Case $msg = $radio_2
         $group_3 = GUICtrlCreateGroup ("Do zainstalowania:", $nr0, 280, 175, 165)
         GUICtrlCreateLabel ($7zip_comment,  $position1, $position2, 150)
         GUICtrlCreateLabel ($Adobe7_comment,  $position1, $position2 + 15, 150)
         GUICtrlCreateLabel ($Notes502_comment,  $position1, $position2 + 30, 150)
         GUICtrlCreateLabel ($OfficeXP_comment,  $position1, $position2 + 45, 150)
         GUICtrlCreateLabel ($Symantec_comment,  $position1, $position2 + 60, 150)
         GUICtrlCreateLabel ($Main_comment,  $position1, $position2 + 75, 150)
         GUICtrlCreateLabel ($Vpn_comment,  $position1, $position2 + 90, 150)
         GUICtrlCreateLabel ("                      ",  $position1, $position2 + 105, 150)
         GUICtrlCreateLabel ("                      ",  $position1, $position2 + 120, 150)
     Case $msg = $radio_3
         $group_3 = GUICtrlCreateGroup ("Do zainstalowania:", $nr0, 280, 175, 165)
         GUICtrlCreateLabel ($7zip_comment,  $position1, $position2, 150)
         GUICtrlCreateLabel ($Adobe7_comment,  $position1, $position2 + 15, 150)
         GUICtrlCreateLabel ($Notes510_comment,  $position1, $position2 + 30, 150)
         GUICtrlCreateLabel ($Office2003_comment,  $position1, $position2 + 45, 150)
         GUICtrlCreateLabel ($Symantec_comment,  $position1, $position2 + 60, 150)
         GUICtrlCreateLabel ($Main_comment,  $position1, $position2 + 75, 150)
         GUICtrlCreateLabel ("                      ",  $position1, $position2 + 90, 150)
         GUICtrlCreateLabel ("                      ",  $position1, $position2 + 105, 150)
         GUICtrlCreateLabel ("                      ",  $position1, $position2 + 120, 150)
     Case $msg = $radio_4
         $group_3 = GUICtrlCreateGroup ("Do zainstalowania:", $nr0, 280, 175, 165)
         GUICtrlCreateLabel ($7zip_comment,  $position1, $position2, 150)
         GUICtrlCreateLabel ($Adobe7_comment,  $position1, $position2 + 15, 150)
         GUICtrlCreateLabel ($Notes510_comment,  $position1, $position2 + 30, 150)
         GUICtrlCreateLabel ($Office2003_comment,  $position1, $position2 + 45, 150)
         GUICtrlCreateLabel ($Symantec_comment,  $position1, $position2 + 60, 150)
         GUICtrlCreateLabel ($Main_comment,  $position1, $position2 + 75, 150)
         GUICtrlCreateLabel ($Vpn_comment,  $position1, $position2 + 90, 150)
         GUICtrlCreateLabel ("                      ",  $position1, $position2 + 105, 150)
         GUICtrlCreateLabel ("                      ",  $position1, $position2 + 120, 150)
     Case $msg = $radio_5
         $group_3 = GUICtrlCreateGroup ("Do zainstalowania:", $nr0, 280, 175, 165)
         GUICtrlCreateLabel ($7zip_comment,  $position1, $position2, 150)
         GUICtrlCreateLabel ($Adobe7_comment,  $position1, $position2 + 15, 150)
         GUICtrlCreateLabel ($Notes510_comment,  $position1, $position2 + 30, 150)
         GUICtrlCreateLabel ($Office2003_comment,  $position1, $position2 + 45, 150)
         GUICtrlCreateLabel ($Project2003_comment,  $position1, $position2 + 60, 150)
         GUICtrlCreateLabel ($Visio2003_comment,  $position1, $position2 + 75, 150)
         GUICtrlCreateLabel ($Symantec_comment,  $position1, $position2 + 90, 150)
         GUICtrlCreateLabel ($Main_comment,  $position1, $position2 + 105, 150)
         GUICtrlCreateLabel ("                      ",  $position1, $position2 + 120, 150)
     Case $msg = $radio_6
         $group_3 = GUICtrlCreateGroup ("Do zainstalowania:", $nr0, 280, 175, 165)
         GUICtrlCreateLabel ($7zip_comment,  $position1, $position2, 150)
         GUICtrlCreateLabel ($Adobe7_comment,  $position1, $position2 + 15, 150)
         GUICtrlCreateLabel ($Notes510_comment,  $position1, $position2 + 30, 150)
         GUICtrlCreateLabel ($Office2003_comment,  $position1, $position2 + 45, 150)
         GUICtrlCreateLabel ($Project2003_comment,  $position1, $position2 + 60, 150)
         GUICtrlCreateLabel ($Visio2003_comment,  $position1, $position2 + 75, 150)
         GUICtrlCreateLabel ($Symantec_comment,  $position1, $position2 + 90, 150)
         GUICtrlCreateLabel ($Main_comment,  $position1, $position2 + 105, 150)
         GUICtrlCreateLabel ($Vpn_comment,  $position1, $position2 + 120, 150)
        Case $msg = $button_1 AND BitAnd(GUICtrlRead($radio_1),$GUI_CHECKED) = $GUI_CHECKED
         RunWait($7zip, "")
         RunWait(@ComSpec & " /c " & $Adobe$position1, "", @SW_HIDE)
         RunWait($Notes502, "")
         RunWait($OfficeXP, "")
         RunWait(@ComSpec & " /c " & $Symantec, "", @SW_HIDE)
         RunWait($Main, "")
      Case $msg = $button_1 AND BitAnd(GUICtrlRead($radio_2),$GUI_CHECKED) = $GUI_CHECKED
         RunWait($7zip, "")
         RunWait(@ComSpec & " /c " & $Adobe$position1, "", @SW_HIDE)
         RunWait($Notes502, "")
         RunWait($OfficeXP, "")
         RunWait(@ComSpec & " /c " & $Symantec, "", @SW_HIDE)
         RunWait($Vpn, "")
         RunWait($Main, "")
        Case $msg = $button_1 AND BitAnd(GUICtrlRead($radio_3),$GUI_CHECKED) = $GUI_CHECKED
         RunWait($7zip, "")
         RunWait(@ComSpec & " /c " & $Adobe$position1, "", @SW_HIDE)
         RunWait($Notes510, "")
         RunWait($Office2003, "")
         RunWait(@ComSpec & " /c " & $Symantec, "", @SW_HIDE)
         RunWait($Main, "")
      Case $msg = $button_1 AND BitAnd(GUICtrlRead($radio_4),$GUI_CHECKED) = $GUI_CHECKED
         RunWait($7zip, "")
         RunWait(@ComSpec & " /c " & $Adobe$position1, "", @SW_HIDE)
         RunWait($Notes510, "")
         RunWait($Office2003, "")
         RunWait(@ComSpec & " /c " & $Symantec, "", @SW_HIDE)
         RunWait($Vpn, "")
         RunWait($Main, "") 
        Case $msg = $button_1 AND BitAnd(GUICtrlRead($radio_5),$GUI_CHECKED) = $GUI_CHECKED
         RunWait($7zip, "")
         RunWait(@ComSpec & " /c " & $Adobe$position1, "", @SW_HIDE)
         RunWait($Notes510, "")
         RunWait($Office2003, "")
         RunWait($Project2003, "")
         RunWait($Visio2003, "")
         RunWait(@ComSpec & " /c " & $Symantec, "", @SW_HIDE)
         RunWait($Main, "") 
      Case $msg = $button_1 AND BitAnd(GUICtrlRead($radio_6),$GUI_CHECKED) = $GUI_CHECKED
         RunWait($7zip, "")
         RunWait(@ComSpec & " /c " & $Adobe$position1, "", @SW_HIDE)
         RunWait($Notes510, "")
         RunWait($Office2003, "")
         RunWait($Project2003, "")
         RunWait($Visio2003, "")
         RunWait(@ComSpec & " /c " & $Symantec, "", @SW_HIDE)
         RunWait($Vpn, "")
         RunWait($Main, "") 
     Case $msg = $radio_7
         GUICtrlSetState(-1,$GUI_DISABLE)
         $wybor= GUICtrlCreateTreeView (200,90,175,180,BitOr($TVS_CHECKBOXES,$TVS_HASBUTTONS,$TVS_HASLINES,$TVS_LINESATROOT,$TVS_DISABLEDRAGDROP,$TVS_SHOWSELALWAYS),$WS_EX_CLIENTEDGE)
         GUICtrlSetState(-1,$GUI_DISABLE)
         $7zip = GuiCtrlCreateTreeViewItem("7 zip", $wybor)
         $Adobe7 = GuiCtrlCreateTreeViewItem("Adobe Acrobat 7.0", $wybor)
         $CiscoVPN = GuiCtrlCreateTreeViewItem("Cisco VPN 4.7", $wybor)
         $Lotus502 = GuiCtrlCreateTreeViewItem("Lotus Notes 5.02c", $wybor)
         $Lotus510 = GuiCtrlCreateTreeViewItem("Lotus Notes 5.10a", $wybor)
         $OfficeXP = GuiCtrlCreateTreeViewItem("Microsoft Office XP", $wybor)
         $Office2003 = GuiCtrlCreateTreeViewItem("Microsoft Office 2003", $wybor)
         $Projec2003 = GuiCtrlCreateTreeViewItem("Microsoft Project 2003", $wybor)
         $Visio2003 = GuiCtrlCreateTreeViewItem("Microsoft Visio 2003", $wybor)      
         $Symantec = GuiCtrlCreateTreeViewItem("Symantec Antivirus", $wybor)         
   EndSelect
WEnd

My little company: Evotec (PL version: Evotec)

Share this post


Link to post
Share on other sites



When you start the program and choose any radio button from GRP one or GRP 2 and then you switch to 2nd tab shit that was supposed to be only in 1st tab is also visible in 2nd tab. How to clear it, eventually not appear on the 2nd tab when i jump to 2nd tab? Or/and how to make it this way so when things in first tab are selected and you go to 2nd tab they dissapear but appear again when you switch back to TAB1 ?

Maybe this answers your question?

#NoTrayIcon

#include <GUIConstants.au3>

Opt("GUICoordMode", 1)

GUICreate("Installer", 600,460)

$tab=GUICtrlCreateTab (10,5, 585,450)

$tab0=GUICtrlCreateTabitem ( "Tab 1")

$radio_1 = GUICtrlCreateRadio ("Tab 1 radio", 17, 70, 150, 20)

$label_1=GUICtrlCreateLabel ("Tab 1 Label", 19, 300, 150)

$tab1=GUICtrlCreateTabitem ("tab 2")

$radio_2 = GUICtrlCreateRadio ("Tab 2 radio", 17, 70, 150, 20)

$label_2=GUICtrlCreateLabel ("Tab 2 Label", 19, 300, 150)

GUICtrlSetState ($label_1,$GUI_HIDE)

GUICtrlSetState ($label_2,$GUI_HIDE)

GUISetState ()

While 1

$msg = GUIGetMsg()

Select

Case $msg = $GUI_EVENT_CLOSE

Exit

Case $msg = $radio_1

GUICtrlSetState ($label_1,$GUI_SHOW)

Case $msg = $radio_1

GUICtrlSetState ($label_2,$GUI_SHOW)

EndSelect

WEnd

Share this post


Link to post
Share on other sites

ah $GUI_SHOW and $GUI_HIDE, will try that :P looks okey. Tnx


My little company: Evotec (PL version: Evotec)

Share this post


Link to post
Share on other sites

Tab location is fixed

Radio 1 is fixed

You need to do the other radio/case changes, just follow radio/ case #1

; Installer
#NoTrayIcon
; Dane programu
$autor = "dfd"
; Wersja;)
$version = 0.5
; Lokalizacja - Nazwa serwera
$location = "\\server\Install"

#include <GUIConstants.au3>

;FileInstall("c:\logo.gif", "C:\Windows\Temp.gif")
Opt("GUICoordMode", 1)
GUICreate(" Installer ver. " & $version & " - " & $autor, 600,460)
; Logo
;$n=GUICtrlCreatePic("c:\Windows\Temp.gif",0,0, $position2 + 75,35)


$tab=GUICtrlCreateTab (10,5, 585,450)
; OPROGRAMOWANIE - MENU
$tab0=GUICtrlCreateTabitem ( "Oprogramowanie")

; Utworzenie kontrolek
$button_1 = GUICtrlCreateButton ("Zainstaluj", 300, 400, 120, 40)
; Grupa pierwsza - profile
$nr0 = 14; pierwsza wspolrzedna kontrolek
$position1 = 19
$position2 = 300

$group_1 = GUICtrlCreateGroup ("Wybierz profil:", $nr0, 50, 175, 220)
$nr1 = 17; pierwsza wspolrzedna dla guzikow radio tabelki
$nr2 = 70; druga wspolrzedna dla guzikow radio tabelki
GUIStartGroup()
$radio_1 = GUICtrlCreateRadio ("Standardowy", $nr1, $nr2, 150, 20)
$radio_2 = GUICtrlCreateRadio ("Standardowy mobilny", $nr1, $nr2 + 30, 150, 20)
$radio_3 = GUICtrlCreateRadio ("Zaawansowany", $nr1, $nr2 + 60, 150, 20)
$radio_4 = GUICtrlCreateRadio ("Zaawansowany mobilny", $nr1, $nr2 + 90, 150, 20)
$radio_5 = GUICtrlCreateRadio ("Super", $nr1, $nr2 +120, 150, 20)
$radio_6 = GUICtrlCreateRadio ("Super mobilny", $nr1, $nr2 + 150, 150, 20)
; Grupa druga - wybor reczny
$group_2 = GUICtrlCreateGroup ("", 200, 50, 175, 35)
$radio_7 = GUICtrlCreateRadio ("Wybór reczny", 202, 60, 150, 20)
;GUICtrlSetState(-1,$GUI_DISABLE)


;create the labels
$group_3 = GUICtrlCreateGroup ("", $nr0, 280, 175, 165)
GUICtrlSetState(-1,$GUI_HIDE)
$Label1= GUICtrlCreateLabel ("",  $position1, $position2, 150, 20)
$Label2= GUICtrlCreateLabel ("",  $position1, $position2 + 15, 150, 20)
$Label3= GUICtrlCreateLabel ("",  $position1, $position2 + 30, 150, 20)
$Label4= GUICtrlCreateLabel ("",  $position1, $position2 + 45, 150, 20)
$Label5= GUICtrlCreateLabel ("",  $position1, $position2 + 60, 150, 20)
$Label6= GUICtrlCreateLabel ("",  $position1, $position2 + 75, 150, 20)
$Label7= GUICtrlCreateLabel ("",  $position1, $position2 + 90, 150, 20)
$Label8= GUICtrlCreateLabel ("",  $position1, $position2 + 105, 150, 20)
$Label9= GUICtrlCreateLabel ("",  $position1, $position2 + 120, 150, 20)


; STEROWNIKI MENU
$tab1=GUICtrlCreateTabitem ("Sterowniki")

GUICtrlCreateTabitem ("")  




; Show the GUI
GUISetState ()
;-----------------------------------------------------------------------------
;-----------------------------------------------------------------------------
;-----------------------------------------------------------------------------
;-----------------------------------------------------------------------------
;-----------------------------------------------------------------------------
; Sciezki do programow
$7zip = $location &"\Main\Zip\zip.exe /S"
$7zip_comment = "7zip"
$Adobe7 = $location &"\Main\Adobe_Acrobat\Adobe_Reader_7.0.msi -qn"
$Adobe7_comment = "Adobe Acrobat Reader 7.0"
$Notes502 = $location &"\Main\Lotus_Notes_5.02c\Setup.exe -s -f1 SETUP.ISS"
$Notes502_comment = "Lotus Notes 5.02c"
$Notes510 = $location &"\Main\Lotus_Notes_5.10a\Setup.exe -s -f1 SETUP.ISS"
$Notes510_comment = "Lotus Notes 5.10a"
$Main = $location &"\Files\Main.bat"
$Main_comment = "Windows - Personalizacja"
$OfficeXP = $location &"\Main\Microsoft_OfficeXP\setup.exe TRANSFORMS=Unattended.MST /qb-"
$OfficeXP_comment = "Microsoft Office XP"
$Office2003 = $location &"\Advanced\Microsoft_Office2003\setup.exe TRANSFORMS=Unattended.MST /qb-"
$Office2003_comment = "Microsoft Office 2003"
$Project2003 = $location &"\Advanced\Microsoft_Project2003\setup.exe TRANSFORMS=Unattended.MST /qb-"
$Project2003_comment = "Microsoft Project 2003"
$Symantec = $location &"\Main\Symantec_Antivirus\Symantec_AntiVirus.msi /qn RUNLIVEUPDATE=0 REBOOT=REALLYSUPPRESS"
$Symantec_comment = "Symantec Antivirus 10"
$Visio2003 = $location &"\Advanced\Microsoft_Visio2003\setup.exe TRANSFORMS=Unattended.MST /qb-"
$Visio2003_comment = "Microsoft Visio 2003"
$Vpn = $location &"\Main\Cisco_VPN\setup.exe"
$Vpn_comment = "Vpn Client 4.7"



While 1
   $msg = GUIGetMsg()
   Select
     Case $msg = $GUI_EVENT_CLOSE
         FileRecycle ("C:\Windows\Temp.gif")
         Exit
     Case $msg = $radio_1
         GUICtrlSetState($group_3, $GUI_SHOW)
         GUICtrlSetData($group_3, "Do zainstalowania:")
         GUICtrlSetData( $Label1, $7zip_comment)
         GUICtrlSetData( $Label2, $Adobe7_comment)
         GUICtrlSetData( $Label3, $Notes502_comment)
         GUICtrlSetData( $Label4, $OfficeXP_comment)
         GUICtrlSetData( $Label5, $Symantec_comment)
         GUICtrlSetData( $Label6, $Main_comment)
         GUICtrlSetData( $Label7, "")
         GUICtrlSetData( $Label8, "")
         GUICtrlSetData( $Label9, "")
     Case $msg = $radio_2
         $group_3 = GUICtrlCreateGroup ("Do zainstalowania:", $nr0, 280, 175, 165)
         GUICtrlCreateLabel ($7zip_comment,  $position1, $position2, 150)
         GUICtrlCreateLabel ($Adobe7_comment,  $position1, $position2 + 15, 150)
         GUICtrlCreateLabel ($Notes502_comment,  $position1, $position2 + 30, 150)
         GUICtrlCreateLabel ($OfficeXP_comment,  $position1, $position2 + 45, 150)
         GUICtrlCreateLabel ($Symantec_comment,  $position1, $position2 + 60, 150)
         GUICtrlCreateLabel ($Main_comment,  $position1, $position2 + 75, 150)
         GUICtrlCreateLabel ($Vpn_comment,  $position1, $position2 + 90, 150)
         GUICtrlCreateLabel ("                      ",  $position1, $position2 + 105, 150)
         GUICtrlCreateLabel ("                      ",  $position1, $position2 + 120, 150)
     Case $msg = $radio_3
         $group_3 = GUICtrlCreateGroup ("Do zainstalowania:", $nr0, 280, 175, 165)
         GUICtrlCreateLabel ($7zip_comment,  $position1, $position2, 150)
         GUICtrlCreateLabel ($Adobe7_comment,  $position1, $position2 + 15, 150)
         GUICtrlCreateLabel ($Notes510_comment,  $position1, $position2 + 30, 150)
         GUICtrlCreateLabel ($Office2003_comment,  $position1, $position2 + 45, 150)
         GUICtrlCreateLabel ($Symantec_comment,  $position1, $position2 + 60, 150)
         GUICtrlCreateLabel ($Main_comment,  $position1, $position2 + 75, 150)
         GUICtrlCreateLabel ("                      ",  $position1, $position2 + 90, 150)
         GUICtrlCreateLabel ("                      ",  $position1, $position2 + 105, 150)
         GUICtrlCreateLabel ("                      ",  $position1, $position2 + 120, 150)
     Case $msg = $radio_4
         $group_3 = GUICtrlCreateGroup ("Do zainstalowania:", $nr0, 280, 175, 165)
         GUICtrlCreateLabel ($7zip_comment,  $position1, $position2, 150)
         GUICtrlCreateLabel ($Adobe7_comment,  $position1, $position2 + 15, 150)
         GUICtrlCreateLabel ($Notes510_comment,  $position1, $position2 + 30, 150)
         GUICtrlCreateLabel ($Office2003_comment,  $position1, $position2 + 45, 150)
         GUICtrlCreateLabel ($Symantec_comment,  $position1, $position2 + 60, 150)
         GUICtrlCreateLabel ($Main_comment,  $position1, $position2 + 75, 150)
         GUICtrlCreateLabel ($Vpn_comment,  $position1, $position2 + 90, 150)
         GUICtrlCreateLabel ("                      ",  $position1, $position2 + 105, 150)
         GUICtrlCreateLabel ("                      ",  $position1, $position2 + 120, 150)
     Case $msg = $radio_5
         $group_3 = GUICtrlCreateGroup ("Do zainstalowania:", $nr0, 280, 175, 165)
         GUICtrlCreateLabel ($7zip_comment,  $position1, $position2, 150)
         GUICtrlCreateLabel ($Adobe7_comment,  $position1, $position2 + 15, 150)
         GUICtrlCreateLabel ($Notes510_comment,  $position1, $position2 + 30, 150)
         GUICtrlCreateLabel ($Office2003_comment,  $position1, $position2 + 45, 150)
         GUICtrlCreateLabel ($Project2003_comment,  $position1, $position2 + 60, 150)
         GUICtrlCreateLabel ($Visio2003_comment,  $position1, $position2 + 75, 150)
         GUICtrlCreateLabel ($Symantec_comment,  $position1, $position2 + 90, 150)
         GUICtrlCreateLabel ($Main_comment,  $position1, $position2 + 105, 150)
         GUICtrlCreateLabel ("                      ",  $position1, $position2 + 120, 150)
     Case $msg = $radio_6
         $group_3 = GUICtrlCreateGroup ("Do zainstalowania:", $nr0, 280, 175, 165)
         GUICtrlCreateLabel ($7zip_comment,  $position1, $position2, 150)
         GUICtrlCreateLabel ($Adobe7_comment,  $position1, $position2 + 15, 150)
         GUICtrlCreateLabel ($Notes510_comment,  $position1, $position2 + 30, 150)
         GUICtrlCreateLabel ($Office2003_comment,  $position1, $position2 + 45, 150)
         GUICtrlCreateLabel ($Project2003_comment,  $position1, $position2 + 60, 150)
         GUICtrlCreateLabel ($Visio2003_comment,  $position1, $position2 + 75, 150)
         GUICtrlCreateLabel ($Symantec_comment,  $position1, $position2 + 90, 150)
         GUICtrlCreateLabel ($Main_comment,  $position1, $position2 + 105, 150)
         GUICtrlCreateLabel ($Vpn_comment,  $position1, $position2 + 120, 150)
        Case $msg = $button_1 AND BitAnd(GUICtrlRead($radio_1),$GUI_CHECKED) = $GUI_CHECKED
         RunWait($7zip, "")
         RunWait(@ComSpec & " /c " & $Adobe$position1, "", @SW_HIDE)
         RunWait($Notes502, "")
         RunWait($OfficeXP, "")
         RunWait(@ComSpec & " /c " & $Symantec, "", @SW_HIDE)
         RunWait($Main, "")
      Case $msg = $button_1 AND BitAnd(GUICtrlRead($radio_2),$GUI_CHECKED) = $GUI_CHECKED
         RunWait($7zip, "")
         RunWait(@ComSpec & " /c " & $Adobe$position1, "", @SW_HIDE)
         RunWait($Notes502, "")
         RunWait($OfficeXP, "")
         RunWait(@ComSpec & " /c " & $Symantec, "", @SW_HIDE)
         RunWait($Vpn, "")
         RunWait($Main, "")
        Case $msg = $button_1 AND BitAnd(GUICtrlRead($radio_3),$GUI_CHECKED) = $GUI_CHECKED
         RunWait($7zip, "")
         RunWait(@ComSpec & " /c " & $Adobe$position1, "", @SW_HIDE)
         RunWait($Notes510, "")
         RunWait($Office2003, "")
         RunWait(@ComSpec & " /c " & $Symantec, "", @SW_HIDE)
         RunWait($Main, "")
      Case $msg = $button_1 AND BitAnd(GUICtrlRead($radio_4),$GUI_CHECKED) = $GUI_CHECKED
         RunWait($7zip, "")
         RunWait(@ComSpec & " /c " & $Adobe$position1, "", @SW_HIDE)
         RunWait($Notes510, "")
         RunWait($Office2003, "")
         RunWait(@ComSpec & " /c " & $Symantec, "", @SW_HIDE)
         RunWait($Vpn, "")
         RunWait($Main, "")
        Case $msg = $button_1 AND BitAnd(GUICtrlRead($radio_5),$GUI_CHECKED) = $GUI_CHECKED
         RunWait($7zip, "")
         RunWait(@ComSpec & " /c " & $Adobe$position1, "", @SW_HIDE)
         RunWait($Notes510, "")
         RunWait($Office2003, "")
         RunWait($Project2003, "")
         RunWait($Visio2003, "")
         RunWait(@ComSpec & " /c " & $Symantec, "", @SW_HIDE)
         RunWait($Main, "")
      Case $msg = $button_1 AND BitAnd(GUICtrlRead($radio_6),$GUI_CHECKED) = $GUI_CHECKED
         RunWait($7zip, "")
         RunWait(@ComSpec & " /c " & $Adobe$position1, "", @SW_HIDE)
         RunWait($Notes510, "")
         RunWait($Office2003, "")
         RunWait($Project2003, "")
         RunWait($Visio2003, "")
         RunWait(@ComSpec & " /c " & $Symantec, "", @SW_HIDE)
         RunWait($Vpn, "")
         RunWait($Main, "")
     Case $msg = $radio_7
         GUICtrlSetState(-1,$GUI_DISABLE)
         $wybor= GUICtrlCreateTreeView (200,90,175,180,BitOr($TVS_CHECKBOXES,$TVS_HASBUTTONS,$TVS_HASLINES,$TVS_LINESATROOT,$TVS_DISABLEDRAGDROP,$TVS_SHOWSELALWAYS),$WS_EX_CLIENTEDGE)
         GUICtrlSetState(-1,$GUI_DISABLE)
         $7zip = GuiCtrlCreateTreeViewItem("7 zip", $wybor)
         $Adobe7 = GuiCtrlCreateTreeViewItem("Adobe Acrobat 7.0", $wybor)
         $CiscoVPN = GuiCtrlCreateTreeViewItem("Cisco VPN 4.7", $wybor)
         $Lotus502 = GuiCtrlCreateTreeViewItem("Lotus Notes 5.02c", $wybor)
         $Lotus510 = GuiCtrlCreateTreeViewItem("Lotus Notes 5.10a", $wybor)
         $OfficeXP = GuiCtrlCreateTreeViewItem("Microsoft Office XP", $wybor)
         $Office2003 = GuiCtrlCreateTreeViewItem("Microsoft Office 2003", $wybor)
         $Projec2003 = GuiCtrlCreateTreeViewItem("Microsoft Project 2003", $wybor)
         $Visio2003 = GuiCtrlCreateTreeViewItem("Microsoft Visio 2003", $wybor)     
         $Symantec = GuiCtrlCreateTreeViewItem("Symantec Antivirus", $wybor)        
   EndSelect
WEnd

8)


NEWHeader1.png

Share this post


Link to post
Share on other sites

Ah, few additions :P Tnx


My little company: Evotec (PL version: Evotec)

Share this post


Link to post
Share on other sites

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 account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0