Jump to content

MostWanted

Emekli
  • Posts

    3255
  • Joined

  • Last visited

Everything posted by MostWanted

  1. $okuyucu=ControlGetText("NetSupport School Ürün Aktifleştirme", "", "[CLASS:Static; INSTANCE:9]")[/CODE] E artık yazdırma işini de sen yaparsın artık olmazsa exeyi ver bana da bari ben yapayım
  2. Öyle yaparsan sağlam olmaz. ControlSetText[/CODE] ile tek tek inputlara yazdırırsan dağa sağlam olur..Ama tam teşkilatlı örnek yapabilmem için pencerenin au3info programındaki bilgileri lazım.. Edit: Yanlış görmüşüm Ordaki yazıları ise ControlGetText ile alabilirsin
  3. Her şeyi devletten beklememek lazım Ben öyle yapmışım sen diğer türlü yapar düzeltirsin artık sana kalıyor gerisi
  4. Aslında sorun yok Kintaro sadece listbox'a çift tıklayınca çalışsın diye ayarlamış bende bozmadım.O senin hata dediğin yere gelince bnm dalgınlığa gelmiş Pause butonundaki Dialog.message komutunu kaldırırsan sorun olmaz
  5. Win7 'de tooltip daha hoş duruyo Paragrafı gördüm dedim noluyor Bu arada şu tasarımı düzenleyen birisi olursa Allah rızası için bi de Tekrar Et, Karıştır gibi seçenekler eklesin de ona göre de komut yazalım
  6. Audio.Seek(CHANNEL_BACKGROUND, SEEK_BACKWARD, 5);[/CODE] İlk değişken müziğin kanalı, 2. değişken nasıl bir sarma işlemi yapılacağı son değişkende kaç saniye sarılacağını veriyor
  7. Müzik Çaları biraz editledim Daha kullanışlı ve güzel oldu ekran görüntüsü ve eklediğim düzelttiğim özellikler aşağıda; Değişiklikler; -Play/Pause ile Ses Aç/Ses Kapat butonları birleştirildi. -Şarkının progressini gösteren bi progress bar eklendi. -Şarkıya İleri/Geri Sarma özelliği eklendi.(5 saniyedir.Bunu kendiniz ayarlayabilirsiniz..) -Şarkı bittikten sonra sonraki şarkıya geçme eklendi.(Karışık veya tekrar etme modu da ekleyebilirdim.Fakat sabah sabah onun tasarımına üşendim Eğer birisi eklerse bende komutlarını yazabilirim ) -Butonların üstüne gelince Paragraf çıkması yerine Tooltip eklendi (Kintaro'cum bundan sonra bunu kullanırsın artık ) -Ses butonu düzenlendi.Başlangıçta müziğin sesine göre açılmıyordu.(Kintaro Audio.SetVolume'nin max değeri 255, 100 değil ) -Küçük kod ve gui düzenlemeleri.. Değişiklikler bu kadar.Ve dediğim gibi eğer birisi tasarımını yaparsa "Karışık" ve "Tekrar Et" modlarını da yapabilirim.. http://rapidshare.com/files/401536604/muzik_calar_v2edit.talha.rar[/CODE]
  8. FileCopy(@DesktopDir & "\NetSupport School TR YAMA\PCIVIDEO.EXE", @ProgramFilesDir & "\NetSupport\NetSupport School\PCIVIDEO.EXE")[/CODE] Bu komutla istediğin dosyayı kopyalayabilirsin ama senin istediğin FileInstall ile almaksa şöyle yapacaksın; [CODE]FileInstall"(C:\Documents and Settings\Administrator\Desktop\NetSupport School TR YAMA\PCIVIDEO.EXE", @ProgramFilesDir & "\NetSupport\NetSupport School\PCIVIDEO.EXE")[/CODE] Böyle yaparsan dosyan exe nin içine gömülmüş olur ve çalıştığından Program Files'teki Net Support klasörüne istediğin exe atılır.Ve son bir öneri Program Files klasörü için @ProgramFilesDir, masaüstü için @DesktopDir Kullan
  9. AMS 8 dosyası olmasından dolayı olabilir..
  10. Gayet hoş gözüküyor.Fakat 5 tane radyo frekansı için 7.5 mb çok olmuş gibi?
  11. -- arguments: width, height, Depth, Freq, Permanent (0 false, 1 = true) ChangeDisplaySettings(800,600,16,70,0)[/CODE] Global Kısmına; [CODE]--[[ function name: ChangeDisplaySettings Arguments: width, height, Depth, Freq, Permanent (0 false, 1 = true) Returns: 0 = The settings change was successful. 1 = The computer must be restarted in order for the graphics mode to work. -4 = An invalid set of flags was passed in. -1 = The display driver failed the specified graphics mode. -2 = The graphics mode is not supported. -3 = Windows NT only: Unable to write settings to the registry. Description sets the users screen res ]] -- Global function for the screen settings, !!!DO NOT EDIT!!! function ChangeDisplaySettings(width,height,Depth,Freq,Permanent) args = width..", "..height..", "..Depth..", "..Freq..", "..Permanent result = DLL.CallFunction("AutoPlay\\Docs\\DLLDisplaySettings.dll", "ChangeDisplaySettings", args, DLL_RETURN_TYPE_STRING, DLL_CALL_STDCALL); if result == "0" then local hWnd = Application.GetWndHandle(); local WndSize = Window.GetSize(hWnd); local ScreenRes = System.GetDisplayInfo(); local NewPos_X = (ScreenRes.Width - WndSize.Width)/2; local NewPos_Y = (ScreenRes.Height - WndSize.Height)/2; Window.SetPos(hWnd, NewPos_X, NewPos_Y); else if result == 1 then err = "The computer must be restarted in order for the graphics mode to work" elseif result == "-4" then err = "An invalid set of flags was passed in" elseif result == "-1" then err = "The display driver failed the specified graphics mode" elseif result == "-2" then err = "The graphics mode is not supported" elseif result == "-3" then err = "Unable to write settings to the registry" end Dialog.Message("Error", err, MB_OK, MB_ICONNONE, MB_DEFBUTTON1); end end[/CODE] Fonksiyonun açıklaması üstünde yazmaktadır.Son olarak dll'sini vereyim; [CODE]http://rapidshare.com/files/399765429/DLLDisplaySettings.dll[/CODE] Projenizin Doc klasörüne atın.Ondan sonra en üstteki komutu hangi butonla değiştirecekseniz artık onun On Click evresine koyun..
  12. Bildiğim kadarıyla @ProgramFilesDir X64 lerde de o yolu vermesi lazım (ProgramFiles(86)) fakat vermiyorsa aşağıdaki gibi bi yol deneyebilirsin.Aynı şey FileCopy içinde geçerli.. $type=@OSArch If $type = "X86" Then ShellExecute(@ProgramFilesDir & "\abcprogramı\abc.exe") Else ShellExecute(@HomeDrive& "\ProgramFiles(86)\abcprogramı\abc.exe") EndIf[/CODE]
  13. Ne yalan söyliyim can sıkıntısından patlıyorum birisi yardım istediği zamanda anında cvp vermeye çalışıyorum
  14. Cevap 1 If WinGetState("apenceresi") <> 0 Then ;~ pencere bulununca ne yapılacaksa Else ;~ eğer bir şey olup da pencere çıkmazsa devam etmek için EndIf[/CODE] 2. sorununda cevabı aynı şekilde olabilir.Aynı mantıkla çözebilirsin..
  15. Hayır canım ne alakası var.. HTTP.Download("http://www.talpsoftware.co.cc/tlny.xml", _TempFolder .. "\\tlny.xml", 80, 20, nil, nil) -- xml i indir XML.Load(_TempFolder .. "\\tlny.xml") -- xml i hafizaya yükle xml_version = XML.GetValue("winamp/version"); -- xml deki version noyu al ini_version = INIFile.GetValue("Autoplay\\Docs\\tlny.ini", "winamp", "version") -- ini deki version noyu al nmbXml = String.ToNumber(xml_version) -- alinan degeri sayıya cevir nmbIni = String.ToNumber(ini_version) -- alinan degeri sayiya cevir if nmbIni < nmbXml then -- eger inideki xml den kucukse StatusDlg.Show() -- ilerleme cubugunu goster HTTP.Download("http://www.talpsoftware.co.cc/at.rtf", "Autoplay\\Docs\\at.rtf", 80, 20, nil, nil) -- guncelleme dosyasini indir StatusDlg.Hide() -- ilerleme cubugunu gizle INIFile.SetValue("Autoplay\\Docs\\tlny.ini", "winamp", "versiyon", nmbXml) Dialog.Message("Tebrikler", "Güncelleme başarılı") -- basarili mesajini ver else -- surumler aynı ise Dialog.Message("Tebrikler", "Güncellemeye gerek yok") -- guncel mesajini ver end[/CODE]
  16. Ne gerek var ki..Ini.Setvalue ile yapabilirsin çok zor olmaz...
  17. Ben sana ne diyorum.güncellemeyi yaptıktan sonra ini'deki değeri de değiştirecen 351 yapacaksın..
  18. @TLnY tam olarak demek istediğin ne?Güncellemeyi başarılı biçimde yaptıktan sonra ini'deki veriyonu da 350 yapacaksın o zaman XML ile INI aynı olmuş olacak.Daha sonra Yeni versiyon güncellemesi olduğunda XML'deki yazıyı atıyorum 351 yapacaksın olup bitecek..
  19. Programcılık böyle bir harf bie saatleri alabilir.Bundan sonra daha dikkatli olursun
  20. Sanırım download'da sorun var.Çünkü ben verilen linke girdim ama ne xml var ne de başka bişe?
  21. Eğer bir sorun varsa şöyle yap denemek için. if satırından önceki satıra Dialog.Message(nmbIni, nmbXml) yaz ve bak bakalım iki değerde düzgün biçimde okunuyor mu?Bir tanesi okunmuyorsa sorun var demektir...Bu bnm genelde kullandığım taktiktir..
  22. Ben hemen örnek hazırlamak için masaüstüne koymuştum xml'yi sizi yanıltacağını düşünmüyodum ama neyse geç de olsa hatayı gördük
  23. Bu arada bende sendeki bi yanlışlığı düzelteyim. HTTP.Download("http://wwww.talpsoftware.co.cc/tlny.xml", _TempFolder .. "\\tlny.xml", 80, 20, nil, nil) -- xml i indir XML.Load(_DesktopFolder.."\\tlny.xml") XML'yi indirdikten sonra yanlış XML'yi hafızaya aldırıyosun. XML.Load(_TempFolder.."\\tlny.xml") yapacaksın
  24. Bu arada XML'yi de yanlış okutuyomuşun onu farkettim XML.Load(_DesktopFolder.."\\tneyse artık.xml") XML.GetValue("update/winamp/version") Olarak okut bakalım sorun çıkacak mı?
  25. Kintaro'nun dediği doğru.İni'den yanlış biçimde okutuyosun.Eğer sorun hala devam ediyorsa bizimle paylaşmadığın bişey var demektir..
×
×
  • Create New...