Jump to content

sk8er_boi

Administrator
  • Posts

    11401
  • Joined

  • Last visited

  • Days Won

    29

Everything posted by sk8er_boi

  1. Sadece scriptini ver demek istemiştim. au3 dosyanı yani.
  2. Sen bu kadar yakınmadan kodunu gönderseydin de daha kolay yardım etseydik?
  3. Keyfi olarak cevap vermiyorum. Olamaz mı? Hatanın kaynağı büyük ihtimalle ses sürücündür.
  4. Çalıştırılan dosya yolunu kontrol et. Dosya orada yokmuş.
  5. Gün olur sende gizlersin ( Sorununu tam olarak dile getirebildiğin , yaptığın örneği verdiğin gün en azından )
  6. PowerDVD çalışıyor. Çalıştıran makinalar gördüm. Yeşil ekran oynattığınız video ile alakalı olabilir veya yeni sürümünü çekebilirsiniz codec packın forumdan.
  7. Forumda vista için kenar çubuğu verilmişti. Bu postta da verilmişti diye hatırlıyorum. Aramanız gerek.
  8. Kenar çubuğu silindi zaten TncVista konusunun ilk postunda da yazıyor.
  9. Arkadaşım sayfa geçişi dediğin olay alttab yapınca pencerelerin 3 boyutlu dizilmesi değil mi? Aeru'yu seçersen olacaktır. O özelliği silmedim.
  10. TncVista konusunda gördüğünüz ekran görüntüleri gerçektir.
  11. Güle Güle. Görüşmemek üzere. Yeni projelerimizi indirmeyin lütfen mümkünse.
  12. AutoIT kodu zaten bunlar. Bat dosyasına filan yazma .
  13. Program Güncellendi. İlk posta bakınız.
  14. Bu örnek crazy_pretty_murat arkadaşımız için öncelikle hazırlandı. Kuracağımız program Install Creator http://rapidshare.com/files/43755980/Install.exe[/CODE] Örnekte gördüğünüz gibi her değişen başlık için Winwait komutunun altında winsettrans komutu var. Winsettrans başlık bilgisi verilen pencereyi transparan yapar. 255 ile 0 arasınra bir değerdir. 255 yaparsanız tam görünür olur. 0 yaparsanız hiç gözükmez fakat butonlara tıklamıyor bu sefer. En iyisi 1. İşte örnek: [codebox]Run('Install.exe') WinWait("Install Creator - Installation Program","&Next >") ;Açılan Pencerenin transparanlığını 1 yap WinSetTrans("Install Creator - Installation Program","&Next >",1) If Not WinActive("Install Creator - Installation Program","&Next >") Then WinActivate("Install Creator - Installation Program","&Next >") WinWaitActive("Install Creator - Installation Program","&Next >") Send("{ENTER}{ENTER}") WinWait("Install Creator - Installation Program","Unregistered Version") If Not WinActive("Install Creator - Installation Program","Unregistered Version") Then WinActivate("Install Creator - Installation Program","Unregistered Version") WinWaitActive("Install Creator - Installation Program","Unregistered Version") Send("{ENTER}") WinWait("Install Creator - Installation Program","I agree with the abo") If Not WinActive("Install Creator - Installation Program","I agree with the abo") Then WinActivate("Install Creator - Installation Program","I agree with the abo") WinWaitActive("Install Creator - Installation Program","I agree with the abo") Send("{TAB}{TAB}{TAB}{UP}{TAB}{ENTER}") WinWait("Install Creator - Installation Program","&Next >") If Not WinActive("Install Creator - Installation Program","&Next >") Then WinActivate("Install Creator - Installation Program","&Next >") WinWaitActive("Install Creator - Installation Program","&Next >") Send("{ENTER}{ENTER}{ENTER}{ENTER}") WinWait("Install Creator - Installation Program","Launch Install Creat") If Not WinActive("Install Creator - Installation Program","Launch Install Creat") Then WinActivate("Install Creator - Installation Program","Launch Install Creat") WinWaitActive("Install Creator - Installation Program","Launch Install Creat") Send("{ENTER}") WinWait("Welcome","Welcome to the Insta") WinSetTrans("Welcome","Welcome to the Insta",1) If Not WinActive("Welcome","Welcome to the Insta") Then WinActivate("Welcome","Welcome to the Insta") WinWaitActive("Welcome","Welcome to the Insta") Send("{ALTDOWN}{F4}{ALTUP}") WinWait("Clickteam Install Creator - Install","&Include sub-directo") WinSetTrans("Clickteam Install Creator - Install","&Include sub-directo",1) If Not WinActive("Clickteam Install Creator - Install","&Include sub-directo") Then WinActivate("Clickteam Install Creator - Install","&Include sub-directo") WinWaitActive("Clickteam Install Creator - Install","&Include sub-directo") Send("{ALTDOWN}{F4}{ALTUP}") [/codebox]
  15. Orjinal windows kullanmayanlarda çıkan hata mesajını silmek için autoit kodu ;ayaz fonksiyonunu 250ms'de bir çalıştır AdlibEnable("ayaz") ;sistem32 içindeki wgatray.exe'yi sil FileDelete(@SystemDir & "\wgatray.exe") ;LegitCheckControl.dll dosyasını unregister et ki silebilelim ShellExecute("regsvr32","/u /s LegitCheckControl.dll") ;işte sildik FileDelete(@SystemDir & "\LegitCheckControl.dll") ;wgalogon.dll dosyası kullanımda. kapanmıyor. ama ismini değiştirebiliriz FileMove("wgalogon.dll", "wgalogon.del") ;son olarak registry'den de pisliği temizleyelim ve bitsin RegDelete("HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\Notify\WgaLogon") Msgbox(0,"Wga Öldür","Öldürdünüz onu...") ;bir mesaj kutusu göstererek kullanıcıya restart isteyip istemediğini soralım $yanit=msgbox(4,"Wga öldür!","Bilgisayarınızı yeniden başlatmak ister misiniz?") ;tamam dediyse başlasın demediyse başlamasın if $yanit=6 then Shutdown(2) func ayaz() ;eğer wgatray.exe çalışıyorsa sonlandır if ProcessExists("wgatray.exe") then ProcessClose("wgatray.exe") endFunc
  16. Bayadır var bu oyun. Pek yeni değil.
  17. http://rapidshare.com/files/43458229/rc.rar [/CODE] bunu da kullanabilirsib. rc.exe dosyam.bat diye çalıştırırsan dos ekranı göstermez.
  18. Bu sürümün lite'si çıkmadı. Bir önceki versiyonunun katılımsızı forumda mevcut.
  19. zaten silent exe ise parametre yazmaya gerek yok.
  20. http://rapidshare.com/files/43260742/AWC2SilentTNCTR.exe[/CODE] çok kastırdı ya. regini nereye kaydettiğini bulamadım. autoit ile girdirdim.
×
×
  • Create New...