Mehmet Posted November 6, 2011 Share Posted November 6, 2011 (edited) bu örnek kodu WinAPI olmadan tüm arayüze ulgulayamazmıyız [codebox] #include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #Include <WinAPI.au3> Global $aciklama = False $Form1 = GUICreate("Form1", 291, 166, 362, 188) $photoshop = GUICtrlCreateCheckbox("Photoshop", 40, 16, 217, 41, $WS_GROUP) $Label1 = GUICtrlCreateLabel("", 50, 100, 120, 27) $Mouse = ControlGetHandle(WinGetHandle('Form1'), '', '[CLASS:Button; INSTANCE:1]') GUISetState(@SW_SHOW) While 1 $tPozisyon = _WinAPI_GetMousePos() If _WinAPI_WindowFromPoint($tPozisyon) = $Mouse Then If Not $aciklama Then GUICtrlSetData($Label1,"Açıklama") $aciklama = 1 EndIf EndIf $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd [/codebox] Aıo Arayüz [codebox] #AutoIt3Wrapper_Icon=program.ico #include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #Include <Sound.Au3> $Form1 = GUICreate("Katılımsız Programlar Kasım 2011.::MeHMeT::.", 821, 570) $photoshop = GUICtrlCreateCheckbox("Photoshop Cs5", 4, 36, 121, 25) $Reader = GUICtrlCreateCheckbox("Adobe Reader", 4, 58, 121, 25) $FlashPlayer = GUICtrlCreateCheckbox("Adobe Flash Player", 4, 80, 121, 25) $FlashPaketi = GUICtrlCreateCheckbox("Flash Paketi", 4, 102, 121, 25) $Java = GUICtrlCreateCheckbox("Java", 4, 124, 121, 25) $Chrome = GUICtrlCreateCheckbox("Google Chrome", 4, 453, 89, 25) $klite = GUICtrlCreateCheckbox("K-Lite Mega Codec Pack", 4, 168, 137, 25) $eset = GUICtrlCreateCheckbox("Eset Smart Security", 4, 190, 124, 25) $CCleaner = GUICtrlCreateCheckbox("CCleaner", 4, 212, 121, 25) $DirectX = GUICtrlCreateCheckbox("DirectX 9.29", 4, 234, 121, 25) $idm = GUICtrlCreateCheckbox("Internet.Download.Manager", 4, 256, 161, 25) $avira = GUICtrlCreateCheckbox("Avira AntiVir Free", 4, 278, 121, 25) $winrar = GUICtrlCreateCheckbox("Winrar", 4, 299, 121, 25) $Uninstaller = GUICtrlCreateCheckbox("Your Uninstaller7", 4, 321, 110, 25) $nero = GUICtrlCreateCheckbox("Nero Lite", 4, 346, 110, 18) $office = GUICtrlCreateCheckbox("Office 2007", 4, 365, 121, 25) $framework = GUICtrlCreateCheckbox("NET Framework AIO", 4, 387, 129, 25) $winamp = GUICtrlCreateCheckbox("Winamp", 4, 409, 73, 25) $ultraiso = GUICtrlCreateCheckbox("Ultra İso", 4, 431, 73, 25) $teamviewer = GUICtrlCreateCheckbox("Team Viewer", 4, 146, 121, 25) $turing = GUICtrlCreateCheckbox("Turing", 4, 519, 121, 25) $nameiso = GUICtrlCreateButton("N", 114, 435, 18, 17) GUICtrlSetFont(-1, 7, 400, 0, "MS Sans Serif") GUICtrlSetTip(-1, "Name Kopyala") $serialiso = GUICtrlCreateButton("S", 134, 435, 18, 17) GUICtrlSetFont(-1, 7, 400, 0, "MS Sans Serif") GUICtrlSetTip(-1, "Serial Kopyala") $label1 = GUICtrlCreateLabel("", 232, 408, 188, 17) $mny = GUICtrlCreateButton("?", 4, 544, 121, 20) GUICtrlSetTip(-1, "©MNY@") $tumusec = GUICtrlCreateButton("Tümünü Seç", 680, 70, 127, 55) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0x0000FF) $secme = GUICtrlCreateButton("Seçme", 548, 70, 127, 55) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0x0000FF) $kuran = GUICtrlCreateCheckbox("Kuran-ı Kerim Pro", 184, 37, 121, 25) $namazhoca = GUICtrlCreateCheckbox("Namaz Hocası", 184, 67, 121, 25) $osmanlitanitim = GUICtrlCreateCheckbox("Osmanlı Tanıtımı", 184, 97, 121, 25) $osmanlitarihi = GUICtrlCreateCheckbox("Osmanlılar Tarihi", 184, 127, 121, 25) $turkiyetanitim = GUICtrlCreateCheckbox("Türkiye Tanıtımı", 184, 157, 121, 25) $turklerv2 = GUICtrlCreateCheckbox("Türkler v2", 184, 187, 121, 25) $yahoo = GUICtrlCreateCheckbox("Yahoo Messenger", 401, 35, 121, 25) $skype = GUICtrlCreateCheckbox("Skype", 401, 66, 121, 25) $googletalk = GUICtrlCreateCheckbox("Google Talk", 401, 96, 121, 25) $camfrog = GUICtrlCreateCheckbox("Camfrog", 401, 126, 121, 25) $windowsmessenger = GUICtrlCreateCheckbox("Windows Live Messenger", 401, 156, 145, 25) $ucakoyunu = GUICtrlCreateCheckbox("HyperSpace Invader", 184, 260, 121, 25) $kucukoyun = GUICtrlCreateCheckbox("Karışık Küçük Oyunlar", 184, 290, 121, 25) $satranc = GUICtrlCreateCheckbox("3D Satranç", 184, 321, 121, 25) $zurna = GUICtrlCreateCheckbox("Zurna Mirc", 401, 260, 121, 25) $kelebek = GUICtrlCreateCheckbox("Kelebek FinaL4", 401, 290, 121, 25) $geveze = GUICtrlCreateCheckbox("Geveze Mirc", 401, 321, 121, 25) $yuzuk = GUICtrlCreateCheckbox("Yüzük", 401, 351, 121, 25) $agbaglantilar = GUICtrlCreateButton("Ağ Bağlantıları", 548, 150, 127, 35) $aygityonetici = GUICtrlCreateButton("Aygıt Yöneticisi", 548, 192, 127, 35) $guvenlikduvar = GUICtrlCreateButton("Güvenlik Duvarı", 548, 234, 127, 35) $hizmetler = GUICtrlCreateButton("Hizmetler", 548, 276, 127, 35) $kullanicihesap = GUICtrlCreateButton("Kullanıcı Hesapları", 548, 318, 127, 35) $otoguncelleme = GUICtrlCreateButton("Oto Güncelleştirmeler", 548, 360, 127, 35) $sistemozellik = GUICtrlCreateButton("Sistem Özellikleri", 548, 402, 127, 35) $programeklekaldir = GUICtrlCreateButton("Program Ekle Kaldır", 548, 444, 127, 35) $hostsdefault = GUICtrlCreateButton("Hosts Default", 680, 150, 127, 35) $hostsidm = GUICtrlCreateButton("Hosts İDM", 680, 192, 127, 35) $hostsidmyaz = GUICtrlCreateButton("Hosts İDMYAZ", 680, 234, 127, 35) $coklumsn = GUICtrlCreateButton("Çoklu Msn", 680, 276, 127, 35) $kilitac = GUICtrlCreateButton("Kilitaç Google", 680, 318, 127, 35) $oksil = GUICtrlCreateButton("Kısa Yol Ok Sil", 680, 360, 127, 35) $okgerial = GUICtrlCreateButton("Kısa Yol Ok Geri Al", 680, 402, 127, 35) $driver = GUICtrlCreateButton("Driver", 680, 444, 127, 35) $play = GUICtrlCreateButton("Pause", 680, 485, 127, 35) GUICtrlSetTip(-1, "Müzik Kapat") $denetimmasa = GUICtrlCreateButton("Denetim Masası", 548, 485, 127, 35) $oyun = GUICtrlCreateButton("Oyun", 184, 223, 91, 33) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0xFF0000) $chat = GUICtrlCreateButton("Chat Script", 401, 223, 91, 33) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0xFF0000) $sistem = GUICtrlCreateButton("Sistem", 3, 3, 91, 33) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0xFF0000) $osmanliturkdini = GUICtrlCreateButton("Karma", 183, 3, 99, 33) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0xFF0000) $messenger = GUICtrlCreateButton("Messenger", 401, 3, 91, 33) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0xFF0000) $calistir = GUICtrlCreateButton("Çalıştır", 549, 3, 258, 55) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") $mtu = GUICtrlCreateCheckbox("Mtu Sözlük", 4, 497, 121, 25) $mozilla = GUICtrlCreateCheckbox("Mozilla Firefox", 4, 475, 121, 25) $internetozellik = GUICtrlCreateButton("İnternet Özellikleri", 548, 525, 127, 35) $cikis = GUICtrlCreateButton("Çıkış", 680, 525, 127, 35) GUICtrlSetTip(-1, "Programdan Çık") $name = GUICtrlCreateButton("N", 114, 328, 18, 17) GUICtrlSetFont(-1, 7, 400, 0, "MS Sans Serif") GUICtrlSetTip(-1, "Name Kopyala") $serial = GUICtrlCreateButton("S", 134, 328, 18, 17) GUICtrlSetFont(-1, 7, 400, 0, "MS Sans Serif") GUICtrlSetTip(-1, "Serial Kopyala") DirCreate(@TempDir & "\mny") FileInstall("resim.gif", @TempDir & "\mny\resim.gif") $PIC1 = GUICtrlCreatePic(@TempDir & "\mny\resim.gif", 176, 462, 345, 97) FileInstall("Ses.mp3", @TempDir & "\mny\Ses.mp3") Sleep(1000) SoundPlay(@TempDir & "\mny\Ses.mp3",0) SoundSetWaveVolume(50) WinSetTrans($Form1, "", 195) GUISetState(@SW_SHOW) GUISetBkColor (0xffffff) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE DirRemove(@TempDir & "\mny", 1) ExitLoop Case $cikis DirRemove(@TempDir & "\mny", 1) Exit Case $play If GUICtrlRead($play) = "Pause" Then GUICtrlSetData($play, "Play") SoundPlay("") Else GUICtrlSetData($play, "Pause") SoundPlay(@TempDir & "\mny\Ses.mp3",0) EndIf Case $driver RunWait("Programs\Driverkur\DriverPackSolution.exe") ;hakkında Case $mny Msgbox(64,"Hakkında","TnCtR" & @CRLF & _ "Programın yapılış amacı Katılımsız Kurulum içindir." & @crlf & _ "Program AutoIt v3 ile kodlanmıştır" & @CRLF & _ "İyi günlerde kullanmanız dileğiyle" ,10,$Form1) Case $nameiso ClipPut("MeHMeT") Case $serialiso ClipPut("0B1F-9F39-37E6-C63F") ;SİSTEM ÖZELLİK Case $internetozellik RunWait("Extra\sistem özellik\internetozellik.exe") Case $denetimmasa RunWait("Extra\sistem özellik\denetimmasasi.exe") Case $agbaglantilar RunWait("Extra\sistem özellik\Ağbaglantilari.exe") Case $guvenlikduvar RunWait("Extra\sistem özellik\Güvenlikduvari.exe") Case $kullanicihesap RunWait("Extra\sistem özellik\Kullanicihesaplari.exe") Case $otoguncelleme RunWait("Extra\sistem özellik\Otogüncelleme.exe") Case $aygityonetici RunWait("Extra\sistem özellik\Aygityoneticisi.exe") Case $hizmetler RunWait("Extra\sistem özellik\Hizmetler.exe") Case $programeklekaldir RunWait("Extra\sistem özellik\Programeklekaldir.exe") Case $sistemozellik RunWait("Extra\sistem özellik\Sistemozellikleri.exe") ;AYAR Case $hostsdefault RunWait("Extra\ayar\Hostsdefault.exe") Case $hostsidm RunWait("Extra\ayar\HostsİDM.exe") Case $hostsidmyaz RunWait("Extra\ayar\HostsİDMYAZ.exe") Case $coklumsn RunWait("Extra\ayar\ÇokluMsn.exe") Case $kilitac RunWait("Extra\ayar\KilitaçGoogle.exe") Case $oksil RunWait("Extra\ayar\Oksil.exe") Case $okgerial RunWait("Extra\ayar\Okgerial.exe") Case $name ClipPut("MeHMeT") Case $serial ClipPut("000014-QET0RE-W2MYUA-P5V5Z9-QC44JK-12UCYE-1EPH1U-RQADZ8-8RJ475-N2N57D ") Case $tumusec GUICtrlSetState($photoshop,$GUI_CHECKED) GUICtrlSetState($Reader,$GUI_CHECKED) GUICtrlSetState($FlashPlayer,$GUI_CHECKED) GUICtrlSetState($FlashPaketi,$GUI_CHECKED) GUICtrlSetState($Java,$GUI_CHECKED) GUICtrlSetState($Chrome,$GUI_CHECKED) GUICtrlSetState($klite,$GUI_CHECKED) GUICtrlSetState($eset,$GUI_CHECKED) GUICtrlSetState($CCleaner,$GUI_CHECKED) GUICtrlSetState($DirectX,$GUI_CHECKED) GUICtrlSetState($idm,$GUI_CHECKED) GUICtrlSetState($avira,$GUI_CHECKED) GUICtrlSetState($winrar,$GUI_CHECKED) GUICtrlSetState($Uninstaller,$GUI_CHECKED) GUICtrlSetState($nero,$GUI_CHECKED) GUICtrlSetState($office,$GUI_CHECKED) GUICtrlSetState($framework,$GUI_CHECKED) GUICtrlSetState($winamp,$GUI_CHECKED) GUICtrlSetState($ultraiso,$GUI_CHECKED) GUICtrlSetState($teamviewer,$GUI_CHECKED) GUICtrlSetState($turing,$GUI_CHECKED) GUICtrlSetState($mtu,$GUI_CHECKED) GUICtrlSetState($kuran,$GUI_CHECKED) GUICtrlSetState($namazhoca,$GUI_CHECKED) GUICtrlSetState($osmanlitanitim,$GUI_CHECKED) GUICtrlSetState($osmanlitarihi,$GUI_CHECKED) GUICtrlSetState($turkiyetanitim,$GUI_CHECKED) GUICtrlSetState($turklerv2,$GUI_CHECKED) GUICtrlSetState($yahoo,$GUI_CHECKED) GUICtrlSetState($skype,$GUI_CHECKED) GUICtrlSetState($googletalk,$GUI_CHECKED) GUICtrlSetState($camfrog,$GUI_CHECKED) GUICtrlSetState($windowsmessenger,$GUI_CHECKED) GUICtrlSetState($ucakoyunu,$GUI_CHECKED) GUICtrlSetState($kucukoyun,$GUI_CHECKED) GUICtrlSetState($satranc,$GUI_CHECKED) GUICtrlSetState($zurna,$GUI_CHECKED) GUICtrlSetState($kelebek,$GUI_CHECKED) GUICtrlSetState($geveze,$GUI_CHECKED) GUICtrlSetState($yuzuk,$GUI_CHECKED) GUICtrlSetState($mozilla,$GUI_CHECKED) Case $sistem GUICtrlSetState($photoshop,$GUI_CHECKED) GUICtrlSetState($Reader,$GUI_CHECKED) GUICtrlSetState($FlashPlayer,$GUI_CHECKED) GUICtrlSetState($FlashPaketi,$GUI_CHECKED) GUICtrlSetState($Java,$GUI_CHECKED) GUICtrlSetState($Chrome,$GUI_CHECKED) GUICtrlSetState($klite,$GUI_CHECKED) GUICtrlSetState($eset,$GUI_CHECKED) GUICtrlSetState($CCleaner,$GUI_CHECKED) GUICtrlSetState($DirectX,$GUI_CHECKED) GUICtrlSetState($idm,$GUI_CHECKED) GUICtrlSetState($avira,$GUI_CHECKED) GUICtrlSetState($winrar,$GUI_CHECKED) GUICtrlSetState($Uninstaller,$GUI_CHECKED) GUICtrlSetState($nero,$GUI_CHECKED) GUICtrlSetState($office,$GUI_CHECKED) GUICtrlSetState($framework,$GUI_CHECKED) GUICtrlSetState($winamp,$GUI_CHECKED) GUICtrlSetState($ultraiso,$GUI_CHECKED) GUICtrlSetState($teamviewer,$GUI_CHECKED) GUICtrlSetState($turing,$GUI_CHECKED) GUICtrlSetState($mtu,$GUI_CHECKED) GUICtrlSetState($mozilla,$GUI_CHECKED) Case $osmanliturkdini GUICtrlSetState($kuran,$GUI_CHECKED) GUICtrlSetState($namazhoca,$GUI_CHECKED) GUICtrlSetState($osmanlitanitim,$GUI_CHECKED) GUICtrlSetState($osmanlitarihi,$GUI_CHECKED) GUICtrlSetState($turkiyetanitim,$GUI_CHECKED) GUICtrlSetState($turklerv2,$GUI_CHECKED) Case $oyun GUICtrlSetState($ucakoyunu,$GUI_CHECKED) GUICtrlSetState($kucukoyun,$GUI_CHECKED) GUICtrlSetState($satranc,$GUI_CHECKED) Case $messenger GUICtrlSetState($yahoo,$GUI_CHECKED) GUICtrlSetState($skype,$GUI_CHECKED) GUICtrlSetState($googletalk,$GUI_CHECKED) GUICtrlSetState($camfrog,$GUI_CHECKED) GUICtrlSetState($windowsmessenger,$GUI_CHECKED) Case $chat GUICtrlSetState($zurna,$GUI_CHECKED) GUICtrlSetState($kelebek,$GUI_CHECKED) GUICtrlSetState($geveze,$GUI_CHECKED) GUICtrlSetState($yuzuk,$GUI_CHECKED) case $calistir If GUICtrlRead($photoshop)=1 then RunWait("Programs\sistem\APCS5E.x86.exe") If GUICtrlRead($Reader)=1 then RunWait("Programs\sistem\AdobeReader1010TR.exe") If GUICtrlRead($FlashPlayer)=1 then RunWait("Programs\sistem\Adobe-flash-player-11-32bit-21Ekim2011Cuma.exe") If GUICtrlRead($FlashPaketi)=1 then RunWait("Programs\sistem\Flash Paketi 3.1.1 (x86-x64).exe") If GUICtrlRead($Java)=1 then RunWait("Programs\sistem\Java Runtime Environment 7.0.exe") If GUICtrlRead($Chrome)=1 then RunWait("Programs\sistem\Googlechrome.exe") If GUICtrlRead($klite)=1 then RunWait("Programs\sistem\K-Lite Mega Codec Pack.exe") If GUICtrlRead($eset)=1 then RunWait("Programs\sistem\Eset Smart Security 5.0.84 x86.exe") If GUICtrlRead($CCleaner)=1 then RunWait("Programs\sistem\CCleaner.exe") If GUICtrlRead($DirectX)=1 then RunWait("Programs\sistem\DirectX 9.29.1974 (Nisan-2011)(x86-x64).exe") If GUICtrlRead($idm)=1 then RunWait("Programs\sistem\İDM.exe") If GUICtrlRead($avira)=1 then RunWait("Programs\sistem\Avira AntiVir Free 10.0.0.609.exe") If GUICtrlRead($winrar)=1 then RunWait("Programs\sistem\Winrar 4.01 TR.exe") If GUICtrlRead($Uninstaller)=1 then RunWait("Programs\sistem\YourUninstaller7.exe") If GUICtrlRead($nero)=1 then RunWait("Programs\sistem\Nero Lite 9.4.26.0.exe") If GUICtrlRead($office)=1 then RunWait("Programs\sistem\Office 2007.exe") If GUICtrlRead($framework)=1 then RunWait("Programs\sistem\NETAIO.exe") If GUICtrlRead($winamp)=1 then RunWait("Programs\sistem\Winamp.2.95.Extreme.TR.exe") If GUICtrlRead($ultraiso)=1 then RunWait("Programs\sistem\uiso9_pe.exe") If GUICtrlRead($teamviewer)=1 then RunWait("Programs\sistem\TeamViewer6.0.11117.0.exe") If GUICtrlRead($turing)=1 then RunWait("Programs\sistem\Turing.exe") If GUICtrlRead($mtu)=1 then RunWait("Programs\sistem\Mtusozluk.exe") If GUICtrlRead($mozilla)=1 then RunWait("Programs\sistem\firefox7.exe") If GUICtrlRead($kuran)=1 then RunWait("Programs\osmanlı-türkiye-dini programlar\Kuransetup.exe") If GUICtrlRead($namazhoca)=1 then RunWait("Programs\osmanlı-türkiye-dini programlar\Namaz.exe") If GUICtrlRead($osmanlitanitim)=1 then RunWait("Programs\osmanlı-türkiye-dini programlar\Osmanlitanitim.exe") If GUICtrlRead($osmanlitarihi)=1 then RunWait("Programs\osmanlı-türkiye-dini programlar\osmanlilar.exe") If GUICtrlRead($turkiyetanitim)=1 then RunWait("Programs\osmanlı-türkiye-dini programlar\Türkiyetanitim.exe") If GUICtrlRead($turklerv2)=1 then RunWait("Programs\osmanlı-türkiye-dini programlar\Türkler.exe") If GUICtrlRead($yahoo)=1 then RunWait("Programs\messenger\Yahoomessenger11.exe") If GUICtrlRead($skype)=1 then RunWait("Programs\messenger\Skype5.6.0.110.exe") If GUICtrlRead($googletalk)=1 then RunWait("Programs\messenger\GoogleTalk.exe") If GUICtrlRead($camfrog)=1 then RunWait("Programs\messenger\Camfrog Video Chat 6.1.136.exe") If GUICtrlRead($windowsmessenger)=1 then RunWait("Programs\messenger\windowslivemessenger.exe") If GUICtrlRead($ucakoyunu)=1 then RunWait("Programs\oyun\Ucakoyunu.exe") If GUICtrlRead($kucukoyun)=1 then RunWait("Programs\oyun\oyunkarisik.EXE") If GUICtrlRead($satranc)=1 then RunWait("Programs\oyun\3Dsatrancv3.02.exe") If GUICtrlRead($zurna)=1 then RunWait("Programs\chat\Zurnamirc.exe") If GUICtrlRead($kelebek)=1 then RunWait("Programs\chat\Kelebek FinaL4.exe") If GUICtrlRead($geveze)=1 then RunWait("Programs\chat\Gevezescript.exe") If GUICtrlRead($yuzuk)=1 then RunWait("Programs\chat\yuzuk.exe") Case $secme GUICtrlSetState($photoshop,$GUI_UNCHECKED) GUICtrlSetState($Reader,$GUI_UNCHECKED) GUICtrlSetState($FlashPlayer,$GUI_UNCHECKED) GUICtrlSetState($FlashPaketi,$GUI_UNCHECKED) GUICtrlSetState($Java,$GUI_UNCHECKED) GUICtrlSetState($Chrome,$GUI_UNCHECKED) GUICtrlSetState($klite,$GUI_UNCHECKED) GUICtrlSetState($eset,$GUI_UNCHECKED) GUICtrlSetState($CCleaner,$GUI_UNCHECKED) GUICtrlSetState($DirectX,$GUI_UNCHECKED) GUICtrlSetState($idm,$GUI_UNCHECKED) GUICtrlSetState($avira,$GUI_UNCHECKED) GUICtrlSetState($winrar,$GUI_UNCHECKED) GUICtrlSetState($Uninstaller,$GUI_UNCHECKED) GUICtrlSetState($nero,$GUI_UNCHECKED) GUICtrlSetState($office,$GUI_UNCHECKED) GUICtrlSetState($framework,$GUI_UNCHECKED) GUICtrlSetState($winamp,$GUI_UNCHECKED) GUICtrlSetState($ultraiso,$GUI_UNCHECKED) GUICtrlSetState($teamviewer,$GUI_UNCHECKED) GUICtrlSetState($turing,$GUI_UNCHECKED) GUICtrlSetState($kuran,$GUI_UNCHECKED) GUICtrlSetState($namazhoca,$GUI_UNCHECKED) GUICtrlSetState($osmanlitanitim,$GUI_UNCHECKED) GUICtrlSetState($osmanlitarihi,$GUI_UNCHECKED) GUICtrlSetState($turkiyetanitim,$GUI_UNCHECKED) GUICtrlSetState($turklerv2,$GUI_UNCHECKED) GUICtrlSetState($yahoo,$GUI_UNCHECKED) GUICtrlSetState($skype,$GUI_UNCHECKED) GUICtrlSetState($googletalk,$GUI_UNCHECKED) GUICtrlSetState($camfrog,$GUI_UNCHECKED) GUICtrlSetState($windowsmessenger,$GUI_UNCHECKED) GUICtrlSetState($ucakoyunu,$GUI_UNCHECKED) GUICtrlSetState($kucukoyun,$GUI_UNCHECKED) GUICtrlSetState($satranc,$GUI_UNCHECKED) GUICtrlSetState($zurna,$GUI_UNCHECKED) GUICtrlSetState($kelebek,$GUI_UNCHECKED) GUICtrlSetState($geveze,$GUI_UNCHECKED) GUICtrlSetState($yuzuk,$GUI_UNCHECKED) GUICtrlSetState($mtu,$GUI_UNCHECKED) GUICtrlSetState($mozilla,$GUI_UNCHECKED) EndSwitch WEnd [/codebox] Edited November 7, 2011 by blue_life Forum görünümünü bozduğu için uzun kod düzenlendi! Quote Link to comment Share on other sites More sharing options...
MostWanted Posted November 6, 2011 Share Posted November 6, 2011 (edited) WinApi olmadan ControlHover diye bi udf var ancak onla yapabiliriz.Yani aynı mantık istersen örnek yaparım. Edited November 6, 2011 by MostWanted Quote Link to comment Share on other sites More sharing options...
Mehmet Posted November 6, 2011 Author Share Posted November 6, 2011 olur MostWanted neden olmasın ama en basit örnekle verebilirsen sevinirim yani çok karışık olmasın üstad Quote Link to comment Share on other sites More sharing options...
MostWanted Posted November 6, 2011 Share Posted November 6, 2011 (edited) [codebox]#AutoIt3Wrapper_Icon=program.ico #include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #Include <Sound.Au3> #include <ControlHover.au3> $Form1 = GUICreate("Katılımsız Programlar Kasım 2011.::MeHMeT::.", 821, 570) $photoshop = GUICtrlCreateCheckbox("Photoshop Cs5", 4, 36, 121, 25) _ControlHover(2, "", $photoshop) $Reader = GUICtrlCreateCheckbox("Adobe Reader", 4, 58, 121, 25) _ControlHover(2, "", $Reader) $FlashPlayer = GUICtrlCreateCheckbox("Adobe Flash Player", 4, 80, 121, 25) _ControlHover(2, "", $FlashPlayer) $FlashPaketi = GUICtrlCreateCheckbox("Flash Paketi", 4, 102, 121, 25) $Java = GUICtrlCreateCheckbox("Java", 4, 124, 121, 25) $Chrome = GUICtrlCreateCheckbox("Google Chrome", 4, 453, 89, 25) $klite = GUICtrlCreateCheckbox("K-Lite Mega Codec Pack", 4, 168, 137, 25) $eset = GUICtrlCreateCheckbox("Eset Smart Security", 4, 190, 124, 25) $CCleaner = GUICtrlCreateCheckbox("CCleaner", 4, 212, 121, 25) $DirectX = GUICtrlCreateCheckbox("DirectX 9.29", 4, 234, 121, 25) $idm = GUICtrlCreateCheckbox("Internet.Download.Manager", 4, 256, 161, 25) $avira = GUICtrlCreateCheckbox("Avira AntiVir Free", 4, 278, 121, 25) $winrar = GUICtrlCreateCheckbox("Winrar", 4, 299, 121, 25) $Uninstaller = GUICtrlCreateCheckbox("Your Uninstaller7", 4, 321, 110, 25) $nero = GUICtrlCreateCheckbox("Nero Lite", 4, 346, 110, 18) $office = GUICtrlCreateCheckbox("Office 2007", 4, 365, 121, 25) $framework = GUICtrlCreateCheckbox("NET Framework AIO", 4, 387, 129, 25) $winamp = GUICtrlCreateCheckbox("Winamp", 4, 409, 73, 25) $ultraiso = GUICtrlCreateCheckbox("Ultra İso", 4, 431, 73, 25) $teamviewer = GUICtrlCreateCheckbox("Team Viewer", 4, 146, 121, 25) $turing = GUICtrlCreateCheckbox("Turing", 4, 519, 121, 25) $nameiso = GUICtrlCreateButton("N", 114, 435, 18, 17) GUICtrlSetFont(-1, 7, 400, 0, "MS Sans Serif") GUICtrlSetTip(-1, "Name Kopyala") $serialiso = GUICtrlCreateButton("S", 134, 435, 18, 17) GUICtrlSetFont(-1, 7, 400, 0, "MS Sans Serif") GUICtrlSetTip(-1, "Serial Kopyala") $label1 = GUICtrlCreateLabel("", 232, 408, 188, 17) $mny = GUICtrlCreateButton("?", 4, 544, 121, 20) GUICtrlSetTip(-1, "©MNY@") $tumusec = GUICtrlCreateButton("Tümünü Seç", 680, 70, 127, 55) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0x0000FF) $secme = GUICtrlCreateButton("Seçme", 548, 70, 127, 55) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0x0000FF) $kuran = GUICtrlCreateCheckbox("Kuran-ı Kerim Pro", 184, 37, 121, 25) $namazhoca = GUICtrlCreateCheckbox("Namaz Hocası", 184, 67, 121, 25) $osmanlitanitim = GUICtrlCreateCheckbox("Osmanlı Tanıtımı", 184, 97, 121, 25) $osmanlitarihi = GUICtrlCreateCheckbox("Osmanlılar Tarihi", 184, 127, 121, 25) $turkiyetanitim = GUICtrlCreateCheckbox("Türkiye Tanıtımı", 184, 157, 121, 25) $turklerv2 = GUICtrlCreateCheckbox("Türkler v2", 184, 187, 121, 25) $yahoo = GUICtrlCreateCheckbox("Yahoo Messenger", 401, 35, 121, 25) $skype = GUICtrlCreateCheckbox("Skype", 401, 66, 121, 25) $googletalk = GUICtrlCreateCheckbox("Google Talk", 401, 96, 121, 25) $camfrog = GUICtrlCreateCheckbox("Camfrog", 401, 126, 121, 25) $windowsmessenger = GUICtrlCreateCheckbox("Windows Live Messenger", 401, 156, 145, 25) $ucakoyunu = GUICtrlCreateCheckbox("HyperSpace Invader", 184, 260, 121, 25) $kucukoyun = GUICtrlCreateCheckbox("Karışık Küçük Oyunlar", 184, 290, 121, 25) $satranc = GUICtrlCreateCheckbox("3D Satranç", 184, 321, 121, 25) $zurna = GUICtrlCreateCheckbox("Zurna Mirc", 401, 260, 121, 25) $kelebek = GUICtrlCreateCheckbox("Kelebek FinaL4", 401, 290, 121, 25) $geveze = GUICtrlCreateCheckbox("Geveze Mirc", 401, 321, 121, 25) $yuzuk = GUICtrlCreateCheckbox("Yüzük", 401, 351, 121, 25) $agbaglantilar = GUICtrlCreateButton("Ağ Bağlantıları", 548, 150, 127, 35) $aygityonetici = GUICtrlCreateButton("Aygıt Yöneticisi", 548, 192, 127, 35) $guvenlikduvar = GUICtrlCreateButton("Güvenlik Duvarı", 548, 234, 127, 35) $hizmetler = GUICtrlCreateButton("Hizmetler", 548, 276, 127, 35) $kullanicihesap = GUICtrlCreateButton("Kullanıcı Hesapları", 548, 318, 127, 35) $otoguncelleme = GUICtrlCreateButton("Oto Güncelleştirmeler", 548, 360, 127, 35) $sistemozellik = GUICtrlCreateButton("Sistem Özellikleri", 548, 402, 127, 35) $programeklekaldir = GUICtrlCreateButton("Program Ekle Kaldır", 548, 444, 127, 35) $hostsdefault = GUICtrlCreateButton("Hosts Default", 680, 150, 127, 35) $hostsidm = GUICtrlCreateButton("Hosts İDM", 680, 192, 127, 35) $hostsidmyaz = GUICtrlCreateButton("Hosts İDMYAZ", 680, 234, 127, 35) $coklumsn = GUICtrlCreateButton("Çoklu Msn", 680, 276, 127, 35) $kilitac = GUICtrlCreateButton("Kilitaç Google", 680, 318, 127, 35) $oksil = GUICtrlCreateButton("Kısa Yol Ok Sil", 680, 360, 127, 35) $okgerial = GUICtrlCreateButton("Kısa Yol Ok Geri Al", 680, 402, 127, 35) $driver = GUICtrlCreateButton("Driver", 680, 444, 127, 35) $play = GUICtrlCreateButton("Pause", 680, 485, 127, 35) GUICtrlSetTip(-1, "Müzik Kapat") $denetimmasa = GUICtrlCreateButton("Denetim Masası", 548, 485, 127, 35) $oyun = GUICtrlCreateButton("Oyun", 184, 223, 91, 33) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0xFF0000) $chat = GUICtrlCreateButton("Chat Script", 401, 223, 91, 33) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0xFF0000) $sistem = GUICtrlCreateButton("Sistem", 3, 3, 91, 33) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0xFF0000) $osmanliturkdini = GUICtrlCreateButton("Karma", 183, 3, 99, 33) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0xFF0000) $messenger = GUICtrlCreateButton("Messenger", 401, 3, 91, 33) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0xFF0000) $calistir = GUICtrlCreateButton("Çalıştır", 549, 3, 258, 55) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") $mtu = GUICtrlCreateCheckbox("Mtu Sözlük", 4, 497, 121, 25) $mozilla = GUICtrlCreateCheckbox("Mozilla Firefox", 4, 475, 121, 25) $internetozellik = GUICtrlCreateButton("İnternet Özellikleri", 548, 525, 127, 35) $cikis = GUICtrlCreateButton("Çıkış", 680, 525, 127, 35) GUICtrlSetTip(-1, "Programdan Çık") $name = GUICtrlCreateButton("N", 114, 328, 18, 17) GUICtrlSetFont(-1, 7, 400, 0, "MS Sans Serif") GUICtrlSetTip(-1, "Name Kopyala") $serial = GUICtrlCreateButton("S", 134, 328, 18, 17) GUICtrlSetFont(-1, 7, 400, 0, "MS Sans Serif") GUICtrlSetTip(-1, "Serial Kopyala") DirCreate(@TempDir & "\mny") FileInstall("resim.gif", @TempDir & "\mny\resim.gif") $PIC1 = GUICtrlCreatePic(@TempDir & "\mny\resim.gif", 176, 462, 345, 97) FileInstall("Ses.mp3", @TempDir & "\mny\Ses.mp3") Sleep(1000) SoundPlay(@TempDir & "\mny\Ses.mp3",0) SoundSetWaveVolume(50) WinSetTrans($Form1, "", 195) GUISetState(@SW_SHOW) GUISetBkColor (0xffffff) While 1 $Over = _ControlHover(0, $Form1) If $Over = 1 Then Switch @extended Case $photoshop bilgiver("Photoshop bilgisi") case $Reader bilgiver("Reader bilgisi") Case $FlashPlayer bilgiver("Flash Player bilgisi") Case Else bilgiver("") EndSwitch EndIf $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE DirRemove(@TempDir & "\mny", 1) ExitLoop Case $cikis DirRemove(@TempDir & "\mny", 1) Exit Case $play If GUICtrlRead($play) = "Pause" Then GUICtrlSetData($play, "Play") SoundPlay("") Else GUICtrlSetData($play, "Pause") SoundPlay(@TempDir & "\mny\Ses.mp3",0) EndIf Case $driver RunWait("Programs\Driverkur\DriverPackSolution.exe") ;hakkında Case $mny Msgbox(64,"Hakkında","TnCtR" & @CRLF & _ "Programın yapılış amacı Katılımsız Kurulum içindir." & @crlf & _ "Program AutoIt v3 ile kodlanmıştır" & @CRLF & _ "İyi günlerde kullanmanız dileğiyle" ,10,$Form1) Case $nameiso ClipPut("MeHMeT") Case $serialiso ClipPut("0B1F-9F39-37E6-C63F") ;SİSTEM ÖZELLİK Case $internetozellik RunWait("Extra\sistem özellik\internetozellik.exe") Case $denetimmasa RunWait("Extra\sistem özellik\denetimmasasi.exe") Case $agbaglantilar RunWait("Extra\sistem özellik\Ağbaglantilari.exe") Case $guvenlikduvar RunWait("Extra\sistem özellik\Güvenlikduvari.exe") Case $kullanicihesap RunWait("Extra\sistem özellik\Kullanicihesaplari.exe") Case $otoguncelleme RunWait("Extra\sistem özellik\Otogüncelleme.exe") Case $aygityonetici RunWait("Extra\sistem özellik\Aygityoneticisi.exe") Case $hizmetler RunWait("Extra\sistem özellik\Hizmetler.exe") Case $programeklekaldir RunWait("Extra\sistem özellik\Programeklekaldir.exe") Case $sistemozellik RunWait("Extra\sistem özellik\Sistemozellikleri.exe") ;AYAR Case $hostsdefault RunWait("Extra\ayar\Hostsdefault.exe") Case $hostsidm RunWait("Extra\ayar\HostsİDM.exe") Case $hostsidmyaz RunWait("Extra\ayar\HostsİDMYAZ.exe") Case $coklumsn RunWait("Extra\ayar\ÇokluMsn.exe") Case $kilitac RunWait("Extra\ayar\KilitaçGoogle.exe") Case $oksil RunWait("Extra\ayar\Oksil.exe") Case $okgerial RunWait("Extra\ayar\Okgerial.exe") Case $name ClipPut("MeHMeT") Case $serial ClipPut("000014-QET0RE-W2MYUA-P5V5Z9-QC44JK-12UCYE-1EPH1U-RQADZ8-8RJ475-N2N57D ") Case $tumusec GUICtrlSetState($photoshop,$GUI_CHECKED) GUICtrlSetState($Reader,$GUI_CHECKED) GUICtrlSetState($FlashPlayer,$GUI_CHECKED) GUICtrlSetState($FlashPaketi,$GUI_CHECKED) GUICtrlSetState($Java,$GUI_CHECKED) GUICtrlSetState($Chrome,$GUI_CHECKED) GUICtrlSetState($klite,$GUI_CHECKED) GUICtrlSetState($eset,$GUI_CHECKED) GUICtrlSetState($CCleaner,$GUI_CHECKED) GUICtrlSetState($DirectX,$GUI_CHECKED) GUICtrlSetState($idm,$GUI_CHECKED) GUICtrlSetState($avira,$GUI_CHECKED) GUICtrlSetState($winrar,$GUI_CHECKED) GUICtrlSetState($Uninstaller,$GUI_CHECKED) GUICtrlSetState($nero,$GUI_CHECKED) GUICtrlSetState($office,$GUI_CHECKED) GUICtrlSetState($framework,$GUI_CHECKED) GUICtrlSetState($winamp,$GUI_CHECKED) GUICtrlSetState($ultraiso,$GUI_CHECKED) GUICtrlSetState($teamviewer,$GUI_CHECKED) GUICtrlSetState($turing,$GUI_CHECKED) GUICtrlSetState($mtu,$GUI_CHECKED) GUICtrlSetState($kuran,$GUI_CHECKED) GUICtrlSetState($namazhoca,$GUI_CHECKED) GUICtrlSetState($osmanlitanitim,$GUI_CHECKED) GUICtrlSetState($osmanlitarihi,$GUI_CHECKED) GUICtrlSetState($turkiyetanitim,$GUI_CHECKED) GUICtrlSetState($turklerv2,$GUI_CHECKED) GUICtrlSetState($yahoo,$GUI_CHECKED) GUICtrlSetState($skype,$GUI_CHECKED) GUICtrlSetState($googletalk,$GUI_CHECKED) GUICtrlSetState($camfrog,$GUI_CHECKED) GUICtrlSetState($windowsmessenger,$GUI_CHECKED) GUICtrlSetState($ucakoyunu,$GUI_CHECKED) GUICtrlSetState($kucukoyun,$GUI_CHECKED) GUICtrlSetState($satranc,$GUI_CHECKED) GUICtrlSetState($zurna,$GUI_CHECKED) GUICtrlSetState($kelebek,$GUI_CHECKED) GUICtrlSetState($geveze,$GUI_CHECKED) GUICtrlSetState($yuzuk,$GUI_CHECKED) GUICtrlSetState($mozilla,$GUI_CHECKED) Case $sistem GUICtrlSetState($photoshop,$GUI_CHECKED) GUICtrlSetState($Reader,$GUI_CHECKED) GUICtrlSetState($FlashPlayer,$GUI_CHECKED) GUICtrlSetState($FlashPaketi,$GUI_CHECKED) GUICtrlSetState($Java,$GUI_CHECKED) GUICtrlSetState($Chrome,$GUI_CHECKED) GUICtrlSetState($klite,$GUI_CHECKED) GUICtrlSetState($eset,$GUI_CHECKED) GUICtrlSetState($CCleaner,$GUI_CHECKED) GUICtrlSetState($DirectX,$GUI_CHECKED) GUICtrlSetState($idm,$GUI_CHECKED) GUICtrlSetState($avira,$GUI_CHECKED) GUICtrlSetState($winrar,$GUI_CHECKED) GUICtrlSetState($Uninstaller,$GUI_CHECKED) GUICtrlSetState($nero,$GUI_CHECKED) GUICtrlSetState($office,$GUI_CHECKED) GUICtrlSetState($framework,$GUI_CHECKED) GUICtrlSetState($winamp,$GUI_CHECKED) GUICtrlSetState($ultraiso,$GUI_CHECKED) GUICtrlSetState($teamviewer,$GUI_CHECKED) GUICtrlSetState($turing,$GUI_CHECKED) GUICtrlSetState($mtu,$GUI_CHECKED) GUICtrlSetState($mozilla,$GUI_CHECKED) Case $osmanliturkdini GUICtrlSetState($kuran,$GUI_CHECKED) GUICtrlSetState($namazhoca,$GUI_CHECKED) GUICtrlSetState($osmanlitanitim,$GUI_CHECKED) GUICtrlSetState($osmanlitarihi,$GUI_CHECKED) GUICtrlSetState($turkiyetanitim,$GUI_CHECKED) GUICtrlSetState($turklerv2,$GUI_CHECKED) Case $oyun GUICtrlSetState($ucakoyunu,$GUI_CHECKED) GUICtrlSetState($kucukoyun,$GUI_CHECKED) GUICtrlSetState($satranc,$GUI_CHECKED) Case $messenger GUICtrlSetState($yahoo,$GUI_CHECKED) GUICtrlSetState($skype,$GUI_CHECKED) GUICtrlSetState($googletalk,$GUI_CHECKED) GUICtrlSetState($camfrog,$GUI_CHECKED) GUICtrlSetState($windowsmessenger,$GUI_CHECKED) Case $chat GUICtrlSetState($zurna,$GUI_CHECKED) GUICtrlSetState($kelebek,$GUI_CHECKED) GUICtrlSetState($geveze,$GUI_CHECKED) GUICtrlSetState($yuzuk,$GUI_CHECKED) case $calistir If GUICtrlRead($photoshop)=1 then RunWait("Programs\sistem\APCS5E.x86.exe") If GUICtrlRead($Reader)=1 then RunWait("Programs\sistem\AdobeReader1010TR.exe") If GUICtrlRead($FlashPlayer)=1 then RunWait("Programs\sistem\Adobe-flash-player-11-32bit-21Ekim2011Cuma.exe") If GUICtrlRead($FlashPaketi)=1 then RunWait("Programs\sistem\Flash Paketi 3.1.1 (x86-x64).exe") If GUICtrlRead($Java)=1 then RunWait("Programs\sistem\Java Runtime Environment 7.0.exe") If GUICtrlRead($Chrome)=1 then RunWait("Programs\sistem\Googlechrome.exe") If GUICtrlRead($klite)=1 then RunWait("Programs\sistem\K-Lite Mega Codec Pack.exe") If GUICtrlRead($eset)=1 then RunWait("Programs\sistem\Eset Smart Security 5.0.84 x86.exe") If GUICtrlRead($CCleaner)=1 then RunWait("Programs\sistem\CCleaner.exe") If GUICtrlRead($DirectX)=1 then RunWait("Programs\sistem\DirectX 9.29.1974 (Nisan-2011)(x86-x64).exe") If GUICtrlRead($idm)=1 then RunWait("Programs\sistem\İDM.exe") If GUICtrlRead($avira)=1 then RunWait("Programs\sistem\Avira AntiVir Free 10.0.0.609.exe") If GUICtrlRead($winrar)=1 then RunWait("Programs\sistem\Winrar 4.01 TR.exe") If GUICtrlRead($Uninstaller)=1 then RunWait("Programs\sistem\YourUninstaller7.exe") If GUICtrlRead($nero)=1 then RunWait("Programs\sistem\Nero Lite 9.4.26.0.exe") If GUICtrlRead($office)=1 then RunWait("Programs\sistem\Office 2007.exe") If GUICtrlRead($framework)=1 then RunWait("Programs\sistem\NETAIO.exe") If GUICtrlRead($winamp)=1 then RunWait("Programs\sistem\Winamp.2.95.Extreme.TR.exe") If GUICtrlRead($ultraiso)=1 then RunWait("Programs\sistem\uiso9_pe.exe") If GUICtrlRead($teamviewer)=1 then RunWait("Programs\sistem\TeamViewer6.0.11117.0.exe") If GUICtrlRead($turing)=1 then RunWait("Programs\sistem\Turing.exe") If GUICtrlRead($mtu)=1 then RunWait("Programs\sistem\Mtusozluk.exe") If GUICtrlRead($mozilla)=1 then RunWait("Programs\sistem\firefox7.exe") If GUICtrlRead($kuran)=1 then RunWait("Programs\osmanlı-türkiye-dini programlar\Kuransetup.exe") If GUICtrlRead($namazhoca)=1 then RunWait("Programs\osmanlı-türkiye-dini programlar\Namaz.exe") If GUICtrlRead($osmanlitanitim)=1 then RunWait("Programs\osmanlı-türkiye-dini programlar\Osmanlitanitim.exe") If GUICtrlRead($osmanlitarihi)=1 then RunWait("Programs\osmanlı-türkiye-dini programlar\osmanlilar.exe") If GUICtrlRead($turkiyetanitim)=1 then RunWait("Programs\osmanlı-türkiye-dini programlar\Türkiyetanitim.exe") If GUICtrlRead($turklerv2)=1 then RunWait("Programs\osmanlı-türkiye-dini programlar\Türkler.exe") If GUICtrlRead($yahoo)=1 then RunWait("Programs\messenger\Yahoomessenger11.exe") If GUICtrlRead($skype)=1 then RunWait("Programs\messenger\Skype5.6.0.110.exe") If GUICtrlRead($googletalk)=1 then RunWait("Programs\messenger\GoogleTalk.exe") If GUICtrlRead($camfrog)=1 then RunWait("Programs\messenger\Camfrog Video Chat 6.1.136.exe") If GUICtrlRead($windowsmessenger)=1 then RunWait("Programs\messenger\windowslivemessenger.exe") If GUICtrlRead($ucakoyunu)=1 then RunWait("Programs\oyun\Ucakoyunu.exe") If GUICtrlRead($kucukoyun)=1 then RunWait("Programs\oyun\oyunkarisik.EXE") If GUICtrlRead($satranc)=1 then RunWait("Programs\oyun\3Dsatrancv3.02.exe") If GUICtrlRead($zurna)=1 then RunWait("Programs\chat\Zurnamirc.exe") If GUICtrlRead($kelebek)=1 then RunWait("Programs\chat\Kelebek FinaL4.exe") If GUICtrlRead($geveze)=1 then RunWait("Programs\chat\Gevezescript.exe") If GUICtrlRead($yuzuk)=1 then RunWait("Programs\chat\yuzuk.exe") Case $secme GUICtrlSetState($photoshop,$GUI_UNCHECKED) GUICtrlSetState($Reader,$GUI_UNCHECKED) GUICtrlSetState($FlashPlayer,$GUI_UNCHECKED) GUICtrlSetState($FlashPaketi,$GUI_UNCHECKED) GUICtrlSetState($Java,$GUI_UNCHECKED) GUICtrlSetState($Chrome,$GUI_UNCHECKED) GUICtrlSetState($klite,$GUI_UNCHECKED) GUICtrlSetState($eset,$GUI_UNCHECKED) GUICtrlSetState($CCleaner,$GUI_UNCHECKED) GUICtrlSetState($DirectX,$GUI_UNCHECKED) GUICtrlSetState($idm,$GUI_UNCHECKED) GUICtrlSetState($avira,$GUI_UNCHECKED) GUICtrlSetState($winrar,$GUI_UNCHECKED) GUICtrlSetState($Uninstaller,$GUI_UNCHECKED) GUICtrlSetState($nero,$GUI_UNCHECKED) GUICtrlSetState($office,$GUI_UNCHECKED) GUICtrlSetState($framework,$GUI_UNCHECKED) GUICtrlSetState($winamp,$GUI_UNCHECKED) GUICtrlSetState($ultraiso,$GUI_UNCHECKED) GUICtrlSetState($teamviewer,$GUI_UNCHECKED) GUICtrlSetState($turing,$GUI_UNCHECKED) GUICtrlSetState($kuran,$GUI_UNCHECKED) GUICtrlSetState($namazhoca,$GUI_UNCHECKED) GUICtrlSetState($osmanlitanitim,$GUI_UNCHECKED) GUICtrlSetState($osmanlitarihi,$GUI_UNCHECKED) GUICtrlSetState($turkiyetanitim,$GUI_UNCHECKED) GUICtrlSetState($turklerv2,$GUI_UNCHECKED) GUICtrlSetState($yahoo,$GUI_UNCHECKED) GUICtrlSetState($skype,$GUI_UNCHECKED) GUICtrlSetState($googletalk,$GUI_UNCHECKED) GUICtrlSetState($camfrog,$GUI_UNCHECKED) GUICtrlSetState($windowsmessenger,$GUI_UNCHECKED) GUICtrlSetState($ucakoyunu,$GUI_UNCHECKED) GUICtrlSetState($kucukoyun,$GUI_UNCHECKED) GUICtrlSetState($satranc,$GUI_UNCHECKED) GUICtrlSetState($zurna,$GUI_UNCHECKED) GUICtrlSetState($kelebek,$GUI_UNCHECKED) GUICtrlSetState($geveze,$GUI_UNCHECKED) GUICtrlSetState($yuzuk,$GUI_UNCHECKED) GUICtrlSetState($mtu,$GUI_UNCHECKED) GUICtrlSetState($mozilla,$GUI_UNCHECKED) EndSwitch WEnd Func bilgiver($text) GUICtrlSetData($label1,$text) EndFunc [/codebox] Bence bu daha zor kodlarını scite'a kopyaladığında 9,11 ve 13. satırdaki işlemleri hangilerinin üstüne geldiğinde işleme tabi olmasını istiyosan yapıyorsun.Sonra 126'tan itibaren zaten kolay bi yapı kullandım.Umarım anlamışsındır Edited November 7, 2011 by blue_life Forum görünümünü bozduğu için uzun kod düzenlendi! Quote Link to comment Share on other sites More sharing options...
Mehmet Posted November 6, 2011 Author Share Posted November 6, 2011 controlHover udf nerden alıcam controlHover sabit bir udfmi yoksa kendimize göremi düzenlicez. Quote Link to comment Share on other sites More sharing options...
blackman12 Posted November 6, 2011 Share Posted November 6, 2011 ControlHover UDF: [code]http://www.4shared.com/file/L2g5TzBy/_controlHover.html[/code] İlgili örnek: [code]http://www.tnctr.com/topic/108468-windows-live-messenger-installer-1408089726/[/code] Quote Link to comment Share on other sites More sharing options...
Bitmap Posted November 6, 2011 Share Posted November 6, 2011 Dün control hoveri denedik Mehmet abi ile . yaptık ama acemilikten dolayı ben pek beceremedim .. ayrıca blackman abi bi sorum var... If $tempID = $Checkbox_1 Then diye başlayan kodların sonunda neden EndIf e gerek yok ... Quote Link to comment Share on other sites More sharing options...
blue_life Posted November 7, 2011 Share Posted November 7, 2011 @MeHMeTBeN Sorununuz çözüldü mü? Örnek vermemi istermisiniz? Quote Link to comment Share on other sites More sharing options...
Mehmet Posted November 7, 2011 Author Share Posted November 7, 2011 [spoiler][img]http://i.imgur.com/0kbxp.jpg[/img][/spoiler] üstad MostWanted verdiği örnek çok hoş yanlız beni çok uğraştırıyor dün gece baya bi yazdım internet download managar'e ancak gelebildim. Daha kısa bir yöntemi veya bu kadar uğraştırmayacak bir yöntem varsa neden olmasın alternatif olması benim açımdan daha iyi olur zaten kendiside yazmış budaha zor olur diye Quote Link to comment Share on other sites More sharing options...
blackman12 Posted November 7, 2011 Share Posted November 7, 2011 Kazım, "if koşul then sonuç" durumunda sonuç sadece bir satırsa bu şekilde yazarsan endif yazmana gerek kalmaz. Evet bu eski bir controlhover udf si biraz zor, ama mantığı şu şekilde, Programı While a sokmadan önce üzerine gelince değişiklik olacak tüm öğelere "_ControlHover(2, "",$ogeadı)" şeklinde bir komut atıyoruz. Daha sonra while içinde "$Over = _ControlHover(0, $mygui)" komutu ile mouseun herhangi bir öğenin üstünde olup olmadığını kontrol ediyoruz. Eğer "$Over = 1" yani mouse bir öğenin üstünde ise @extended değişkenine, hangi değişkenin üstünde olduğu geliyor. Sonra bizde "if $over = 1 and @extended = $ogeadi then sonuç" yani "eğer mouse bir öğenin üstünde ve bu öğenin adı şuysa bu işlemi yap" demiş oluyoruz Aynı mantıkla: "$Click = _ControlHover(1, $mygui)" de uygulayabiliriz, Burada tek değişen $click = 1 ise bu mouseun bir öğeye tıklandığını işaret eder, hangi öğeye tıklandığını yine @extended ile görebiliriz. He tabi, bunun daha kolay bi udfsi yapılmış artık: [code]http://www.autoitscript.com/forum/topic/55120-guictrlsetonhover-udf/[/code] Ve bu çok daha gelişmiş bir udf, öğenin üstüne gelindiğinde, veya öğe terkedildiğinde komut verebilirsin. Quote Link to comment Share on other sites More sharing options...
blue_life Posted November 7, 2011 Share Posted November 7, 2011 (edited) [tnctr='topic/185886-bluelife-hosts-editor-v10']Ben hosteditor çalışmamada user32.dll dosyasını kullanmıştım.[/tnctr] Ama buda acemi kullanıcılar için biraz karışık. Bu yüzden az önce daha basit bir şey yazdım. Bu sayede zorlanmadan yapabilirsiniz... Lakin xp kullandığım için w7 gibi nt6 sistemlerde test etmek lazım. [codebox]Global $BlueMouseArray[10][2] = [[0,"Selam Millet!" & @crlf & "BlueLife Test 123 "]] Global $BlueGuiInfo Local $Form1 = GUICreate("BlueLife MouseOver Test", 350, 150) $Button1 = GUICtrlCreateButton("Button1", 10, 10, 75, 25) _BlueMouseSetTip(-1,"Birinci Buton") ;Isterseniz -1 yerine $Button1 da yazabilirsiniz. $Button2 = GUICtrlCreateButton("Button2", 10, 40, 75, 25) _BlueMouseSetTip(-1,"Ikinci Buton") ;Isterseniz -1 yerine $Button2 da yazabilirsiniz. $Button3 = GUICtrlCreateButton("Button3", 10, 70, 75, 25) _BlueMouseSetTip(-1,"Üçüncü Buton") ;Isterseniz -1 yerine $Button3 da yazabilirsiniz. GUICtrlCreateButton("Button3", 10, 100, 75, 25) _BlueMouseSetTip(-1,"Dördüncü Buton") GUICtrlCreateLabel("Label2", 100, 10, 150, 15) _BlueMouseSetTip(-1,"Label") $Input1 = GUICtrlCreateInput("Input1", 100, 25, 150, 20) _BlueMouseSetTip(-1,"Input1") $Checkbox1 = GUICtrlCreateCheckbox("Checkbox1", 100, 55, 150, 15) _BlueMouseSetTip(-1,"$Checkbox1") $Combo1 = GUICtrlCreateCombo("Combo1", 100, 70, 150, 20) _BlueMouseSetTip(-1,"$Combo1") $Radio1 = GUICtrlCreateRadio("Radio1", 100, 105, 70, 15) _BlueMouseSetTip(-1,"Radio1") $Radio2 = GUICtrlCreateRadio("Radio2", 175, 105, 70, 15) _BlueMouseSetTip(-1,"Radio2") $BlueGuiInfo = GUICtrlCreateLabel($BlueMouseArray[0][1], 260, 10, 80, 130,1,1) ;Bu labele yazdırıyoruz! GUIRegisterMsg(32, "_BlueMouseOver") GUISetState(@SW_SHOW) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case -3 Exit EndSwitch WEnd Func _BlueMouseOver($hWnd, $Msg, $wParam, $lParam) If Not IsDeclared ("BlueLastMsg") Then Global $BlueLastMsg Local $Blue_NID = False If $BlueLastMsg <> $wParam Then $BlueLastMsg = $wParam For $I = 1 to $BlueMouseArray[0][0] If $BlueMouseArray[$I][0] = $BlueLastMsg Then $Blue_NID = True GUICtrlSetData($BlueGuiInfo,$BlueMouseArray[$I][1]) ExitLoop EndIf Next If $Blue_NID = False Then GUICtrlSetData($BlueGuiInfo,$BlueMouseArray[0][1]) EndIf EndFunc Func _BlueMouseSetTip($Blue_NID,$Blue_NMSG) Local $Blue_NID_Hwnd = GUICtrlGetHandle($Blue_NID) If $Blue_NID_Hwnd = 0 Then Return False $BlueMouseArray[0][0] += 1 If UBound($BlueMouseArray) <= $BlueMouseArray[0][0] Then Redim $BlueMouseArray[$BlueMouseArray[0][0] +10][2] $BlueMouseArray[$BlueMouseArray[0][0]][0] = $Blue_NID_Hwnd $BlueMouseArray[$BlueMouseArray[0][0]][1] = $Blue_NMSG EndFunc[/codebox] Senin kodlarına göre ayarlarsak; [codebox]#AutoIt3Wrapper_Icon=program.ico #include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <Sound.Au3> ; -------- Mouse Over Variables ------------------------ Global $BlueMouseArray[10][2] = [[0,"Selam Millet!" & @crlf & "BlueLife Test 123 "]] Global $BlueGuiInfo ; -------- Mouse Over Variables ------------------------ $Form1 = GUICreate("Katılımsız Programlar Kasım 2011.::MeHMeT::.", 821, 570) $photoshop = GUICtrlCreateCheckbox("Photoshop Cs5", 4, 36, 121, 25) _BlueMouseSetTip(-1,"Bu kadar basit") ;Isterseniz -1 yerine $Button1 da yazabilirsiniz. $Reader = GUICtrlCreateCheckbox("Adobe Reader", 4, 58, 121, 25) _BlueMouseSetTip(-1,"Kafana göre takıl") ;Isterseniz -1 yerine $Button1 da yazabilirsiniz. $FlashPlayer = GUICtrlCreateCheckbox("Adobe Flash Player", 4, 80, 121, 25) _BlueMouseSetTip(-1,"Canım Sıkılıyor") ;Isterseniz -1 yerine $Button1 da yazabilirsiniz. $FlashPaketi = GUICtrlCreateCheckbox("Flash Paketi", 4, 102, 121, 25) _BlueMouseSetTip(-1,"Acaba ne yapsam") ;Isterseniz -1 yerine $Button1 da yazabilirsiniz. $Java = GUICtrlCreateCheckbox("Java", 4, 124, 121, 25) _BlueMouseSetTip(-1,"Düşünüyorum") ;Isterseniz -1 yerine $Button1 da yazabilirsiniz. $Chrome = GUICtrlCreateCheckbox("Google Chrome", 4, 453, 89, 25) _BlueMouseSetTip(-1,"Her zaman olduğu gibi bir filmi izleyelim" & @CRLF & _ "Hadi kolay gelsin") ;Isterseniz -1 yerine $Button1 da yazabilirsiniz. $klite = GUICtrlCreateCheckbox("K-Lite Mega Codec Pack", 4, 168, 137, 25) $eset = GUICtrlCreateCheckbox("Eset Smart Security", 4, 190, 124, 25) $CCleaner = GUICtrlCreateCheckbox("CCleaner", 4, 212, 121, 25) $DirectX = GUICtrlCreateCheckbox("DirectX 9.29", 4, 234, 121, 25) $idm = GUICtrlCreateCheckbox("Internet.Download.Manager", 4, 256, 161, 25) $avira = GUICtrlCreateCheckbox("Avira AntiVir Free", 4, 278, 121, 25) $winrar = GUICtrlCreateCheckbox("Winrar", 4, 299, 121, 25) $Uninstaller = GUICtrlCreateCheckbox("Your Uninstaller7", 4, 321, 110, 25) $nero = GUICtrlCreateCheckbox("Nero Lite", 4, 346, 110, 18) $office = GUICtrlCreateCheckbox("Office 2007", 4, 365, 121, 25) $framework = GUICtrlCreateCheckbox("NET Framework AIO", 4, 387, 129, 25) $winamp = GUICtrlCreateCheckbox("Winamp", 4, 409, 73, 25) $ultraiso = GUICtrlCreateCheckbox("Ultra İso", 4, 431, 73, 25) $teamviewer = GUICtrlCreateCheckbox("Team Viewer", 4, 146, 121, 25) $turing = GUICtrlCreateCheckbox("Turing", 4, 519, 121, 25) $nameiso = GUICtrlCreateButton("N", 114, 435, 18, 17) GUICtrlSetFont(-1, 7, 400, 0, "MS Sans Serif") GUICtrlSetTip(-1, "Name Kopyala") $serialiso = GUICtrlCreateButton("S", 134, 435, 18, 17) GUICtrlSetFont(-1, 7, 400, 0, "MS Sans Serif") GUICtrlSetTip(-1, "Serial Kopyala") $label1 = GUICtrlCreateLabel("", 232, 408, 188, 17) $mny = GUICtrlCreateButton("?", 4, 544, 121, 20) GUICtrlSetTip(-1, "©MNY@") $tumusec = GUICtrlCreateButton("Tümünü Seç", 680, 70, 127, 55) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0x0000FF) $secme = GUICtrlCreateButton("Seçme", 548, 70, 127, 55) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0x0000FF) $kuran = GUICtrlCreateCheckbox("Kuran-ı Kerim Pro", 184, 37, 121, 25) $namazhoca = GUICtrlCreateCheckbox("Namaz Hocası", 184, 67, 121, 25) $osmanlitanitim = GUICtrlCreateCheckbox("Osmanlı Tanıtımı", 184, 97, 121, 25) $osmanlitarihi = GUICtrlCreateCheckbox("Osmanlılar Tarihi", 184, 127, 121, 25) $turkiyetanitim = GUICtrlCreateCheckbox("Türkiye Tanıtımı", 184, 157, 121, 25) $turklerv2 = GUICtrlCreateCheckbox("Türkler v2", 184, 187, 121, 25) $yahoo = GUICtrlCreateCheckbox("Yahoo Messenger", 401, 35, 121, 25) $skype = GUICtrlCreateCheckbox("Skype", 401, 66, 121, 25) $googletalk = GUICtrlCreateCheckbox("Google Talk", 401, 96, 121, 25) $camfrog = GUICtrlCreateCheckbox("Camfrog", 401, 126, 121, 25) $windowsmessenger = GUICtrlCreateCheckbox("Windows Live Messenger", 401, 156, 145, 25) $ucakoyunu = GUICtrlCreateCheckbox("HyperSpace Invader", 184, 260, 121, 25) $kucukoyun = GUICtrlCreateCheckbox("Karışık Küçük Oyunlar", 184, 290, 121, 25) $satranc = GUICtrlCreateCheckbox("3D Satranç", 184, 321, 121, 25) $zurna = GUICtrlCreateCheckbox("Zurna Mirc", 401, 260, 121, 25) $kelebek = GUICtrlCreateCheckbox("Kelebek FinaL4", 401, 290, 121, 25) $geveze = GUICtrlCreateCheckbox("Geveze Mirc", 401, 321, 121, 25) $yuzuk = GUICtrlCreateCheckbox("Yüzük", 401, 351, 121, 25) $agbaglantilar = GUICtrlCreateButton("Ağ Bağlantıları", 548, 150, 127, 35) $aygityonetici = GUICtrlCreateButton("Aygıt Yöneticisi", 548, 192, 127, 35) $guvenlikduvar = GUICtrlCreateButton("Güvenlik Duvarı", 548, 234, 127, 35) $hizmetler = GUICtrlCreateButton("Hizmetler", 548, 276, 127, 35) $kullanicihesap = GUICtrlCreateButton("Kullanıcı Hesapları", 548, 318, 127, 35) $otoguncelleme = GUICtrlCreateButton("Oto Güncelleştirmeler", 548, 360, 127, 35) $sistemozellik = GUICtrlCreateButton("Sistem Özellikleri", 548, 402, 127, 35) $programeklekaldir = GUICtrlCreateButton("Program Ekle Kaldır", 548, 444, 127, 35) $hostsdefault = GUICtrlCreateButton("Hosts Default", 680, 150, 127, 35) $hostsidm = GUICtrlCreateButton("Hosts İDM", 680, 192, 127, 35) $hostsidmyaz = GUICtrlCreateButton("Hosts İDMYAZ", 680, 234, 127, 35) $coklumsn = GUICtrlCreateButton("Çoklu Msn", 680, 276, 127, 35) $kilitac = GUICtrlCreateButton("Kilitaç Google", 680, 318, 127, 35) $oksil = GUICtrlCreateButton("Kısa Yol Ok Sil", 680, 360, 127, 35) $okgerial = GUICtrlCreateButton("Kısa Yol Ok Geri Al", 680, 402, 127, 35) $driver = GUICtrlCreateButton("Driver", 680, 444, 127, 35) $play = GUICtrlCreateButton("Pause", 680, 485, 127, 35) GUICtrlSetTip(-1, "Müzik Kapat") $denetimmasa = GUICtrlCreateButton("Denetim Masası", 548, 485, 127, 35) $oyun = GUICtrlCreateButton("Oyun", 184, 223, 91, 33) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0xFF0000) $chat = GUICtrlCreateButton("Chat Script", 401, 223, 91, 33) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0xFF0000) $sistem = GUICtrlCreateButton("Sistem", 3, 3, 91, 33) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0xFF0000) $osmanliturkdini = GUICtrlCreateButton("Karma", 183, 3, 99, 33) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0xFF0000) $messenger = GUICtrlCreateButton("Messenger", 401, 3, 91, 33) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0xFF0000) $calistir = GUICtrlCreateButton("Çalıştır", 549, 3, 258, 55) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") $mtu = GUICtrlCreateCheckbox("Mtu Sözlük", 4, 497, 121, 25) $mozilla = GUICtrlCreateCheckbox("Mozilla Firefox", 4, 475, 121, 25) $internetozellik = GUICtrlCreateButton("İnternet Özellikleri", 548, 525, 127, 35) $cikis = GUICtrlCreateButton("Çıkış", 680, 525, 127, 35) GUICtrlSetTip(-1, "Programdan Çık") $name = GUICtrlCreateButton("N", 114, 328, 18, 17) GUICtrlSetFont(-1, 7, 400, 0, "MS Sans Serif") GUICtrlSetTip(-1, "Name Kopyala") $serial = GUICtrlCreateButton("S", 134, 328, 18, 17) GUICtrlSetFont(-1, 7, 400, 0, "MS Sans Serif") GUICtrlSetTip(-1, "Serial Kopyala") DirCreate(@TempDir & "\mny") FileInstall("resim.gif", @TempDir & "\mny\resim.gif") $PIC1 = GUICtrlCreatePic(@TempDir & "\mny\resim.gif", 176, 462, 345, 97) FileInstall("Ses.mp3", @TempDir & "\mny\Ses.mp3") Sleep(1000) SoundPlay(@TempDir & "\mny\Ses.mp3", 0) SoundSetWaveVolume(50) $BlueGuiInfo = GUICtrlCreateLabel($BlueMouseArray[0][1], 200, 450, 300, 100,1,1) ;Bu labele yazdırıyoruz! GUIRegisterMsg(32, "_BlueMouseOver") WinSetTrans($Form1, "", 230) GUISetState(@SW_SHOW) GUISetBkColor(0xffffff) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE DirRemove(@TempDir & "\mny", 1) ExitLoop Case $cikis DirRemove(@TempDir & "\mny", 1) Exit Case $play If GUICtrlRead($play) = "Pause" Then GUICtrlSetData($play, "Play") SoundPlay("") Else GUICtrlSetData($play, "Pause") SoundPlay(@TempDir & "\mny\Ses.mp3", 0) EndIf Case $driver RunWait("Programs\Driverkur\DriverPackSolution.exe") ;hakkında Case $mny Msgbox(64,"Hakkında","TnCtR" & @CRLF & _ "Programın yapılış amacı Katılımsız Kurulum içindir." & @crlf & _ "Program AutoIt v3 ile kodlanmıştır" & @CRLF & _ "İyi günlerde kullanmanız dileğiyle" ,10,$Form1) Case $nameiso ClipPut("MeHMeT") Case $serialiso ClipPut("0B1F-9F39-37E6-C63F") ;SİSTEM ÖZELLİK Case $internetozellik RunWait("Extra\sistem özellik\internetozellik.exe") Case $denetimmasa RunWait("Extra\sistem özellik\denetimmasasi.exe") Case $agbaglantilar RunWait("Extra\sistem özellik\Ağbaglantilari.exe") Case $guvenlikduvar RunWait("Extra\sistem özellik\Güvenlikduvari.exe") Case $kullanicihesap RunWait("Extra\sistem özellik\Kullanicihesaplari.exe") Case $otoguncelleme RunWait("Extra\sistem özellik\Otogüncelleme.exe") Case $aygityonetici RunWait("Extra\sistem özellik\Aygityoneticisi.exe") Case $hizmetler RunWait("Extra\sistem özellik\Hizmetler.exe") Case $programeklekaldir RunWait("Extra\sistem özellik\Programeklekaldir.exe") Case $sistemozellik RunWait("Extra\sistem özellik\Sistemozellikleri.exe") ;AYAR Case $hostsdefault RunWait("Extra\ayar\Hostsdefault.exe") Case $hostsidm RunWait("Extra\ayar\HostsİDM.exe") Case $hostsidmyaz RunWait("Extra\ayar\HostsİDMYAZ.exe") Case $coklumsn RunWait("Extra\ayar\ÇokluMsn.exe") Case $kilitac RunWait("Extra\ayar\KilitaçGoogle.exe") Case $oksil RunWait("Extra\ayar\Oksil.exe") Case $okgerial RunWait("Extra\ayar\Okgerial.exe") Case $name ClipPut("MeHMeT") Case $serial ClipPut("000014-QET0RE-W2MYUA-P5V5Z9-QC44JK-12UCYE-1EPH1U-RQADZ8-8RJ475-N2N57D ") Case $tumusec GUICtrlSetState($photoshop, $GUI_CHECKED) GUICtrlSetState($Reader, $GUI_CHECKED) GUICtrlSetState($FlashPlayer, $GUI_CHECKED) GUICtrlSetState($FlashPaketi, $GUI_CHECKED) GUICtrlSetState($Java, $GUI_CHECKED) GUICtrlSetState($Chrome, $GUI_CHECKED) GUICtrlSetState($klite, $GUI_CHECKED) GUICtrlSetState($eset, $GUI_CHECKED) GUICtrlSetState($CCleaner, $GUI_CHECKED) GUICtrlSetState($DirectX, $GUI_CHECKED) GUICtrlSetState($idm, $GUI_CHECKED) GUICtrlSetState($avira, $GUI_CHECKED) GUICtrlSetState($winrar, $GUI_CHECKED) GUICtrlSetState($Uninstaller, $GUI_CHECKED) GUICtrlSetState($nero, $GUI_CHECKED) GUICtrlSetState($office, $GUI_CHECKED) GUICtrlSetState($framework, $GUI_CHECKED) GUICtrlSetState($winamp, $GUI_CHECKED) GUICtrlSetState($ultraiso, $GUI_CHECKED) GUICtrlSetState($teamviewer, $GUI_CHECKED) GUICtrlSetState($turing, $GUI_CHECKED) GUICtrlSetState($mtu, $GUI_CHECKED) GUICtrlSetState($kuran, $GUI_CHECKED) GUICtrlSetState($namazhoca, $GUI_CHECKED) GUICtrlSetState($osmanlitanitim, $GUI_CHECKED) GUICtrlSetState($osmanlitarihi, $GUI_CHECKED) GUICtrlSetState($turkiyetanitim, $GUI_CHECKED) GUICtrlSetState($turklerv2, $GUI_CHECKED) GUICtrlSetState($yahoo, $GUI_CHECKED) GUICtrlSetState($skype, $GUI_CHECKED) GUICtrlSetState($googletalk, $GUI_CHECKED) GUICtrlSetState($camfrog, $GUI_CHECKED) GUICtrlSetState($windowsmessenger, $GUI_CHECKED) GUICtrlSetState($ucakoyunu, $GUI_CHECKED) GUICtrlSetState($kucukoyun, $GUI_CHECKED) GUICtrlSetState($satranc, $GUI_CHECKED) GUICtrlSetState($zurna, $GUI_CHECKED) GUICtrlSetState($kelebek, $GUI_CHECKED) GUICtrlSetState($geveze, $GUI_CHECKED) GUICtrlSetState($yuzuk, $GUI_CHECKED) GUICtrlSetState($mozilla, $GUI_CHECKED) Case $sistem GUICtrlSetState($photoshop, $GUI_CHECKED) GUICtrlSetState($Reader, $GUI_CHECKED) GUICtrlSetState($FlashPlayer, $GUI_CHECKED) GUICtrlSetState($FlashPaketi, $GUI_CHECKED) GUICtrlSetState($Java, $GUI_CHECKED) GUICtrlSetState($Chrome, $GUI_CHECKED) GUICtrlSetState($klite, $GUI_CHECKED) GUICtrlSetState($eset, $GUI_CHECKED) GUICtrlSetState($CCleaner, $GUI_CHECKED) GUICtrlSetState($DirectX, $GUI_CHECKED) GUICtrlSetState($idm, $GUI_CHECKED) GUICtrlSetState($avira, $GUI_CHECKED) GUICtrlSetState($winrar, $GUI_CHECKED) GUICtrlSetState($Uninstaller, $GUI_CHECKED) GUICtrlSetState($nero, $GUI_CHECKED) GUICtrlSetState($office, $GUI_CHECKED) GUICtrlSetState($framework, $GUI_CHECKED) GUICtrlSetState($winamp, $GUI_CHECKED) GUICtrlSetState($ultraiso, $GUI_CHECKED) GUICtrlSetState($teamviewer, $GUI_CHECKED) GUICtrlSetState($turing, $GUI_CHECKED) GUICtrlSetState($mtu, $GUI_CHECKED) GUICtrlSetState($mozilla, $GUI_CHECKED) Case $osmanliturkdini GUICtrlSetState($kuran, $GUI_CHECKED) GUICtrlSetState($namazhoca, $GUI_CHECKED) GUICtrlSetState($osmanlitanitim, $GUI_CHECKED) GUICtrlSetState($osmanlitarihi, $GUI_CHECKED) GUICtrlSetState($turkiyetanitim, $GUI_CHECKED) GUICtrlSetState($turklerv2, $GUI_CHECKED) Case $oyun GUICtrlSetState($ucakoyunu, $GUI_CHECKED) GUICtrlSetState($kucukoyun, $GUI_CHECKED) GUICtrlSetState($satranc, $GUI_CHECKED) Case $messenger GUICtrlSetState($yahoo, $GUI_CHECKED) GUICtrlSetState($skype, $GUI_CHECKED) GUICtrlSetState($googletalk, $GUI_CHECKED) GUICtrlSetState($camfrog, $GUI_CHECKED) GUICtrlSetState($windowsmessenger, $GUI_CHECKED) Case $chat GUICtrlSetState($zurna, $GUI_CHECKED) GUICtrlSetState($kelebek, $GUI_CHECKED) GUICtrlSetState($geveze, $GUI_CHECKED) GUICtrlSetState($yuzuk, $GUI_CHECKED) Case $calistir If GUICtrlRead($photoshop) = 1 Then RunWait("Programs\sistem\APCS5E.x86.exe") If GUICtrlRead($Reader) = 1 Then RunWait("Programs\sistem\AdobeReader1010TR.exe") If GUICtrlRead($FlashPlayer) = 1 Then RunWait("Programs\sistem\Adobe-flash-player-11-32bit-21Ekim2011Cuma.exe") If GUICtrlRead($FlashPaketi) = 1 Then RunWait("Programs\sistem\Flash Paketi 3.1.1 (x86-x64).exe") If GUICtrlRead($Java) = 1 Then RunWait("Programs\sistem\Java Runtime Environment 7.0.exe") If GUICtrlRead($Chrome) = 1 Then RunWait("Programs\sistem\Googlechrome.exe") If GUICtrlRead($klite) = 1 Then RunWait("Programs\sistem\K-Lite Mega Codec Pack.exe") If GUICtrlRead($eset) = 1 Then RunWait("Programs\sistem\Eset Smart Security 5.0.84 x86.exe") If GUICtrlRead($CCleaner) = 1 Then RunWait("Programs\sistem\CCleaner.exe") If GUICtrlRead($DirectX) = 1 Then RunWait("Programs\sistem\DirectX 9.29.1974 (Nisan-2011)(x86-x64).exe") If GUICtrlRead($idm) = 1 Then RunWait("Programs\sistem\İDM.exe") If GUICtrlRead($avira) = 1 Then RunWait("Programs\sistem\Avira AntiVir Free 10.0.0.609.exe") If GUICtrlRead($winrar) = 1 Then RunWait("Programs\sistem\Winrar 4.01 TR.exe") If GUICtrlRead($Uninstaller) = 1 Then RunWait("Programs\sistem\YourUninstaller7.exe") If GUICtrlRead($nero) = 1 Then RunWait("Programs\sistem\Nero Lite 9.4.26.0.exe") If GUICtrlRead($office) = 1 Then RunWait("Programs\sistem\Office 2007.exe") If GUICtrlRead($framework) = 1 Then RunWait("Programs\sistem\NETAIO.exe") If GUICtrlRead($winamp) = 1 Then RunWait("Programs\sistem\Winamp.2.95.Extreme.TR.exe") If GUICtrlRead($ultraiso) = 1 Then RunWait("Programs\sistem\uiso9_pe.exe") If GUICtrlRead($teamviewer) = 1 Then RunWait("Programs\sistem\TeamViewer6.0.11117.0.exe") If GUICtrlRead($turing) = 1 Then RunWait("Programs\sistem\Turing.exe") If GUICtrlRead($mtu) = 1 Then RunWait("Programs\sistem\Mtusozluk.exe") If GUICtrlRead($mozilla) = 1 Then RunWait("Programs\sistem\firefox7.exe") If GUICtrlRead($kuran) = 1 Then RunWait("Programs\osmanlı-türkiye-dini programlar\Kuransetup.exe") If GUICtrlRead($namazhoca) = 1 Then RunWait("Programs\osmanlı-türkiye-dini programlar\Namaz.exe") If GUICtrlRead($osmanlitanitim) = 1 Then RunWait("Programs\osmanlı-türkiye-dini programlar\Osmanlitanitim.exe") If GUICtrlRead($osmanlitarihi) = 1 Then RunWait("Programs\osmanlı-türkiye-dini programlar\osmanlilar.exe") If GUICtrlRead($turkiyetanitim) = 1 Then RunWait("Programs\osmanlı-türkiye-dini programlar\Türkiyetanitim.exe") If GUICtrlRead($turklerv2) = 1 Then RunWait("Programs\osmanlı-türkiye-dini programlar\Türkler.exe") If GUICtrlRead($yahoo) = 1 Then RunWait("Programs\messenger\Yahoomessenger11.exe") If GUICtrlRead($skype) = 1 Then RunWait("Programs\messenger\Skype5.6.0.110.exe") If GUICtrlRead($googletalk) = 1 Then RunWait("Programs\messenger\GoogleTalk.exe") If GUICtrlRead($camfrog) = 1 Then RunWait("Programs\messenger\Camfrog Video Chat 6.1.136.exe") If GUICtrlRead($windowsmessenger) = 1 Then RunWait("Programs\messenger\windowslivemessenger.exe") If GUICtrlRead($ucakoyunu) = 1 Then RunWait("Programs\oyun\Ucakoyunu.exe") If GUICtrlRead($kucukoyun) = 1 Then RunWait("Programs\oyun\oyunkarisik.EXE") If GUICtrlRead($satranc) = 1 Then RunWait("Programs\oyun\3Dsatrancv3.02.exe") If GUICtrlRead($zurna) = 1 Then RunWait("Programs\chat\Zurnamirc.exe") If GUICtrlRead($kelebek) = 1 Then RunWait("Programs\chat\Kelebek FinaL4.exe") If GUICtrlRead($geveze) = 1 Then RunWait("Programs\chat\Gevezescript.exe") If GUICtrlRead($yuzuk) = 1 Then RunWait("Programs\chat\yuzuk.exe") Case $secme GUICtrlSetState($photoshop, $GUI_UNCHECKED) GUICtrlSetState($Reader, $GUI_UNCHECKED) GUICtrlSetState($FlashPlayer, $GUI_UNCHECKED) GUICtrlSetState($FlashPaketi, $GUI_UNCHECKED) GUICtrlSetState($Java, $GUI_UNCHECKED) GUICtrlSetState($Chrome, $GUI_UNCHECKED) GUICtrlSetState($klite, $GUI_UNCHECKED) GUICtrlSetState($eset, $GUI_UNCHECKED) GUICtrlSetState($CCleaner, $GUI_UNCHECKED) GUICtrlSetState($DirectX, $GUI_UNCHECKED) GUICtrlSetState($idm, $GUI_UNCHECKED) GUICtrlSetState($avira, $GUI_UNCHECKED) GUICtrlSetState($winrar, $GUI_UNCHECKED) GUICtrlSetState($Uninstaller, $GUI_UNCHECKED) GUICtrlSetState($nero, $GUI_UNCHECKED) GUICtrlSetState($office, $GUI_UNCHECKED) GUICtrlSetState($framework, $GUI_UNCHECKED) GUICtrlSetState($winamp, $GUI_UNCHECKED) GUICtrlSetState($ultraiso, $GUI_UNCHECKED) GUICtrlSetState($teamviewer, $GUI_UNCHECKED) GUICtrlSetState($turing, $GUI_UNCHECKED) GUICtrlSetState($kuran, $GUI_UNCHECKED) GUICtrlSetState($namazhoca, $GUI_UNCHECKED) GUICtrlSetState($osmanlitanitim, $GUI_UNCHECKED) GUICtrlSetState($osmanlitarihi, $GUI_UNCHECKED) GUICtrlSetState($turkiyetanitim, $GUI_UNCHECKED) GUICtrlSetState($turklerv2, $GUI_UNCHECKED) GUICtrlSetState($yahoo, $GUI_UNCHECKED) GUICtrlSetState($skype, $GUI_UNCHECKED) GUICtrlSetState($googletalk, $GUI_UNCHECKED) GUICtrlSetState($camfrog, $GUI_UNCHECKED) GUICtrlSetState($windowsmessenger, $GUI_UNCHECKED) GUICtrlSetState($ucakoyunu, $GUI_UNCHECKED) GUICtrlSetState($kucukoyun, $GUI_UNCHECKED) GUICtrlSetState($satranc, $GUI_UNCHECKED) GUICtrlSetState($zurna, $GUI_UNCHECKED) GUICtrlSetState($kelebek, $GUI_UNCHECKED) GUICtrlSetState($geveze, $GUI_UNCHECKED) GUICtrlSetState($yuzuk, $GUI_UNCHECKED) GUICtrlSetState($mtu, $GUI_UNCHECKED) GUICtrlSetState($mozilla, $GUI_UNCHECKED) EndSwitch WEnd Func _BlueMouseOver($hWnd, $Msg, $wParam, $lParam) If Not IsDeclared ("BlueLastMsg") Then Global $BlueLastMsg Local $Blue_NID = False If $BlueLastMsg <> $wParam Then $BlueLastMsg = $wParam For $I = 1 to $BlueMouseArray[0][0] If $BlueMouseArray[$I][0] = $BlueLastMsg Then $Blue_NID = True GUICtrlSetData($BlueGuiInfo,$BlueMouseArray[$I][1]) ExitLoop EndIf Next If $Blue_NID = False Then GUICtrlSetData($BlueGuiInfo,$BlueMouseArray[0][1]) EndIf EndFunc Func _BlueMouseSetTip($Blue_NID,$Blue_NMSG) Local $Blue_NID_Hwnd = GUICtrlGetHandle($Blue_NID) If $Blue_NID_Hwnd = 0 Then Return False $BlueMouseArray[0][0] += 1 If UBound($BlueMouseArray) <= $BlueMouseArray[0][0] Then Redim $BlueMouseArray[$BlueMouseArray[0][0] +10][2] $BlueMouseArray[$BlueMouseArray[0][0]][0] = $Blue_NID_Hwnd $BlueMouseArray[$BlueMouseArray[0][0]][1] = $Blue_NMSG EndFunc[/codebox] Edited November 7, 2011 by blue_life Forum görünümünü bozduğu için uzun kod düzenlendi! Quote Link to comment Share on other sites More sharing options...
kamuran731 Posted December 14, 2011 Share Posted December 14, 2011 Blue-Life teşekkür ederim çok güzel codlamışsın Windows7 de denedim şimdi. sorun yok. Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.