lol_lmao Posted April 13, 2009 Share Posted April 13, 2009 Örnegin;butun checkboxları secip onlara karsılık gelen programların kurulmasını istiorum nasıl olcak bu ????? #include <ButtonConstants.au3>#include <GUIConstantsEx.au3>#include <WindowsConstants.au3>$gui = GUICreate("Form1", 633, 449, 192, 124)$btn1 = GUICtrlCreateButton("sec", 0, 320, 75, 25, 0)$btn2 = GUICtrlCreateButton("secme", 96, 320, 75, 25, 0)$btn3 = GUICtrlCreateButton("yukle", 184, 320, 75, 25, 0)$cbx1 = GUICtrlCreateCheckbox("Checkbox1", 160, 56, 97, 17)$cbx2 = GUICtrlCreateCheckbox("Checkbox2", 160, 96, 97, 17)$cbx3 = GUICtrlCreateCheckbox("Checkbox3", 160, 128, 97, 17)$cbx4 = GUICtrlCreateCheckbox("Checkbox4", 160, 168, 97, 17)$var1 = GUICtrlRead($cbx1 & $cbx2 &$cbx3 & $cbx4)GUISetState(@SW_SHOW)While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $btn1 all() Case $btn2 nonall() Case $btn3 xal() EndSwitchWEndFunc all() For $i = $cbx1 To $cbx4 GUICtrlSetState($i,$GUI_CHECKED) NextEndFuncFunc nonall() For $i = $cbx1 To $cbx4 GUICtrlSetState($i,$GUI_UNCHECKED) NextEndFuncFunc xal() If BitAND($var1,$GUI_CHECKED) Then Run(@ScriptDir & "\Pro\my.exe") Sleep(4000) Run(@ScriptDir & "\Pro\my1.exe") Sleep(4000) Run(@ScriptDir & "\Pro\my2.exe") Sleep(4000) Run(@ScriptDir & "\Pro\my3.exe") sleep(5000) EndIfEndFunc[/CODE] Link to comment Share on other sites More sharing options...
ottomandozer Posted April 14, 2009 Share Posted April 14, 2009 kardeş o checkbox işi auto play media player adındaki pro ile oluyor.araştır nette. Link to comment Share on other sites More sharing options...
lol_lmao Posted April 14, 2009 Author Share Posted April 14, 2009 Ama benim demek istedigim bu degildi,butun checkboxlar seciliyken her checkboxa karsılık gelen gorevi yurutme komutu nedir, sadece program kurmak diil ornegin ;registry ayarlarını degistircem coklu secenek sunuorum hepsini sectikten sonra gorevlerini nasıl cagırcam ??? Link to comment Share on other sites More sharing options...
Administrator sk8er_boi Posted April 14, 2009 Administrator Share Posted April 14, 2009 for i = 0 to 10 if checkbox1(i)=1 then run(textbox1(i)) next gibi bir mantıkla yapabilirsin. Şu an tam kodu yazacak vaktim yok malesef. Link to comment Share on other sites More sharing options...
lol_lmao Posted April 14, 2009 Author Share Posted April 14, 2009 Anladim ,gercekten cok tesekkur ederim adminim,cok uzun suredir bocalandigim bi noktaydi bu,sonsuz saygilar Link to comment Share on other sites More sharing options...
Recommended Posts
Archived
This topic is now archived and is closed to further replies.