KintaRo Posted August 3, 2011 Share Posted August 3, 2011 Yine istek üzerine bir çalışma yaptım. [member='shmd'] arkadaşımız ingilizce öğrenmede faydalı olacağını düşündüğü bu projede yapabilecekleriniz; - kelime ekleyebilme - veritabanından ekrana rastgele ingilizce yada türkçe kelime getirip karşılığını girerek doğru yada yanlış olduğunu görme. - o anki oturum için kaç doğru/yanlış yaptığını görme - genel toplamda kaç doğru/yanlış yaptığını görme - veritabanına daha önce eklenmiş kelimeleri ve karşılıklarını listeleme Veritabanı olarak SQLite3 kullandım. Şimdi gelelim eksiklere. Örnek çalışma olduğu için ve pekde vaktim olmadığı için tasarıma özen göstermedim. Geliştirmek isterseniz ekleyebilecekleriniz; - Güzel bir tasarım - Arka plan - Buttonlara simgeler - Veritabanında ekli olan kelimeleri listicon gibi güzel bir nesnede sıralı olarak listeleme - Veritabanında ekli olan kelimeleri silme/düzenleme - istatistikleri sıfırlama - ve diğer aklınıza gelebilecek şeyler. [color="#000000"][b]Ekran Görüntüleri:[/b][/color] [spoiler][img]http://i.imgur.com/61MqV.png [/img] [img]http://i.imgur.com/q9mMN.png [/img] [img]http://i.imgur.com/NtFcR.png [/img] [img]http://i.imgur.com/73BjU.png [/img] [img]http://i.imgur.com/HbkUz.png[/img][/spoiler] [color="#000000"][b]Proje Dosyası (APZ):[/b][/color] [code]http://www.mediafire.com/?718zj8vfownsqr8[/code] [color="#000000"][b]EXE:[/b][/color] [code]http://www.mediafire.com/?81s9c5aw1x99ude[/code] Quote Link to comment Share on other sites More sharing options...
Bitmap Posted August 3, 2011 Share Posted August 3, 2011 (edited) merhaba abi.. yine döktürmüşsün.. bi sorum var mesela bir listeyi while döngüsü ile alt alta ekletmek mümkün mü? Şöyle yani.. Inı dosyasında 12 tane section var numaralı 1 2 3 diye gidiyor... bunların değerlerini while döngüsü ile 1 den 12 ye kadar alt alta listeletmek yada gride eklemek mümkünmü.. Edited August 3, 2011 by byvistakazim Quote Link to comment Share on other sites More sharing options...
KintaRo Posted August 3, 2011 Author Share Posted August 3, 2011 while döngüsüne koşul koymazsan tüm satırları listeler. Belli bir aralığı yazdırmak için for i=1,12 do -- kodlar end dersek 1 den 12 ye kadar listeler. örnek verelim: [codebox]tSections = INIFile.GetSectionNames("AutoPlay\\Docs\\a.ini") -- section isimlerini al nCount = Table.Count(tSections) -- section isimlerinin depolandiği tabloyu say if nCount >= 12 then -- eğer tabloda 12 veya daha fazla nesne varsa for i=1,12 do sDeger = INIFile.GetValue("AutoPlay\\Docs\\a.ini", tSections[i], "deger") -- sıradaki section'ın deger verisi karşılığını al ListBox.AddItem("ListBox1", sDeger) -- yazdır end end [/codebox] kullandığımız ini: [codebox][1] deger=osman1 [2] deger=osman234 [3] deger=osman3435636 [4] deger=osman436565 [5] deger=osman36346346 [6] deger=osman346346356 [7] deger=osman2542465 [8] deger=osman5454 [9] deger=osmancv3q3 [10] deger=osmanb3b32 [11] deger=osman3b3b2 [12] deger=osman32b32b [13] deger=osman32b32b111111111111111111111111111111111 [/codebox] [code]if nCount >= 12 then [/code] demesekte aynı işi yapardı ama eğer 12 den az section varsa hata verirdi. yada [code]for i,v in pairs(tSections) do sDeger = INIFile.GetValue("AutoPlay\\Docs\\a.ini", v, "deger") -- sıradaki section'ın deger verisi karşılığını al ListBox.AddItem("ListBox1", sDeger) -- yazdır end[/code] diyip ne var ne yoksa yazdırabilirdik. Quote Link to comment Share on other sites More sharing options...
Sistemci Posted August 7, 2011 Share Posted August 7, 2011 (edited) - Sözcük Silme - Sözcük Güncelleme - Toplam Veritabanındaki Sözcük Sayısı - Listicon Listeleme Apz Dosyası : https://rapidshare.com/files/342146813/ingilizce_ogrenmev.1.apz Askerlik Malum Bu kadar çalışmakta mucize Edited August 7, 2011 by Sistemci Quote Link to comment Share on other sites More sharing options...
galetis Posted August 7, 2011 Share Posted August 7, 2011 Senin yaşın 15 değilmiydi ya? Quote Link to comment Share on other sites More sharing options...
Sistemci Posted August 7, 2011 Share Posted August 7, 2011 [quote name='galetis' date='07 August 2011 - 16:13 ' timestamp='1312726407' post='1058558'] Senin yaşın 15 değilmiydi ya? [/quote] 1988 doğumluyum Quote Link to comment Share on other sites More sharing options...
KintaRo Posted August 7, 2011 Author Share Posted August 7, 2011 [quote name='Sistemci' date='07 August 2011 - 16:44 ' timestamp='1312724699' post='1058547'] - Sözcük Silme - Sözcük Güncelleme - Toplam Veritabanındaki Sözcük Sayısı - Listicon Listeleme Apz Dosyası : Askerlik Malum Bu kadar çalışmakta mucize [/quote] ne ara gittin askere, kırtasiye noldu Quote Link to comment Share on other sites More sharing options...
Sistemci Posted August 7, 2011 Share Posted August 7, 2011 (edited) [quote name='KintaRo' date='07 August 2011 - 20:00 ' timestamp='1312740019' post='1058681'] ne ara gittin askere, kırtasiye noldu [/quote] abi ben gitmedimki normalde bu sene okulu kapatıp gidecektim ama malum buldular kaçak olarak götürdüler askerliğin kaçarı yok 60 yaşındada olsa alıp götürüyorlar... amcamı bıraktım sahalara Edited August 7, 2011 by Sistemci Quote Link to comment Share on other sites More sharing options...
KintaRo Posted August 7, 2011 Author Share Posted August 7, 2011 hmm geçmiş olsun ne diyim 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.