Jump to content

MostWanted

Emekli
  • Posts

    3255
  • Joined

  • Last visited

Everything posted by MostWanted

  1. Bi sistem için bi tane örnek verebilirsen yardımcı olabilirim şöyle ki; Windows Xp ve sürücü c seçildiğinde imagex.exe hangi parametre ile çalışacak?Aynı şekilde sürücü H: seçildiğinde?Bu kombinasyonların arasında bi bağlantı olmalı :)
  2. Link ben de çalışıyor gibi gözüküyor ama rapidshare yine saçmalamış olabilir.Yeni Link: https://dl.dropboxusercontent.com/u/61395489/muzik_calar_v3.1edittalha.rar
  3. Sorun süslü parantezlerden değil.Sorun saçma ama buldum.Biz RegRead'deki value parametresini boş giriyoruz.Ama varsayılan değer en baştan beri hiç atanmamışsa kod bunu bulamıyor.Halbuki o anahar altındaki başka bi değerin adını yazsak ki bunlardan biri muhtemelen current versiondur program çalışacak.Kısaca Şöyle dene; RegRead( "HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\{4A03706F-666A-4037-7777-5F2748764D10}" , "CurrentVersion") ; anahtarın altında olan başka bi değeri yaz sen   if @error then MsgBox(0, "", "Bulamadım ben onu.") else MsgBox(0, "", "Buldum ki onu.") endif
  4. Anahtarın varlığını RegEnumKey ile bulamazsın.O sadece anahtardaki keyleri sıralar.Eğer  "HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\{4A03706F-666A-4037-7777-5F2748764D10}"  anahtarı var mı yok mu öğrenmek istiyorsan şöyle yapmalısın:  RegRead( "HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\{4A03706F-666A-4037-7777-5F2748764D10}" , "")   if @error then MsgBox(0, "", "Bulamadım ben onu.") endif Spesifik key arıyorsan onu da ekleyebilirsin.
  5. @radyofon Kodu eğer öyle yazarsak bu sefer sadece baştaki 11 değil bütün 11 ler yani tarihlerdeki ve saattekiler de değişecektir.O yüzden pek güzel bi çözüm olmasa gerek.Ben şöyle bi çözüm sundum umarım anlaşılırdır.     $dosyan = "Dosya yolunu gir"   Local $txtlines = FileReadToArray($dosyan) If @error Then MsgBox(0,"", "Hata!Dosya okunamadı!") Else For $i = 0 To UBound($txtlines) - 1 $usernumber = StringSplit($txtlines[$i]," ")[1] ; kullanıcı numarası bu ;datayı aldığını nerden söylemediğin için şöyle uydurma bi kod koyuyorum $username = ""; Switch Number($usernumber) Case 11 $username = "Ahmet" Case 12 $username = "Mehmet"   EndSwitch $txtlines[$i] = StringReplace($txtlines[$i],$usernumber, $username, 1) Next EndIf   For $i = 0 To UBound($txtlines) - 1 FileWriteLine($dosyan, $txtlines[$i]) Next  
  6. Bi tane kendimce idare eder bi kalite buldum abi.Sağolasın yine de :)
  7. Noviemre filminin yüksek kalite ve çözünürlükteki sürümünü arıyorum.Henüz bulamadım.Yardımcı olabilecek?
  8. 11'in ahmet olduğu nerde yazıyor peki?
  9. Bu konu "AutoIT" forumundan "Katılımsız Kurulum Destek" forumuna taşınmıştır.
  10. Bu konu "Katılımsız Kurulum Destek" forumundan "Yazılım" forumuna taşınmıştır.
  11. Simge durumuna küçüldüğünde zaten pixel get color u çalıştıramazsın fakat oyun penceresini taşıdığın zaman çalışması lazım.Normal çalışırken ki msgboxlar ne diyor ve çalışmazken msgboxlar ne diyor yazarsan belki bi sonuca ulaşabiliriz.
  12. İlk sorun için pairsin dediğini kullanabilirsin.İkinci için de kullanabilirsin fakat pek verimli bi yöntem değildir onun yerine GUISetAccelerators veya HotKeySet önereceğim. http://www.tnctr.com/topic/232216-guyctrlcreateedit-da-ctrla-yapynca-hepsini-scmyr/   http://www.tnctr.com/topic/151984-inputun-icinde-tuth-kombinasyonu-kullanmak/   http://www.tnctr.com/topic/168620-hotkeyset-ile-bathla-ve-durdur/   gibi bir çok konu bulabilirsin.
  13. Hiç bi ayarla uğraşmak istemeyenler için küçük bi program yaptım.Bilgisayardan çok anlamayan arkadaşlarınıza gönderebilirsiniz.Dns ayarlarını google dns olarak ayarlar. https://db.tt/4vePh3MO
  14. Çok hoş güzel bi program olmuş.Küçük önerilerim var. -Enter tuşuna basıldığında direk arama yapsa?Çok zor bir şey olmadığını biliyorum :) -Listede sıra column u olmasa? Gereksiz duruyor bence. -Listede bi şeye çift tıkladığımızda direk müzik detayı olarak sağ tarafa çıksa.Hiç sağ tıklamayla falan uğraşmasak. -Bi de bazı müzikler indirilemedi ama bazısı indi bunun sebebini bilemiyorum. -Müzikleri arıyorken bekleyin gibi bi ifade olsa?Çünkü bi an program çöktü sandım :) Bunların dışında gayet hoş bi program olmuş.Hatta ben de böyle bi program düşünüyordum gerek kalmaz bile belki ama senin müziklerin 128 kbit iniyor.Kalitesi biraz düşük ona da bi çare bulursan tadından yenmez.
  15. Hata vermesi kodlardan dolayı değil muhtemelen girdiğin bilgilerden dolayı.Kullanıcı adını "kullanıcıadı@domain.name" ve şifreyi doğru girdiğinden emin ol.Ayrıca şifreyi boş bırakacağına 123456 yap kodun içinde yaz illa boş bırakma çabası neden?
  16. Sen misin örnek isteyen :p https://www.dropbox.com/s/qcuhysglg5ycuab/kaspersky.yonetici.au3bu çok eskiden kaspersky anahtarlık uygulaması için yazdığım yönetici uygulamasıydı.İçinde seni ilgilendirmeyen bir çok şey var ve karmaşık gelebilir fakat ctrl+f yapıp _Ftp diye aratıp inceleyebilirsin.
  17. Microsoft forumlarında svchost.exe nin "Arka Plan Akıllı Aktarım Hizmeti" servisi kullandığını ve bunun otomatik güncelleştirmeler vb şeyler için kullanıldığını yazmışlar.Muhtemelen sen baktığında bi güncelleme yapıyordu bilgisayarın.Eğer sürekli devam ediyorsa windows tuşu + r yap sonra services.msc yap "Arka Plan Akıllı Aktarım Hizmeti" servisini durdur ve öyle kontrol et.
  18. Bu iş blackman'in yazdığı gibi winhttp ile çözülecek zaten pyhton kodunda da post metodu (postfile.py nin içinde stackoverflowda gördüm.) kullanılmış ama exenin okurken neden bi kesilmeye uğruyor onu anlayamadım.Belki buraya koyarsan ( özel değilse ) inceleme yapabilirim.
  19. pyhton örneğini gösterir misin?String orda bitme sebeplerinden biri olarak null karaktere gelmiş olabilir autoit sorunudur muhtemelen.
  20. BinaryToString($sINetCode,4) ile çözüldü karakter sorunu.Normalde ansi olarak dönüştürme yapıyordu ama sonuna 4 ekleyince utf 8 olarak dönüştürdü ki bu Türkçeyi destekleyen kodlama. (?i) demek :Case-insensitivity flag. This does not operate as a group. It tells the regular expression engine to do case-insensitive matching from that point on. Türkçesi büyük-küçük karakter önemseme diyen bi flagmiş.Regular expression motoruna o noktadan sonra eşleşen kelimeler için büyük-küçük karakter bakma diyor.Ama help dosyası çok büyük hepsini çeviremem, ayrıca bununla ilgili Türkçe kaynaklar da bulabilirsin.Regular expression'lar önemli konulardır.
  21. #include <Array.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Form1", 404, 314) $Button1 = GUICtrlCreateButton("Button1", 40, 72, 67, 33) $Edit1 = GUICtrlCreateEdit("", 136, 24, 225, 217) $Input1 = GUICtrlCreateInput("2", 40, 40, 63, 21) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1 $i =GUICtrlRead($Input1) $sINetCode = InetRead("http://www.atasozleri.gen.tr/atasozleri-sozlugu/a/page/" & $i & "/", 9) $aResults = StringRegExp(BinaryToString($sINetCode,4), '(?i)<h2><a\h+href="http:\/\/.*\/"\h+title="(.*)">', 3) GUICtrlSetData($Edit1, MakeItString($aResults)) EndSwitch WEnd func MakeItString(ByRef $in_array) $result = "" For $t = 0 To UBound($in_array) - 1 $result &= $in_array[$t] & @CRLF Next Return $result EndFunc İstediğin kod bu.Tabi atasözlerini almak biraz uzun sürüyor oraya splash falan koyabilirsin. Edit: Blackman12 [spoiler][/spoiler] O soru işaretlerini falan help de okuman gerek.Hatırladığım kadarıyla soru işareti oraya herhangi bi karakter gelebilir demekti.
  22. Öyle bi kullanım yok da sanırım sormak istediğin func aliveli($a=0) nedir gibi bir şey.Bu default değerdir yani sen programın herhangi bir yerinde aliveli() diye fonksiyonu çağırırsan fonksiyonun içinde $a değişkeni 0 olarak işlem görür ama aliveli(5) diye tanımlarsan bu sefer 5 olarak işlem görür.
  23. Aslında byref'in anlamı çok daha derin, hatta modern programlama dillerinin çıkmasının ana sebeplerinden biri bile diyebilirim.Çok üstünkörü bir biçimde anlatmaya çalışacağım ama konu kendisi kompleks olduğu için anlamayabilirsin dert etme.Bir program yazılırken değişkenler kullanılır.Bu değişkenler integer (yani sayı) gibi sadece 4 byte (ki bu da değişkendir ama genellikle şu an öyle) bi char gibi 1 byte (bu da değişken boyuta sahip) gibi küçük değerlere sahip olduğu gibi bi arrayin boyutu veya bi veri yapısının boyutu megabaytları bulabilir.Eski programlama dilleri bir fonksiyona veri gönderirken kullandığı mekanizma ilk memory bölgesinden fonksiyonun kullanacağı yere kopyalaama şeklindedir.Yani alır senin değişkeninin aynısını fonksiyonun çalışacağı memory bölgesine kopyalar, execute eder ve işin bitince stackten alır başını gider bunlar.Bir sayıyı kopyalamak (4 byte) çok hızlı bir işlemken megabytelarca veriyi kopyalamak çok kısa olmuyor aynı zamanda fazlaca ramden yer alıyor.Bunun için byref (başka dillerdeki karşılığı başkadır) kullanılır.Kısaca bunu kullandığın zaman sen veriyi değil, verinin referansını yani adresini fonksiyona yollarsın bu da 32 bit makinelerde 4 byte 64 bitlerde 8 bytedır ki ne olursa olsun diğeriyle karşılaştırılamayacak kadar hızlı olur.Tabi bunun doğurduğu başka sorunlar "const kullanımı" gibi şeyler var ama aklını daha da fazla karıştırmak istemiyorum.Kısaca büyük veri yapılarında ve arrayleri fonksiyona yollarken byref kullanmak performansı çokça artırır biçiminde yorumlayabilirsin.
×
×
  • Create New...