AutoIt Français

Nouveau forum : http://www.autoitscript.fr/
 
AccueilFAQRechercherS'enregistrerMembresGroupesConnexionhttp://www.autoitscript.fr

Partagez | 
 

 Créer une chekbox si une clef de registre existe[RESOLU]

Voir le sujet précédent Voir le sujet suivant Aller en bas 
AuteurMessage
Vins83
Membre affirmé


Nombre de messages : 106
Localisation : Hyeres (83)
Date d'inscription : 28/02/2007

MessageSujet: Créer une chekbox si une clef de registre existe[RESOLU]   2007-03-18, 17:05

Je crois que le titre nous dit tout..

J'ai essayer:

[color=Red]If RegEnumVal ("HKEY_LOCAL_MACHINESOFTWARETestvins",2) then GUICtrlCreateCheckbox ("test",10,10)[/color]

Mais la checkbox apparait tout le temps,meme si le registre n'existe pas,comment faire

Je souhaiterais la meme chose pour un boutton..

Grand merci

@+ Vins


Dernière édition par le 2007-03-20, 23:34, édité 1 fois
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
VooDoo
Modérateur
Modérateur


Nombre de messages : 161
Date d'inscription : 11/12/2006

MessageSujet: Re: Créer une chekbox si une clef de registre existe[RESOLU]   2007-03-18, 22:29

Tu ne peux pas mettre [b]if [/b]sans condition !!
De plus tu n'as pas de chance car quoiqu'il arrive [b]RegEnumVal [/b]retourne tous le temps quelque chose donc il faut faire quelque chose comme sa:


[color=MediumBlue]$var[/color] [color=Green]=[/color] [b]RegEnumVal [/b]( "HKEY_LOCAL_MACHINESOFTWARETestvins" [color=Green],[/color] 2 )
[color=Green]if[/color] [color=Green][/color][color=Fuchsia]@error[/color] = 0 [color=Green]Then[/color] [b]GUICtrlCreateCheckbox[/b] ( "test" [color=Green],[/color] 10 [color=Green],[/color] 10 )

Car si il y a une erreur la fonction [b]RegEnumVal [/b]va chnager l'etat de la macro [color=Magenta]@error.[/color]

