Jump to content

aylavyu

Üye
  • Posts

    441
  • Joined

  • Last visited

Everything posted by aylavyu

  1. Üstad cevapların için cok teşekkürer ederim. Sana son bi sorum olacak [i] Run(@ProgramFilesDir & "\Webteh\BSplayerPro\bsplayer.exe")[/i] Bu komut , Bs playeri kurduktan sonra yeniden açmıyor lisanslamak için.Xp de denedim sorunsuz çalışıyor ama, win 7 x64 başka bi komut kullanabir miyim hem xp de hem win 7 x64 de çalışması için?
  2. Ekran taşınma olayı yok herşey gözüküyor. simge durumuna küçültüyo sadece. key filan girerken gözüküyo normal mi
  3. Buyur komutları [code]#NoTrayIcon #RequireAdmin #Region ;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_Icon=Library\BSPlayer.ico #AutoIt3Wrapper_Outfile=KBSPlayer.exe #AutoIt3Wrapper_Compression=4 #AutoIt3Wrapper_Res_Description=Katılımsız BsPlayer #AutoIt3Wrapper_Res_Fileversion=1.1.0.0 #AutoIt3Wrapper_Res_LegalCopyright=© 2010 BlueLife #AutoIt3Wrapper_Res_Language=1055 #AutoIt3Wrapper_Res_Field=BSPlayer Version|2.5.6.1043 #AutoIt3Wrapper_Res_Field=CompanyName|BlueLife #AutoIt3Wrapper_Res_Field=Dosya Adı|KEasyBoot.exe #AutoIt3Wrapper_Res_Field=Hazırlama Tarihi|%date% %time% #AutoIt3Wrapper_Res_Field=AutoIt Versiyonu|%AutoItVer% #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** #Region #EndRegion #include <Library\BlueLife.au3> ;Benim hazırladığım kütüphane ; Kur dosyamızı sessiz kurmak için gerekli parametremizi bir değişkene atıryoruz. Global $Parametrem = "/S" Global $UserName = "Burası" ;Lisans bilgilerini düzeltin Global $Register_Code = "Burası" ;Lisans bilgilerini düzeltin Global $Download = False ;codecmanager.exe programı çalışırsa sonlandırır. ;Internet bağlantısını engelliyor ; Temp klasöründe olmayan bir dosya ismi belirliyoruz. Global $Setup_File = _TempFile() ; Dosyalarımızı autoit içine alarak belirlediğimiz isimde Temp klasörüne çıkartıyoruz. ; BsPlayer kurunu BSPlayer.exe olarak isimlendirip Library klasörüne koyunuz. FileInstall("Library\BSPlayer.exe", $Setup_File) ;Programı belirlediğimiz parametre ile çalıştırıp pidini bir değişkene atıyruz. Global $ProgramPID = Run($Setup_File & " " & $Parametrem) Do If Not $Download And ProcessExists("codecmanager.exe") Then ProcessClose("codecmanager.exe") Sleep(500) Until Not ProcessExists($ProgramPID) ;Şimdi kurulan BsPlayeri lisanlamak için açalım ; ============================================================== Global $ProgramPID = Run(@ProgramFilesDir & "\Webteh\BSplayerPro\bsplayer.exe") ;Çalıştırdığımız programın pidini bir değişkene atayalım. If $ProgramPID <> 0 Then ;Programımız çalışmışsa If WinWait("[CLASS:BSPlayer]", "", 10) <> 0 Then ;BsPlayer ekranını 10 saniye bekleyelim WinSetState("[CLASS:BSPlayer]", "", @SW_MINIMIZE) ;Ekranı simge durumuna atalım If WinWait("[CLASS:Trgfrm.UnicodeClass]", "", 5) <> 0 Then ;;Lisans penceresi 5 saniye içnde görünürse WinMove("[CLASS:Trgfrm.UnicodeClass]", "", @DesktopWidth + 10, @DesktopHeight + 10) ;Ekranı görünmeyecek bir yere taşıyalım BlockInput(1) ;Fare ve klevyeyi kitleyelim ControlSetText("[CLASS:Trgfrm.UnicodeClass]", "", "TTntEdit.UnicodeClass2", "IcyCool") ;Register bilgilerini giriyoruz ControlSetText("[CLASS:Trgfrm.UnicodeClass]", "", "TTntEdit.UnicodeClass1", "2992A28687A90445B3E1CF4D067C127D179FB1B0E3C0") ControlCommand("[CLASS:Trgfrm.UnicodeClass]", "", "TTntButton.UnicodeClass1", "Check") ;Onaylıyoruz. BlockInput(0) ;Fare ve klevyenin kilitini kaldıralım If WinWait("[CLASS:#32770]", "BS.Player", 5) <> 0 Then ;Mesaj ekranını 5 saniye bekleyelim WinMove("[CLASS:#32770]", "BS.Player", @DesktopWidth + 10, @DesktopHeight + 10) ;Ekranı görünmeyecek bir yere taşıyalım ControlCommand("[CLASS:#32770]", "BS.Player", "Button1", "Check") ;Onaylıyoruz. EndIf If ProcessWaitClose($ProgramPID, 10) = 1 Then ;Çalıştırdığımız bsplayer 10 saniye içinde kapanırsa bir süre yeniden açılma olsılığına karşı önlem alalım If ProcessWait("bsplayer.exe", 7) <> 0 Then ;Bsplayerin yeniden başlamasını 7 saniye bekleyelim ProcessClose("bsplayer.exe") ;kapatalım EndIf EndIf EndIf EndIf ProcessClose($ProgramPID) ;Çalıştırdığımız program açıksa kapatalım. EndIf ; ============================================================== FileDelete($Setup_File) ;Şimdi temp klasörüne çıkarttığımız dosyamızı silelim. Exit ; Çıkış[/code]
  4. [b][color="#FF6633"][color="#FF6633"]blue_life[/color][/color] senin veriğin örnek le yaptım oldu gibi ama anlamadığım çok şey var.[/b] ekranı gizlemiyor mesela kurulurken global komutlarını silsem olurmu işlevi nedir? librayde *.ico dosyası var ama kullanılmıyor ne işey yarıyor o buil dedikten sonra simge değişimi iiçn sanırım ama olmuyor
  5. X64 benim sistemim x64 lerde çalışır mı o örnek
  6. Anlatmak istediğim. Bs Player 2.57 sürümünü bilgisayarına İlk defa kurduğunda son finish ekranı farklı geliyor. Makinende varsa silip de tekrar kurarduğunda veya üzerine kurduğunda da farklı bir ekran geliyor (finish ekranı) WinWait("BS.Player PRO Setup " , "[color="#FF0000"]Installation Complete")[/color] WinWait("BS.Player PRO Setup " , "[color="#FF0000"]Completing the BS.Player PRO Setup Wizard[/color]") Kırmızılar dediğim farklı 2 ekran. Sorunum ise bunları herhalukarda kapattırmak. yani sorunsuz kurulum yapmak .au3 dosyasını da veriyim [code]http://www.mediafire.com/?lc09pkrow1x18da[/code]
  7. BS playerda kurdururken cok basit bir sorun yaşadım ama çözümünü bulamadım. Program yüklenirken son sayfada duruma göre 2 sayfa geliyor 2 side kurulum bitti ekranı. ben 2 sin de de finish e tıklamasını istiyorum nasıl yapabilirim. sadece birinde yapabliyorum
  8. Nerdeyse vazgeçmek üzereyim. Ne yaptıysam silent kurulum yapamadım. elimde .sim ile aktivasyon.reg dosyası var ama, katılımsız kurduruyorum herşey güzel. kuruluyor. programdan çıkarken 30 days trial penceresi geliyor .( ne yapmam gerekiyo [img]http://www.tnctr.com/uploads/imgs/pre_1314618356__x.jpg[/img]
  9. [quote name='mehmetben' date='27 August 2011 - 12:35 ' timestamp='1314448550' post='1070708'] Evet bu sorunun cevabı çok kez yanıtlandı Yanlız şöyle bir durumda var örneğin about sayfası küçülttün o sayfa açınca sayfa ortalanmıyor ilk sayfanın sol üstüne doğru kayıyor onun yanıtını veremem çünki forumda böyle bir konuya rastlamadım. KintaRo abi bu soruya cevap verirse hem ben faydalanırım hemde sen [/quote] evet yeni farkettim sağ üste kaysa daha iyi olur
  10. Usta valla çok aradım basit birşey oldğu iin bulamadım heralde önemli değil canıın sağolsun snn
  11. [b] Herkese iyi günler başlıktan da anlaşılacağı gibi çok basit bir sorum var. Yapamadım bir türlü About sayfası gibi birşey yapacam. Ama 2 sayfada aynı oluyor. [/b]
  12. Usta be Aylavyu. MSN ini ekledim. Ordan konuşalım

  13. webcam nasıl? görüntü kalitesi filan
  14. İstek katılımsız oyun var mı ?

    tnctr ölmüş ya :(

  15. Gelmiş geçmiş en iyi NFs serisi olacak gibi
  16. [b]Oyun çok güzelde hemen bitmesi kötü [/b]
  17. vatana millete çok faydalı bir program. DİKKAT: Teşekkür Etmek İstiyorsanız Butonunu Kullanmanız Gerekmektedir.
  18. bunları Koskaca pes ekibi yapamamışta kim yapmış ? oyunu mu bozdurcanız güvenli değil
  19. aio krallarından biri :=D

  20. adam coştu yaa :)

×
×
  • Create New...