1.tittle'de Çalışıyor Ama 2.title Kapatmıyor.

[dreamfancy]

Sorun çözüldü çok teşekkürler, list yaparak çözülebiliyor.

Edited August 27, 2013 by dreamfancy

[bybordo]

kapanmayanları birden fazla yaz. 

local $MyList[6] = ["Test1","Test2","Test2","Test3","Test3","Test4"]

[dreamfancy]

 

kapanmayanları birden fazla yaz. 

local $MyList[6] = ["Test1","Test2","Test2","Test3","Test3","Test4"]

 

Denedim hocam hatta sadece 2. title kısmına yazdığım programları kapıyor.Yani navicat premium kısmına yazdığım titleleri kapıyor filezilla titlesini ise tamamen doğru şekilde yazdım ve olmadı. Sadece 2. title kısmına yazdığım şeyleri kabul edip görüp oyunu kapıyor ( 2 .title kısmı navicat premium  ) yazan yerdir.

 

Lütfen yardım edin.. :( Skype açarsanız çok minnettar olurum. :(

Edited August 18, 2013 by dreamfancy

[MostWanted]

Sorun şu: Sen o hile yaptınız MessageBox'undan sonra endif diyip o if bloğunu kapatmışsın (ki zaten neden onun soru olduğunu da anlamadım? ama sanırım yapmak istediğin evet dendiği zaman kapatmaktı.).Neyse sonuç olarak exitloop arrayin ikinci elemanı ($i yi 1 den başlatmışsın.Autoit zero-based çalışır) bulduktan sonra gerekli uyarı verir ve biter.Kodu şöyle düzeltirsen çalışacağını düşünüyorum.

 

local $MyList[4] = ["Test1","Test2","Test3","Test4"] ; Kapanmasını istediğin Pencere isimlerini buraya yaz
  
HotKeySet("p","dur")
  
dim $deger,$Paused
 
$deger = 0
 
dur()
 
Func calis()
 
 
do
for $i = 0 to UBound($MyList) -1
if WinWait($MyList[$i]) Then  ;winexist kullanılabilir
WinClose("LeonMetin2")
WinClose("LeonMetin2")
WinClose("LeonMetin2") ;kapanmasını istediklerini bu şekilde yaz
If MsgBox(0, "LeonMetin2 Mastershield", "Hesabınız hile kullanımından dolayı birkaç saat içerisinde kapatılacaktır." & @CRLF & @CRLF & "Eğer bu bildirimin yanlış bir bildirim olduğunu düşünüyorsanız hemen leonmetin2.net/forum adresinden iletişime geçin.", 5) = 6 Then
ExitLoop
EndIf
EndIf
next 
until $deger = 0
 
 
EndFunc
 
 
func dur()
 
 
if $deger = 1 Then
 
 
$deger = 0
 
 
do
 
 
Sleep(100)
 
 
until $deger = 1
 
 
Else
 
 
$deger = 1
 
 
calis()
 
 
EndIf
 
 
EndFunc