Jump to content

korasoglu

Üye
  • Posts

    886
  • Joined

  • Last visited

Everything posted by korasoglu

  1. Bende Popup pencere açtırımaya çalışıyorum fakat web nesnesi açmıyor halbuki firefox htmlyi açıyor ams nin web nesnesi açmıyor. İnternet explorerle denedim oda açmıyor ama firefox açıyor önerileri olan varmı Web.LoadURL("Web1", "AutoPlay\\Kanallar\\Kanal D.html"); Web.SetSilent("Web1", true); Kullandığım kod Birde Mp3 çalarımızdaki slider den de nasıl ilerletebiliriz müziği.. Biraz inceledim Audio.Load(CHANNEL_BACKGROUND, sYol, true, false) nUzunluk = Audio.GetLength(CHANNEL_BACKGROUND) Slider.SetRange("Plugin1", 0, nUzunluk) -- slider aralığını ayarla MediaPlayer.Load("Plugin2", "AutoPlay\\Videos\\MyVid.mpg"); result = MediaPlayer.GetLength("Plugin2"); MediaPlayer.Load--Audio.Load MediaPlayer.GetLength--nUzunluk = Audio.GetLength Mesela bunlar farklı media playere nasıl uyarlanabilir.
  2. Arkadaşlar forumda bir çok playerle ilgili örnek var ama ya çok sade yada linkler ölü sizlerden istediğim varsa elinizde film müzik player örnekleri. Yani Seçilen dosyanın adını , süresini , kalan süresini gösterecek. Birde Progres yerine resim kullansak nasıl yapabiliriz ilerleme ve ses düzeyini gösterecek. Mesela harika psd playerler var fakat bunlarda ilerleme durumu haliyle resim bunu nasıl yapabiliriz. Umarım anlaşılır olmuştur yardımlarınızı bekliyorum herkese bol kazançlı ve kedersiz günler dilerim. Buradan paylaşamam diyen varsa özelden gönderebilir.
  3. Arkadaşlar doğru yanlış seçimi saydırmak istiyorum sYanlisSorular = "" tIsimler = INIFile.GetSectionNames(_SourceFolder .. "\\Autoplay\\Kayitlar\\Yanlis.ini") if tIsimler then nSay = Table.Count(tIsimler); -- yanlsi sorulari say for i,v in pairs(tIsimler) do sYanlisSorular = sYanlisSorular .. "\r" .. v; end end ------------- if tIsimler then Dialog.Message("xxx", "Soruların Tamamını Çözdünüz...\r\n\r\n" .. nSay .. " adet yanlış sorunuz var:\r\n\r\n", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1); else Dialog.Message("xxxx", "Soruların Tamamını Çözdünüz...\r\n\r\nHiç Yanlış Cevabınız yok, tebrikler", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1); end Yanlışı sayıyor aynı anda doğruyuda saydırıp doğrunuz şu yanlışınız şu nasıl deriz.
  4. Sevgili hocam smartdisk 1tb taşınabilir hdd dem var boot menüyü düzenliyeyim dedim boot mgreydi herhalde uzantısına bakmadım bir kaç şey sildim şimdi sizin çalışmayı eklemeye çalışınca dosyaları kopyalamıyor ve disk other key to boot previous mbr diye bir hata veriyor ne yapabilirim harddisk çalışıyor fakat boot olmuyor.
  5. Dünyayı çok seviyorum çünkü cennetin bonusları burada.

    1. nano68

      nano68

      +10 üssü 1000000000000000000000000000000000

  6. Sevgili [color=#800000]Divane TR [/color]Kodları bir yorumlasan mümkünmü daha faydalı olacak kanaatindeyim. Ayrica denedim görev yapıyor.
  7. Sevgili tuğrul tamamı sana ait olmasa emek var teşekkür ederim. Modemi kesme işi eklense nasıl olur.
  8. [size=4][font=arial, helvetica, sans-serif][color=#202020]Bugün bir yaşını daha doldurmanın mutluluğunu yaşarken [/color]hergünün ayrı bir güzelliğe gebe her güzellik yeni bir başlangıca gebe olması dileğiyle Doğum günün kutlu olsun [/font][/size]
  9. Hayırlı olur inşallah Yalnız ilerde mod olunca adil olun anlamsız şekilde konuları çöpe taşımayın diğer fedakar mod lar gibi olmanız dileğiyle.
  10. Arkadaşlar bu mantık yanlış diyelim 100 soru var çalışmamızda yüz sayfamı olacak bu gereksiz bir sayfada halledilebilir.
  11. buyur kardeş düzenlemesini sen yap http://s3.dosya.tc/server3/1epUll/video.rar.html
  12. Chechbox'u resimden yap daha güzel olur yada istediğin resmi göster gizle yap tabi nasıl bir şey istediğin hiç anlaşılmıyor ama aklıma gelen budur
  13. Arkadaşım izleyeceğin videonun linki alacaksın Web nesnesine yükleyeceksin bu kadar yalnız link derken mausla explorer sağ tıkla sağ tıkla sayfa kaynağını göster de
  14. Buyur Butona Page.StartTimer(1000); Label.SetText("Label1", "70"); Label.SetText("Label2", "59"); Ontimer Page.StartTimer(1000); aa1 = Label.GetText("Label1"); aa2 = Label.GetText("Label2"); aa3 = Label.GetText("Label3"); Label.SetText("Label2", aa2-1); if aa2 == "0" then Label.SetText("Label2", "59"); Label.SetText("Label3", aa3+1); end
  15. Sorun ne anlamadım divane buyrun arkadaşlar diyor hepsi bu burnuma hırsızlık kokusu gelmedi
  16. Hocam sizin gecenizde mübarek olsun bu gecede yapılan dualara melekler amin diyeceğine göre biz fakiride unutmazsanız çok sevinirim. Müslümanın müslümana yapacağı en güzel şey dua etmesidir yüce rabbim sizden ve sevdiklerinizden razı olsun ömrünüzü ve kazancınızı bereketlendir...

  17. Teşekkür ederim Hocam yine sorunu çözdünüz
  18. Sevgili BlueLife çalışmadaki logo.png iniden nasıl çalıştırabiliriz. Yani Dosya ismini iiden alacak
  19. Şunu Globale yaz Bak = ""; Birde şu satıra iyi bak tablo ismi doğru olsun ("DELETE FROM kayit (parantez dahil yok Bende tablonun adı kayit seninki ne ise onu yazacaksın )WHERE id='" .. Bak .. "'"); liste = TreeList.GetSelected("Plugin1"); isa = TreeList.GetCellText("Plugin1", liste, 1); if isa == "" then Audio.Load(CHANNEL_NARRATION, "AutoPlay\\Audio\\Hata.wav", true, false); result = Dialog.Message("Selam", "Silinecek kaydı seçmediniz", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1); Page.Jump("Anasayfa") else end local nRow = TreeList.GetSelected("Plugin1") if nRow ~= -1 then local Sorunyok = TreeList.GetCellText("Plugin1", nRow, 2) if Sorunyok ~= "" then Bak = TreeList.GetCellText("Plugin1", nRow, 0) Bak = String.ToNumber(Bak) Veri = TreeList.GetCellText("Plugin1", nRow, 1) Mesaj = Dialog.Message("Selam", Veri .. " adlı kişiyi silmek istiyor musunuz?", MB_YESNO, MB_ICONEXCLAMATION, MB_DEFBUTTON1) if Mesaj == IDYES then SQLite3Cursor, err = SQLite3Connection:execute("DELETE FROM kayit WHERE id='" .. Bak .. "'"); if not SQLite3Cursor and err then Dialog.Message("hata", err) else Page.Jump("AnaSayfa") end end end end
  20. Hocam şunu bir incelerseniz sevinirim. http://s3.dosya.tc/server/xvvghY/bulde_i_tir.rar.html
  21. Ben anlatamamışım diyelim 15 tane Input var 15 tane Inputtaki texti 15 değişkenle değiştireceğiz. Verdiğinizi denemedim cevabınızı okuyunca böyle anladım. Bu örnekte bir link ve bir dosya var Input1 girilen değeri linkte arıyor bulursa Input2 deki değerle değiştiriyor mantık bu ama bunu daha çok değişiikliği nasıl yapabilirim.
  22. Arkadaşlar kintaronun bul ve değiştir diye bir çalışması vardı. Bu çalışmada 1 tane yazı değişimi yapılabiliyor mesela bunu 15 tane olsa nasıl yapabilirim. Kintaronun kullandığı kod şu [codeBOX]sYol = Input.GetText("yol") sMetin1 = Input.GetText("Input1") sMetin2 = Input.GetText("Input2") if sYol ~= "" and sMetin1 ~= "" and sMetin2 ~= "" then sDosya = TextFile.ReadToString(sYol) nAra = String.Find(sDosya, sMetin1, 1, true) if nAra ~= -1 then sDegisen = String.Replace(sDosya, sMetin1, sMetin2, true) TextFile.WriteFromString(sYol, sDegisen, false) Dialog.TimedMessage("OK", "Değiştirme başarılı!", 2000, MB_ICONINFORMATION) else Dialog.Message("Hata", "Aradığınız kelime mevcut değil", MB_OK, MB_ICONEXCLAMATION, MB_DEFBUTTON1) end else Dialog.Message("Hata", "Tüm alanları doldurun", MB_OK, MB_ICONEXCLAMATION, MB_DEFBUTTON1) end[/codeBOX] ------------------------------------------------------------------------------------------------------------------------------------------------------------ Birde Html kod ekliyemiyorum yardımınızı bekliyorum Birdiye işaretlediğim yerleri ardışık olarak "2,3,4..." değişkenden alacak ve web sayfasında gösterecek. Ne olur çalışma örneği demeyin zaten örnek hazırlasam sizlere bunu yazmazdım anlayışınız için şimdiden teşekkür ederim [codebox] <html> <body> <table border="1" width="100%" id="table2"> <tr> <td width="157"><font face="Arial" size="2">ADI</font></td> <td><font face="Arial" size="2">1-----</font></td> </tr> <tr> <td width="157"><font face="Arial" size="2">SOYADI</font></td> <td><font face="Arial" size="2">2</font></td> </tr> <tr> <td width="157"><font face="Arial" size="2">GÖREVİ</font></td> <td><font face="Arial" size="2">3</font></td> </tr> <tr> <td width="157"><font face="Arial" size="2">GÖREV YERİ</font></td> <td><font face="Arial" size="2">4</font></td> </tr> <tr> <td width="157"><font face="Arial" size="2">TC NO</font></td> <td><font face="Arial" size="2">5</font></td> </tr> <tr> <td width="157"><font face="Arial" size="2">ADRES</font></td> <td><font face="Arial" size="2">6</font></td> </tr> <tr> <td width="157"><font face="Arial" size="2">CEP TEL 1 </font></td> <td><font face="Arial" size="2">7</font></td> </tr> <tr> <td width="157"><font face="Arial" size="2">CEP TEL 2</font></td> <td><font face="Arial" size="2">8</font></td> </tr> <tr> <td width="157"><font face="Arial" size="2">EV TEL</font></td> <td><font face="Arial" size="2">9</font></td> </tr> <tr> <td width="157"><font face="Arial" size="2">MAİL 1</font></td> <td><font face="Arial" size="2">10</font></td> </tr> <tr> <td width="157"><font face="Arial" size="2">MAİL 2</font></td> <td><font face="Arial" size="2">11</font></td> </tr> <tr> <td width="157"><font face="Arial" size="2">KAN GRUBU</font></td> <td><font face="Arial" size="2">12</font></td> </tr> <tr> <td width="157"><font face="Arial" size="2"><br> NOT<br> &nbsp;</font></td> <td><font face="Arial" size="2">13</font></td> </tr> </table> </body> </html> [/codebox]
  23. Arkadaşlar sevgili kintaronun telefon defterinde değişiklik yapmak istedim ama olmadı Çalışma Linki http://s3.dosya.tc/server/L00Xtb/Telefon.rar.html Sorun şu yeni kayıtta resim ekleniyor AutoPlay\\Resimler\\ klasörüne kayıttaki ad ve soyadıyla kaydettiriyorum Yani NURULLAHGENÇ gibi Sorum şu düzenlemeye girdiğimiz zaman adi ve soyadı nı uyan resim adresde varsa o resmi yükleyecek yoksa Image.Load("resim", "AutoPlay\\Tema\\yok.png"); bu resmi yükleyicek başaramadım yanı ilgili klasörde resim varsa yükleyecek yoksa yok resmini yükleyecek
  24. Sorun çözüldü her birinize yardımlardan dolayı teşekkür ederim. Şöyle garip bir şey lazım Ams de kameradan resim çekip kaydedilebilirmi.
  25. Evet veri girildiği zaman tek tıklamada yazı kayboldu sağolasın Divane.İnputa telefon numarası girerken alan kod bölümü ve numara bölümü oluyor kan grubunada böyle giriş yapılabilirmi.
×
×
  • Create New...