İngilizce Öğrenme

[KintaRo]

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]

[Bitmap]

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

[KintaRo]

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.

[Sistemci]

- 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

[galetis]

Senin yaşın 15 değilmiydi ya?

[Sistemci]

[quote name='galetis' date='07 August 2011 - 16:13 ' timestamp='1312726407' post='1058558']
Senin yaşın 15 değilmiydi ya?
[/quote]



1988 doğumluyum

[KintaRo]

[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

[Sistemci]

[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

[KintaRo]

hmm geçmiş olsun ne diyim