kompleda Posted November 7, 2012 Share Posted November 7, 2012 arkadaşlar begenirseniz bir tşk yeter Güle Güle Kullanın [url="http://www.mediafire.com/?jncrhm7gja9jv7a"]http://www.mediafire.com/?jncrhm7gja9jv7a[/url] Quote Link to comment Share on other sites More sharing options...
MAKINCI Posted November 8, 2012 Share Posted November 8, 2012 [b]Güzel proje yalnız resimdeki gibi bir hata veriyor...[/b] [img]http://img40.imageshack.us/img40/1073/sshot1tp.png[/img] Quote Link to comment Share on other sites More sharing options...
exalted55 Posted November 8, 2012 Share Posted November 8, 2012 Bune? Amacı nedir? Ne işe yarar dostum? Quote Link to comment Share on other sites More sharing options...
KintaRo Posted November 9, 2012 Share Posted November 9, 2012 [quote name='MAKINCI' timestamp='1352412170' post='1254289'] [b]Güzel proje yalnız resimdeki gibi bir hata veriyor...[/b] [img]http://img40.imageshack.us/img40/1073/sshot1tp.png[/img] [/quote] 14. satırda nDosya = File.Find(*.exe) şeklide exe dosyalarını ariyor ve 15. satirda hiç kontrol yapmadan direk onları döngüye sokuyor. Haliyle Exe dosyalarını bulamayınca yani hiç program yoksa hata veriyor. Page On Show evresindeki kodları şu kodlarla değiştirin: [code]TreeList.AddColumn("Plugin1", "Yazılımın İsimi", 250)--Column Başlıkları TreeList.AddColumn("Plugin1", "Kategori", 110)--Column Başlıkları TreeList.AddColumn("Plugin1", "Boyutu", 75)--Column Başlıkları TreeList.AddColumn("Plugin1", "Favoriler", 59)--Column Başlıkları nFolder = Folder.Find("Programlar", "*", false, nil); if nFolder then--nFolder boş veri değilse anlamına gelir.Bunu yapmamızın nedeni klasör boş ise sonraki işlemlerde veri olmadan adını vs. almaya çalışacağından hata verir. for x,folder in pairs(nFolder) do ComboBox.AddItem("ComboBox1", String.SplitPath(folder).Filename, folder); nDosya= File.Find(folder, "*.exe", false, false, nil, nil);--Belirttiğimiz (Programlar) Konumundaki Belirttiğimiz (.exe) uzantıdaki dosyaları bulur.nDosya tanımlamasında depolar if nDosya then for a,file in pairs(nDosya) do--Basit bir for döngüsü fakat çoğu kişi kulanımında hata yaptığını görüyorum.Oldukca işimize yarıcak bir döngüdür.Burdaki a nDosya'da (5. SAtırdaki komutla belirtilen konumdaki dosya) tanımlı veri adetini temsil eder. 10 adet ise 1,2,3...9,10 verilerini koyarak döngü içindeki komutları çalıştırır.File isi nDosyada tanımlı veriler.Proje içinde fileyi kullanacağız. Ad=String.SplitPath(file).Filename--Normalde kod fazlalaığı yapmaması için addrow içnde kullanırım.Siz görmeniz için burda kullandım.Bu komut belirtilen konumdaki dosya veya klasörün adını alır. nVeri=INIFile.GetValue("Data\\Settings.ini",Ad,Ad);--TreeList'de tanımladığımız bir işlevin devamı aslında.Double Check evresinde favoriye eklemiştik.Burda eklenenleri .ini dosyasından alıyoruz. if nVeri== "1" then--Aldığımız veri 1 ise Favori="Evet" else--Aldığımız veri 1 değil ise Favori="Hayır" end nBoyut = String.GetFormattedSize(File.GetSize(file), FMTSIZE_AUTOMATIC, true);--Burda dosya boyutunu alıyoruz.Normalde File.GetSize(file) şeklinde de alınıyor.Fakat Kb cinsinden yazar.String.GetFormattedSize() komutuyla otamatik birim veriyoruz.Yani veri azsa Kb çoğaldıkca Mb,Gb şeklinde gösterir. TreeList.AddRow("Plugin1",""..Ad.."|"..String.SplitPath(folder).Filename.."|"..nBoyut.."|"..Favori,TreeList.ExtractIcon("Plugin1", file, 0), 0, a)--Burda Rowlara verileri ekliyoruz end end end end Web.LoadURL("Web1","AutoPlay\\Docs\\haber7.html");[/code] Quote Link to comment Share on other sites More sharing options...
exalted55 Posted November 9, 2012 Share Posted November 9, 2012 [quote name='KintaRo' timestamp='1352463346' post='1254400'] [/quote] Kintaro keşke sende probox'un apz dosyasını paylaşsan nekadar mutlu oluruz Quote Link to comment Share on other sites More sharing options...
kompleda Posted November 9, 2012 Author Share Posted November 9, 2012 bende hata falan vermiyor tekradan bakayım Quote Link to comment Share on other sites More sharing options...
kompleda Posted November 9, 2012 Author Share Posted November 9, 2012 evet hata verdi i çinsde program olmadıgı için ama sagolsun arkadaş kod verdi denedim sorun cıkmıyor [color=#282828][font=helvetica, arial, sans-serif]Kintaro kardeş kod için tşkler[/font][/color] Quote Link to comment Share on other sites More sharing options...
KintaRo Posted November 9, 2012 Share Posted November 9, 2012 [quote name='exalted55' timestamp='1352464955' post='1254405'] Kintaro keşke sende probox'un apz dosyasını paylaşsan nekadar mutlu oluruz [/quote] keşke Quote Link to comment Share on other sites More sharing options...
Skorpion Posted November 11, 2012 Share Posted November 11, 2012 Klasör seciminde en üst solda secilmesi durumunda hata veriyor bunun sebebi nedir Quote Link to comment Share on other sites More sharing options...
kompleda Posted November 11, 2012 Author Share Posted November 11, 2012 katagori demi hata veriyor Quote Link to comment Share on other sites More sharing options...
Skorpion Posted November 13, 2012 Share Posted November 13, 2012 Evet [color=#282828][font=helvetica, arial, sans-serif]katagori seciminde hata veriyor[/font][/color] Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.