Jump to content

Tümünü Seç İle Adet Yazımı Hatası


carouser
 Share

Recommended Posts

Herkese merhabalar;
Arkadaşlar benim problemim şu. Programı checkboxlarla seçim yaptığım zaman label'e 1 adet, 2 adet ... program seçildi diye yazdırabiliyorum.Ancak seçilenleri ipral et dediğim zaman label da kaç adet program seçildiyse o yazı kalıyo yani sıfırlanmıyor lakin check box da check leyip veya çeki kaldırdığım zaman label düzgün olarak gösteriyor.Ayrıca tümünü seç dediğim zamanda başına eksi koyarak sayıları arttırıyo tümünü seç buronuna sürekli bastığım zaman sayılar katlanarak gidiyo.Resimde hata görünüyor.

[b]Checkboxlarla seçim,
[/b]
[img]http://www.tnctr.com/uploads/imgs/pre_1305925971__1.jpg[/img]
[b]
Seçilenleri İptal et dediğimde sonuç[/b]

[img]http://www.tnctr.com/uploads/imgs/pre_1305926011__2.jpg[/img]

[b]ve hemen peşine Tümünü seç butonuna tıklıyorum ve sonuç
[/b]
[img]http://www.tnctr.com/uploads/imgs/pre_1305926055__3.jpg[/img]


[b]Tümünü seç buton kodları;[/b]
[code]CheckBox.SetChecked("CheckBox1", true)
CheckBox.SetChecked("CheckBox2", true)
CheckBox.SetChecked("CheckBox3", true)
CheckBox.SetChecked("CheckBox4", true)
CheckBox.SetChecked("CheckBox5", true)

bChecked1 = CheckBox.GetChecked(this)
bChecked2 = CheckBox.GetChecked(this)
bChecked3 = CheckBox.GetChecked(this)
bChecked4 = CheckBox.GetChecked(this)
bChecked5 = CheckBox.GetChecked(this)

if bChecked1 then
nToplam = nToplam+1
else
nToplam = nToplam-1
end


if bChecked2 then
nToplam = nToplam+1
else
nToplam = nToplam-1
end

if bChecked3 then
nToplam = nToplam+1
else
nToplam = nToplam-1
end

if bChecked4 then
nToplam = nToplam+1
else
nToplam = nToplam-1
end

if bChecked5 then
nToplam = nToplam+1
else
nToplam = nToplam-1
end
[/code]

Proje linki;
https://rapidshare.com/files/3474056626/My_Project.apz

Herkese şimdiden teşekkür eder, iyi çalışmalar dilerim.. Edited by carouser
Link to comment
Share on other sites

Checkbox on click evresine

if this then

nToplam = nToplam+1
Label.SetText("Label1", nToplam)

else

nToplam = nToplam-1
Label.SetText("Label1", nToplam)
end

Label1 içinde sadece sayı olacak.Program kuruldu labelini başka yap.Global'e nToplam=0 koy.Kafadan yazdığım için sorun olabilir ama mantık bu.KoLay gelsin..

Link to comment
Share on other sites

[quote name='Baba_' date='22 May 2011 - 13:19 ' timestamp='1306070385' post='1015415']
Verdiğin dosya yanlış. Projeyi almak için export etmen gerekiyordu.
[/quote]
Hocam kusura bakmayın link düzeltildi ve proje export edildi

https://rapidshare.com/files/3474056626/My_Project.apz

Link to comment
Share on other sites

[quote name='talha_252' date='23 May 2011 - 08:10 ' timestamp='1306138216' post='1016059']
Checkbox on click evresine

if this then

nToplam = nToplam+1
Label.SetText("Label1", nToplam)

else

nToplam = nToplam-1
Label.SetText("Label1", nToplam)
end

Label1 içinde sadece sayı olacak.Program kuruldu labelini başka yap.Global'e nToplam=0 koy.Kafadan yazdığım için sorun olabilir ama mantık bu.KoLay gelsin..
[/quote]

Hocam zaten checkbox'ın onclick evresine kodlar var ve kodlar şunlar;
bChecked = CheckBox.GetChecked(this)

if bChecked then
nToplam = nToplam+1
else
nToplam = nToplam-1
end

Eğer bu kodlar olmasza zaten label'2 x adet program seçildi diye yazdıramam proje yi yeniden upload ettim incelerseniz orada görebilirsiniz.

Link to comment
Share on other sites

[quote name='galetis' date='25 May 2011 - 16:44 ' timestamp='1306341886' post='1018102']
[code]http://www.mediafire.com/?41e6xcaemqweddf[/code]
[/quote]
Hocam emeğinize sağlık yapmam gereken çok basit bişeymiş "nToplam = 0" çok teşekkür eder, iyi akşamlar dilerim...

Link to comment
Share on other sites

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.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

 Share

  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...