Kral__ Posted October 2, 2011 Share Posted October 2, 2011 Arkadaşlar mesela Labelde "Puan:" yazıyo her butona tıkladığımızda +10 vermesini istiyorum çok uğraştım ama yapadım lütfen yardım edin. Quote Link to comment Share on other sites More sharing options...
Bitmap Posted October 2, 2011 Share Posted October 2, 2011 (edited) [b][color="#FF0000"]Global Function :[/color][/b] [code] nPuan = "0"; function Arttir(label,miktar) nPuan = nPuan+miktar; Label.SetText(label,nPuan); end function Azalt(label,miktar) if nPuan ~= 0 then nPuan = nPuan-miktar; Label.SetText(label,nPuan); end end function Sifirla(label) nPuan = "0"; Label.SetText(label,nPuan); end [/code] [b][color="#FF0000"]Arttır Butonu[/color][/b] [code]Arttir("Label1","10")[/code] [b][color="#FF0000"] Azalt Butonu[/color][/b] [code]Azalt("Label1","10")[/code] [b][color="#FF0000"]Sıfırla Butonu[/color][/b] [code]Sifirla("Label1")[/code] Edited October 2, 2011 by Kazım Quote Link to comment Share on other sites More sharing options...
Kral__ Posted October 2, 2011 Author Share Posted October 2, 2011 (edited) saol ama bi sorun var arttır butonuna tıkladığımda Puan:10 olmasını istiyorum ama sadece 10 yazıo dediğim gibi yapabilirmiyiz? Edited October 2, 2011 by Kral__ Quote Link to comment Share on other sites More sharing options...
abdullahTR Posted October 2, 2011 Share Posted October 2, 2011 [color=#445563][font=verdana, tahoma, sans-serif]Azalt("Label1","puan:","10") böle dene olcakmı bakalım[/font][/color] Quote Link to comment Share on other sites More sharing options...
Kral__ Posted October 2, 2011 Author Share Posted October 2, 2011 hayır olmuyo hata verio Quote Link to comment Share on other sites More sharing options...
MostWanted Posted October 2, 2011 Share Posted October 2, 2011 (edited) Aslında biraz aklını kullanıp yanına Puan: yazan bi label oluşturabilirdin değil mi? Böyle dene; nPuan = "0"; function Arttir(label,miktar) nPuan = nPuan+miktar; Label.SetText(label,"Puan:"..nPuan); end function Azalt(label,miktar) if nPuan ~= 0 then nPuan = nPuan-miktar; Label.SetText(label,"Puan:"..nPuan); end end function Sifirla(label) nPuan = "0"; Label.SetText(label,"Puan:"..nPuan); end Edited October 2, 2011 by MostWanted Quote Link to comment Share on other sites More sharing options...
Bitmap Posted October 2, 2011 Share Posted October 2, 2011 (edited) [b][color="#FF0000"]Global Function :[/color][/b] [code] nPuan = "0"; function Arttir(label,miktar) nPuan = nPuan+miktar; Label.SetText(label,"Puan: "..nPuan); end function Azalt(label,miktar) if nPuan ~= "0" then nPuan = nPuan-miktar; Label.SetText(label,"Puan: "..nPuan); end end function Sifirla(label) nPuan = "0"; Label.SetText(label,"Puan: "..nPuan); end [/code] edit: görrmedim talha.. Edited October 2, 2011 by Kazım Quote Link to comment Share on other sites More sharing options...
abdullahTR Posted October 2, 2011 Share Posted October 2, 2011 puanı tanımla öle dene birde Quote Link to comment Share on other sites More sharing options...
blackman12 Posted October 2, 2011 Share Posted October 2, 2011 Off ya hani diyorum bırak takılsınlar ama bu kadarda hazırcılık olmaz ki arkadaş! function Arttir(label,miktar) nPuan = nPuan+miktar; Label.SetText(label,"Puan: " .. nPuan); end şunu kendin akıl edemiyor musun yahu. Edit: Hepimizin aynı anda yazması ayrı bi güzel olmuş tabi 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.