_________________
[img]http://img87.imageshack.us/img87/7941/autoit6oy.jpg[/img]
[url=http://autoit-fr.realbb.net/AutoIt-v3-c2/Entraide-f5/Regles-t39.htm][i]Lisez les règles ou soyez maudit ![/i][/url]
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Vins83
Membre affirmé


Nombre de messages : 106
Localisation : Hyeres (83)
Date d'inscription : 28/02/2007

MessageSujet: Re: Créer une chekbox si une clef de registre existe[RESOLU]   2007-03-18, 23:18

Et il possible que la clef de registre soit plus précise,du genre [color=Red]"HKEY_LOCAL_MACHINESOFTWARETestvins" [/color][color=Red], "Start", "REG_DWORD", "2"

[/color][color=Black]que si j'ai 3,il soit noter "manuel"[/color] et pour 4 [color=Black]"désactiver"[/color] et si vous avez suivi,alors pour 2 c'est "automatique"
dans un combo?

Merci

@+ Vins
[color=Red][/color]
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Vins83
Membre affirmé


Nombre de messages : 106
Localisation : Hyeres (83)
Date d'inscription : 28/02/2007

MessageSujet: Re: Créer une chekbox si une clef de registre existe[RESOLU]   2007-03-19, 22:03

Pour faire plus préci,j'ai fais celà,mais si vous avez plus préci,je suis preneur

[color=Red]#include < GUIConstants.au3 >
#include < GuiTab.au3 >

GUICreate("test Vins", 300, 100)
GuiSetIcon(@WindowsDir & "\regedit.exe", 0)

$var = RegRead ( "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\helpsvc","start")
if @error = 0 Then GUICtrlCreateCheckbox ( "Aide et support" , 10 , 10 )

$var = RegRead ( "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\helpsvc","start1")
if @error = 0 Then GUICtrlCreateCheckbox ( "Aide et support" , 10 , 30 )

GUISetState()

While 1
$msg = GuiGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop

EndSelect
WEnd[/color]

@+ Vins
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
sylvanie
Modérateur
Modérateur


Nombre de messages : 300
Date d'inscription : 10/03/2007

MessageSujet: Re: Créer une chekbox si une clef de registre existe[RESOLU]   2007-03-20, 01:08

Et où intervient la combo et surtout pourquoi ?
Si la valeur de "[color=black]start" est 4, 3 ou 2, un label ou un edit suffit, puisqu'il n'y a pas plusieures valeurs possibles à la fois.[/color]
Ou alors quelque chose m'a échapé ...
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
ani
Modérateur
Modérateur


Nombre de messages : 563
Date d'inscription : 23/01/2007

MessageSujet: Re: Créer une chekbox si une clef de registre existe[RESOLU]   2007-03-20, 01:39

si valeur retourné est toujours vrai, il vaut mieux faire une copi du regedit dans le format txt et d'y faire la recherche si elle existe alors retourne valeur x ect

mais pas en lecture direct dans un regedit
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Vins83
Membre affirmé


Nombre de messages : 106
Localisation : Hyeres (83)
Date d'inscription : 28/02/2007

MessageSujet: Re: Créer une chekbox si une clef de registre existe[RESOLU]   2007-03-20, 07:53

Va falloir qu'on m'explique un peu les amis,j'ai du mal a saisir tout lol

@+ Vins
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Vins83
Membre affirmé


Nombre de messages : 106
Localisation : Hyeres (83)
Date d'inscription : 28/02/2007

MessageSujet: Re: Créer une chekbox si une clef de registre existe[RESOLU]   2007-03-21, 08:34

Autre question,je cherche a faire an sorte que selon ou mon registre se situe(2 pour automatique;3 pour manuel et 4 pour désactiver),le GUICtrlCreateCheckbox ou GUICtrlCreateRadio soit cocher sur la case correspondante.

[color=Red]#include < GUIConstants.au3 >

GUICreate("test", 180, 140)

$okbutton = GuiCtrlCreateButton ("Vallider",5,110,160,20)

GUICtrlCreateGroup("Accès à distance au Registre", 5, 10, 160, 90) ; group line
$automatiqueaccesregistre = GUICtrlCreateRadio ("Automatique",10,30,100,20)
$manuelaccesregistre = GUICtrlCreateRadio ("Manuel",10,50,100,20)
$desactiveaccesregistre = GUICtrlCreateRadio ("Désactiver",10,70,100,20)

GUISetState()

While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop

Case $msg = $okbutton
If BitAND(GUICtrlRead($automatiqueaccesregistre),$GUI_CHECKED) Then
RegWrite("HKEY_LOCAL_MACHINESYSTEMCurrentControlSetServiceshelpsvc", "Start", "REG_DWORD", "2")
Endif
If BitAND(GUICtrlRead($manuelaccesregistre),$GUI_CHECKED) Then
RegWrite("HKEY_LOCAL_MACHINESYSTEMCurrentControlSetServiceshelpsvc", "Start", "REG_DWORD", "3")
Endif
If BitAND(GUICtrlRead($desactiveaccesregistre),$GUI_CHECKED) Then
RegWrite("HKEY_LOCAL_MACHINESYSTEMCurrentControlSetServiceshelpsvc", "Start", "REG_DWORD", "4")
Endif

EndSelect
WEnd

[/color][color=Black]Que dois je rajouter pour y arriver?

Merci

@+ Vins[/color]
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
sylvanie
Modérateur
Modérateur


Nombre de messages : 300
Date d'inscription : 10/03/2007

MessageSujet: Re: Créer une chekbox si une clef de registre existe[RESOLU]   2007-03-22, 22:05

Bonjour,
il faut àjouter ceci :

[code]

#include <GUIConstants.au3>

GUICreate("test", 180, 140)
$okbutton = GuiCtrlCreateButton ("Valider",5,110,160,20)
GUICtrlCreateGroup("Accès à distance au Registre", 5, 10, 160, 90) ; group line
$automatiqueaccesregistre = GUICtrlCreateRadio ("Automatique",10,30,100,20)
$manuelaccesregistre = GUICtrlCreateRadio ("Manuel",10,50,100,20)
$desactiveaccesregistre = GUICtrlCreateRadio ("Désactiver",10,70,100,20)
$var = RegRead("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\helpsvc", "Start")
Switch $var
case 2
Guictrlsetstate($automatiqueaccesregistre,$GUI_CHECKED)
Case 3
Guictrlsetstate($manuelaccesregistre,$GUI_CHECKED)
Case 4
Guictrlsetstate($desactiveaccesregistre,$GUI_CHECKED)
EndSwitch
GUISetState()
While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $okbutton
If BitAND(GUICtrlRead($automatiqueaccesregistre),$GUI_CHECKED) Then
RegWrite("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\helpsvc", "Start", "REG_DWORD", "2")
Endif
If BitAND(GUICtrlRead($manuelaccesregistre),$GUI_CHECKED) Then
RegWrite("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\helpsvc", "Start", "REG_DWORD", "3")
Endif
If BitAND(GUICtrlRead($desactiveaccesregistre),$GUI_CHECKED) Then
RegWrite("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\helpsvc", "Start", "REG_DWORD", "4")
Endif
EndSelect
WEnd

[/code]
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Vins83
Membre affirmé


Nombre de messages : 106
Localisation : Hyeres (83)
Date d'inscription : 28/02/2007

MessageSujet: Re: Créer une chekbox si une clef de registre existe[RESOLU]   2007-03-22, 23:20

Merci beaucoup Sylvanie,au moins un truc que j'aurais appris aujourd'hui.. cool

@+ Vins
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Vins83
Membre affirmé


Nombre de messages : 106
Localisation : Hyeres (83)
Date d'inscription : 28/02/2007

MessageSujet: Re: Créer une chekbox si une clef de registre existe[RESOLU]   2007-03-23, 01:02

Et avec un combo,tu ferais comment,j'ai $GUI_CHECKED qui doit servir a rien sur ce coup là:

Merci

[color=Red]#include < GUIConstants.au3 >
#include < GuiCombo.au3 >

GUICreate("test", 170, 90)
$okbutton = GuiCtrlCreateButton ("Valider",5,65,160,20)
GUICtrlCreateGroup("Accès à distance au Registre", 5, 10, 160, 50) ; group line
Global $g_idCombo = GUICtrlCreateCombo ("Automatique",10,30,150,20)
$automatiqueaccesregistre = GUICtrlSetData ($g_idCombo , "Automatique")
$manuelaccesregistre = GUICtrlSetData($g_idCombo , "Manuel")
$desactiveaccesregistre = GUICtrlSetData($g_idCombo , "Désactiver")
$var = RegRead("HKEY_LOCAL_MACHINESYSTEMCurrentControlSetServiceshelpsvc", "Start")
Switch $var
case 2
Guictrlsetstate($automatiqueaccesregistre,$GUI_CHECKED)
Case 3
Guictrlsetstate($manuelaccesregistre,$GUI_CHECKED)
Case 4
Guictrlsetstate($desactiveaccesregistre,$GUI_CHECKED)
EndSwitch
GUISetState()
While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $okbutton
If BitAND(GUICtrlRead($automatiqueaccesregistre),$GUI_CHECKED) Then
RegWrite("HKEY_LOCAL_MACHINESYSTEMCurrentControlSetServiceshelpsvc", "Start", "REG_DWORD", "2")
Endif
If BitAND(GUICtrlRead($manuelaccesregistre),$GUI_CHECKED) Then
RegWrite("HKEY_LOCAL_MACHINESYSTEMCurrentControlSetServiceshelpsvc", "Start", "REG_DWORD", "3")
Endif
If BitAND(GUICtrlRead($desactiveaccesregistre),$GUI_CHECKED) Then
RegWrite("HKEY_LOCAL_MACHINESYSTEMCurrentControlSetServiceshelpsvc", "Start", "REG_DWORD", "4")
Endif
EndSelect
WEnd

[/color]
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
ani
Modérateur
Modérateur


Nombre de messages : 563
Date d'inscription : 23/01/2007

MessageSujet: Re: Créer une chekbox si une clef de registre existe[RESOLU]   2007-03-23, 19:40

excellent tout çà

merci bien sylvanie

sinon vins faut regardér du coté guictrlread ^pour retourner la valeur du combo

vais essayer (j'ai dit j'allais essayer ^^ )
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
sylvanie
Modérateur
Modérateur


Nombre de messages : 300
Date d'inscription : 10/03/2007

MessageSujet: Re: Créer une chekbox si une clef de registre existe[RESOLU]   2007-03-23, 23:58

Voilà,
au passage, j'ai ajouté une option dans la combo afin de ne pas permettre de modifer le contenu

[code]
#include <GUIConstants.au3 >
#include <GuiCombo.au3 >
$My_string=""
GUICreate("test", 170, 90)
$okbutton = GuiCtrlCreateButton ("Valider",5,65,160,20)
GUICtrlCreateGroup("Accès à distance au Registre", 5, 10, 160, 50) ; group line
Global $g_idCombo = GUICtrlCreateCombo ("Automatique",10,30,150,20,BitOR($CBS_DROPDOWN,$CBS_DROPDOWNLIST))
$automatiqueaccesregistre = GUICtrlSetData ($g_idCombo , "Automatique")
$manuelaccesregistre = GUICtrlSetData($g_idCombo , "Manuel")
$desactiveaccesregistre = GUICtrlSetData($g_idCombo , "Désactiver")
$var = RegRead("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\helpsvc", "Start")
Switch $var
case 2
$My_string="Automatique"
Case 3
$My_string="Manuel"
Case 4
$My_string="Désactiver"
EndSwitch
_GUICtrlComboSelectString($g_idCombo,-1,$My_string)
GUISetState()
While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $okbutton
$My_string= GUICtrlRead($g_idCombo)
Switch $My_string
case "Automatique"
$var=2
case "Manuel"
$var=3
Case "Désactiver"
$var=4
Case Else
ContinueLoop
EndSwitch
RegWrite("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\helpsvc", "Start", "REG_DWORD", $var)
EndSelect
WEnd

[/code]
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Vins83
Membre affirmé


Nombre de messages : 106
Localisation : Hyeres (83)
Date d'inscription : 28/02/2007

MessageSujet: Re: Créer une chekbox si une clef de registre existe[RESOLU]   2007-03-25, 19:34

A chaque avancement un nouveau probleme lol...

Le combo ne marche plus si je fais ce qui suit:

[color=DarkRed]
#include < GUIConstants.au3 >
#include < GuiCombo.au3 >

$My_string=""

GUICreate("test", 600, 300,-1,-1 ,BitOr($WS_MINIMIZEBOX,$WS_MAXIMIZEBOX,$WS_GROUP,$WS_CAPTION,$WS_POPUP,$WS_SYSMENU))
GuiSetIcon(@WindowsDir & "regedit.exe", 0)

;boutton vallider
$okbutton = GuiCtrlCreateButton ("Vallider",172,276,425,20)
GUICtrlSetTip($okbutton,"Cliquer moi dessus pour vallider les modifications")

;table
GUICtrlCreateTab(2, 2, 596, 274)

;services
GUICtrlCreateTabItem("Services")
GUICtrlSetState(-1, $GUI_SHOW)
$maintree = GUICtrlCreateTreeView (4,30,290,240)
GUICtrlSetBkColor(-1, 0x00ff00)
; Services à ne pas désactiver
$donotmodified = GUICtrlCreateTreeViewItem ("Services à ne pas désactiver",$maintree)
GUICtrlSetImage(-1, "regedit.exe", 0, 4)
$RPCitem = GUICtrlCreateTreeViewItem ("Appel de procédure distante (RPC)",$donotmodified)


$RPCgroup = GUICtrlCreateGroup ("description",300,25,290,180)
GUICtrlSetState (-1,$GUI_HIDE)
; Appel de procédure distante (RPC)
$RPCstree = GUICtrlCreateTreeView (305,40,280,160,BitOr($TVS_CHECKBOXES,$TVS_DISABLEDRAGDROP),$WS_EX_CLIENTEDGE)
GUICtrlSetState (-1,$GUI_HIDE)
$RPCstree1 = GUICtrlCreateLabel ("blabla blabla...", 310, 50,270)
GUICtrlSetState (-1,$GUI_HIDE)


$RPCchoixgroup = GUICtrlCreateGroup ("Appel de procédure distante (RPC)",300,207,290,60)
GUICtrlSetState (-1,$GUI_HIDE)
; Appel de procédure distante (RPC)
$RPCchoixstree = GUICtrlCreateTreeView (305,222,280,40,BitOr($TVS_CHECKBOXES,$TVS_DISABLEDRAGDROP),$WS_EX_CLIENTEDGE)
GUICtrlSetState (-1,$GUI_HIDE)
Global $RPCCombo = GUICtrlCreateCombo ("Automatique",310,232,270,20,BitOR($CBS_DROPDOWN,$CBS_DROPDOWNLIST))
GUICtrlSetState (-1,$GUI_HIDE)
GUICtrlSetData ($RPCCombo , "Automatique")
GUICtrlSetData($RPCCombo , "Manuel")
GUICtrlSetData($RPCCombo , "Désactiver")
$var = RegRead("HKEY_LOCAL_MACHINESYSTEMCurrentControlSetServicesRpcSs", "Start")
Switch $var
case 2
$My_string="Automatique"
Case 3
$My_string="Manuel"
Case 4
$My_string="Désactiver"
EndSwitch
_GUICtrlComboSelectString($RPCCombo,-1,$My_string)

GUISetState()

While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop

Case $msg = $RPCitem
GUIctrlSetState ($RPCgroup,$GUI_SHOW)
GUIctrlSetState ($RPCstree,$GUI_SHOW)
GUIctrlSetState ($RPCstree1,$GUI_SHOW)
GUIctrlSetState ($RPCchoixgroup,$GUI_SHOW)
GUIctrlSetState ($RPCchoixstree,$GUI_SHOW)
GUIctrlSetState ($RPCCombo,$GUI_SHOW)

Case $msg = $okbutton
$My_string= GUICtrlRead($RPCCombo)
Switch $My_string
case "Automatique"
$var=2
case "Manuel"
$var=3
Case "Désactiver"
$var=4
Case Else
ContinueLoop
EndSwitch
RegWrite("HKEY_LOCAL_MACHINESYSTEMCurrentControlSetServicesRpcSs", "Start", "REG_DWORD", $var)

EndSelect
WEnd
[/color]

Un truc que j'aurais oublier quelque part??

Merci de votre aide..

@+ Vins
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
VooDoo
Modérateur
Modérateur


Nombre de messages : 161
Date d'inscription : 11/12/2006

MessageSujet: Re: Créer une chekbox si une clef de registre existe[RESOLU]   2007-03-25, 20:47

Voila:

[color=Red]#include <GUIConstants.au3>
#include <GuiCombo.au3>[/color]
[color=MediumBlue]$My_string=""[/color]
[b]GUICreate[/b] [b]([/b] "test" [color=Green],[/color] [i]600[/i] [color=Green],[/color] [i]300[/i] [color=Green],[/color] - [i]1[/i] [color=Green],[/color] - [i]1[/i] [color=Green],[/color] [b]BitOr[/b] [b]([/b] [color=MediumBlue]$WS_MINIMIZEBOX[/color] [color=Green],[/color] [color=MediumBlue]$WS_MAXIMIZEBOX[/color] [color=Green],[/color] [color=MediumBlue]$WS_GROUP[/color] [color=Green],[/color] [color=MediumBlue]$WS_CAPTION[/color] [color=Green],[/color] [color=MediumBlue]$WS_POPUP[/color] [color=Green],[/color] [color=MediumBlue]$WS_SYSMENU[/color] [b])[/b] [b])[/b]
[b]GuiSetIcon[/b] [b]([/b] [color=Fuchsia]@WindowsDir[/color] [color=Green]&[/color] "regedit.exe" [color=Green],[/color] [i]0[/i] [b])[/b]
;boutton vallider
[color=MediumBlue]$okbutton[/color] [color=Green]=[/color] [b]GuiCtrlCreateButton[/b] [b]([/b] "Vallider" [color=Green],[/color] [i]172[/i] [color=Green],[/color] [i]276[/i] [color=Green],[/color] [i]425[/i] [color=Green],[/color] [i]20[/i] [b])[/b]
[b]GUICtrlSetTip[/b] [b]([/b] [color=MediumBlue]$okbutton[/color] [color=Green],[/color] "Cliquer moi dessus pour vallider les modifications" [b])[/b]
;table
[b]GUICtrlCreateTab[/b] [b]([/b] [i]2[/i] [color=Green],[/color] [i]2[/i] [color=Green],[/color] [i]596[/i] [color=Green],[/color] [i]274[/i] [b])[/b]
;services
[b]GUICtrlCreateTabItem[/b] [b]([/b] "Services" [b])[/b]
[b]GUICtrlSetState[/b] [b]([/b] - [i]1[/i] [color=Green],[/color] [color=MediumBlue]$GUI_SHOW[/color] [b])[/b]
[color=MediumBlue]$maintree[/color] [color=Green]=[/color] [b]GUICtrlCreateTreeView[/b] [b]([/b] [i]4[/i] [color=Green],[/color] [i]30[/i] [color=Green],[/color] [i]290[/i] [color=Green],[/color] [i]240[/i] [b])[/b]
[b]GUICtrlSetBkColor[/b] [b]([/b] - [i]1[/i] [color=Green],[/color] 0x00ff00 [b])[/b]
; Services à ne pas désactiver
[color=MediumBlue]$donotmodified[/color] [color=Green]=[/color] [b]GUICtrlCreateTreeViewItem[/b] [b]([/b] "Services à ne pas désactiver" [color=Green],[/color] [color=MediumBlue]$maintree[/color] [b])[/b]
[b]GUICtrlSetImage[/b] [b]([/b] - [i]1[/i] [color=Green],[/color] "regedit.exe" [color=Green],[/color] [i]0[/i] [color=Green],[/color] [i]4[/i] [b])[/b]
[color=MediumBlue]$RPCitem[/color] [color=Green]=[/color] [b]GUICtrlCreateTreeViewItem[/b] [b]([/b] "Appel de procédure distante [b]([/b] RPC [b])[/b] " [color=Green],[/color] [color=MediumBlue]$donotmodified[/color] [b])[/b]
[color=MediumBlue]$RPCgroup[/color] [color=Green]=[/color] [b]GUICtrlCreateGroup[/b] [b]([/b] "description" [color=Green],[/color] [i]300[/i] [color=Green],[/color] [i]25[/i] [color=Green],[/color] [i]290[/i] [color=Green],[/color] [i]180[/i] [b])[/b]
[b]GUICtrlSetState[/b] [b]([/b] - [i]1[/i] [color=Green],[/color] [color=MediumBlue]$GUI_HIDE[/color] [b])[/b]
;~ ; Appel de procédure distante [b]([/b] RPC [b])[/b]
[color=MediumBlue]$RPCstree[/color] [color=Green]=[/color] [b]GUICtrlCreateTreeView[/b] [b]([/b] [i]305[/i] [color=Green],[/color] [i]40[/i] [color=Green],[/color] [i]280[/i] [color=Green],[/color] [i]160[/i] [color=Green],[/color] [b]BitOr[/b] [b]([/b] [color=MediumBlue]$TVS_CHECKBOXES[/color] [color=Green],[/color] [color=MediumBlue]$TVS_DISABLEDRAGDROP[/color] [b])[/b] [color=Green],[/color] [color=MediumBlue]$WS_EX_CLIENTEDGE[/color] [b])[/b]
[b]GUICtrlSetState[/b] [b]([/b] - [i]1[/i] [color=Green],[/color] [color=MediumBlue]$GUI_HIDE[/color] [b])[/b]
[color=MediumBlue]$RPCstree1[/color] [color=Green]=[/color] [b]GUICtrlCreateLabel[/b] [b]([/b] "blabla blabla..." [color=Green],[/color] [i]310[/i] [color=Green],[/color] [i]50[/i] [color=Green],[/color] [i]270[/i] [b])[/b]
[b]GUICtrlSetState[/b] [b]([/b] - [i]1[/i] [color=Green],[/color] [color=MediumBlue]$GUI_HIDE[/color] [b])[/b]
[color=MediumBlue]$RPCchoixgroup[/color] [color=Green]=[/color] [b]GUICtrlCreateGroup[/b] [b]([/b] "Appel de procédure distante [b]([/b] RPC [b])[/b] " [color=Green],[/color] [i]300[/i] [color=Green],[/color] [i]207[/i] [color=Green],[/color] [i]290[/i] [color=Green],[/color] [i]60[/i] [b])[/b]
[b]GUICtrlSetState[/b] [b]([/b] - [i]1[/i] [color=Green],[/color] [color=MediumBlue]$GUI_HIDE[/color] [b])[/b]
;~ ; Appel de procédure distante [b]([/b] RPC [b])[/b]
[color=MediumBlue]$RPCCombo[/color] [color=Green]=[/color] [b]GUICtrlCreateCombo[/b] [b]([/b] "Automatique" [color=Green],[/color] [i]310[/i] [color=Green],[/color] [i]232[/i] [color=Green],[/color] [i]270[/i] [color=Green],[/color] [i]20[/i] [color=Green],[/color] [b]BitOR[/b] [b]([/b] [color=MediumBlue]$CBS_DROPDOWN[/color] [color=Green],[/color] [color=MediumBlue]$CBS_DROPDOWNLIST[/color] [b])[/b] [b])[/b]
[b]GUICtrlSetData[/b] [b]([/b] [color=MediumBlue]$RPCCombo[/color] [color=Green],[/color] "Automatique" [b])[/b]
[b]GUICtrlSetData[/b] [b]([/b] [color=MediumBlue]$RPCCombo[/color] [color=Green],[/color] "Manuel" [b])[/b]
[b]GUICtrlSetData[/b] [b]([/b] [color=MediumBlue]$RPCCombo[/color] [color=Green],[/color] "Désactiver" [b])[/b]
[color=MediumBlue]$var[/color] [color=Green]=[/color] [b]RegRead[/b] [b]([/b] "HKEY_LOCAL_MACHINESYSTEMCurrentControlSetServicesRpcSs" [color=Green],[/color] "Start" [b])[/b]
[b]Switch[/b] [color=MediumBlue]$var[/color]
[color=Green]case[/color] [i]2[/i]
[color=MediumBlue]$My_string="Automatique"[/color]
[color=Green]Case[/color] [i]3[/i]
[color=MediumBlue]$My_string="Manuel"[/color]
[color=Green]Case[/color] [i]4[/i]
[color=MediumBlue]$My_string="Désactiver"[/color]
[color=Green]EndSwitch[/color]
_GUICtrlComboSelectString [b]([/b] [color=MediumBlue]$RPCCombo[/color] [color=Green],[/color] - [i]1[/i] [color=Green],[/color] [color=MediumBlue]$My_string[/color] [b])[/b]
[b]GUISetState[/b] [b]([/b] [b])[/b]
[b]GUICtrlSetState[/b] [b]([/b] [color=MediumBlue]$RPCCombo[/color] [color=Green],[/color] [color=MediumBlue]$GUI_HIDE[/color] [b])[/b]
[color=Green]While[/color] [i]1[/i]
[color=MediumBlue]$msg[/color] [color=Green]=[/color] [b]GUIGetMsg[/b] [b]([/b] [b])[/b]
[b]Select[/b]
[color=Green]Case[/color] [color=MediumBlue]$msg[/color] [color=Green]=[/color] [color=MediumBlue]$GUI_EVENT_CLOSE[/color]
[b]ExitLoop[/b]
[color=Green]Case[/color] [color=MediumBlue]$msg[/color] [color=Green]=[/color] [color=MediumBlue]$RPCitem[/color]
[b]GUIctrlSetState[/b] [b]([/b] [color=MediumBlue]$RPCgroup[/color] [color=Green],[/color] [color=MediumBlue]$GUI_SHOW[/color] [b])[/b]
[b]GUIctrlSetState[/b] [b]([/b] [color=MediumBlue]$RPCstree[/color] [color=Green],[/color] [color=MediumBlue]$GUI_SHOW[/color] [b])[/b]
[b]GUIctrlSetState[/b] [b]([/b] [color=MediumBlue]$RPCstree1[/color] [color=Green],[/color] [color=MediumBlue]$GUI_SHOW[/color] [b])[/b]
[b]GUIctrlSetState[/b] [b]([/b] [color=MediumBlue]$RPCchoixgroup[/color] [color=Green],[/color] [color=MediumBlue]$GUI_SHOW[/color] [b])[/b]
[b]GUIctrlSetState[/b] [b]([/b] [color=MediumBlue]$RPCCombo[/color] [color=Green],[/color] [color=MediumBlue]$GUI_SHOW[/color] [b])[/b]
[color=Green]Case[/color] [color=MediumBlue]$msg[/color] [color=Green]=[/color] [color=MediumBlue]$okbutton[/color]
[color=MediumBlue]$My_string=[/color] [b]GUICtrlRead[/b] [b]([/b] [color=MediumBlue]$RPCCombo[/color] [b])[/b]
[b]Switch[/b] [color=MediumBlue]$My_string[/color]
[color=Green]case[/color] "Automatique"
[color=MediumBlue]$var=2[/color]
[color=Green]case[/color] "Manuel"
[color=MediumBlue]$var=3[/color]
[color=Green]Case[/color] "Désactiver"
[color=MediumBlue]$var=4[/color]
[color=Green]Case[/color] [color=Green]Else[/color]
[b]ContinueLoop[/b]
[color=Green]EndSwitch[/color]
;~ [b]RegWrite[/b] [b]([/b] "HKEY_LOCAL_MACHINESYSTEMCurrentControlSetServicesRpcSs" [color=Green],[/color] "Start" [color=Green],[/color] "REG_DWORD" [color=Green],[/color] [color=MediumBlue]$var[/color] [b])[/b]
[color=Green]EndSelect[/color]
[color=Green]WEnd

[/color]Voila le code...il ne faut pas mettre de treeview sur le combo ! De plus pour mettre du texte dans un un Edit/input la fonction c'est [b]Guictrlsetdata()[/b] ou pour une treeview il faut utiliser [b]GUICtrlCreateTreeViewItem()[/b][color=Green]
[/color]

_________________
[img]http://img87.imageshack.us/img87/7941/autoit6oy.jpg[/img]
[url=http://autoit-fr.realbb.net/AutoIt-v3-c2/Entraide-f5/Regles-t39.htm][i]Lisez les règles ou soyez maudit ![/i][/url]
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Contenu sponsorisé




MessageSujet: Re: Créer une chekbox si une clef de registre existe[RESOLU]   Aujourd'hui à 17:14

Revenir en haut Aller en bas
 
Créer une chekbox si une clef de registre existe[RESOLU]
Voir le sujet précédent Voir le sujet suivant Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» [Résolu] Ne peut pas ou ne trouve pas la clef usb
» l'offre clef 3G+ occasionnel à 9.90€/mois devient sans engagement
» La clef de mon forum SVP
» La clef d'activation que vous avez fournie ne correspond pas
» [Résolu] icone shredder

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
AutoIt Français :: AutoIt v3 :: Entraide-
Sauter vers: