Aio Da Program Seçildi Yapmak

[kral1122]

Selamunaleyküm arkadaşlar öncelikle konu açıldıysa farketmedim özür dilerim ben görmedim benim bir ricam var aşağıdaki resimde

[img]http://imagehostu.com/images/6513.png[/img]

0 program seçildi yazıyor sol tarafta o nasıl yapılıyor

Yardımcı olan arkadaşlardan Allah razı olsun Edited September 2, 2011 by kral1122

[prototype]

Tek bir label oluştur Setting sekmesinden Text bölümüne 0 yaz, Attributes sekmesindeki "Object Name" bölümüne sayi yaz sonra global functionsa bu kodu yapıştır.

[code]
nSayi = 0;

function sec(sObject, sName)
bChecked = CheckBox.GetChecked(sObject)
if bChecked then
INIFile.SetValue("Autoplay\\Docs\\kurulum.ini", sName, "kur", "1")
nSayi = nSayi+1
Label.SetText("sayi", nSayi .. "")
else
INIFile.DeleteSection("Autoplay\\Docs\\kurulum.ini", sName)
nSayi = nSayi-1
Label.SetText("sayi", nSayi .. "")
end
end


function kontrol()
Label.SetText("sayi", nSayi .. "")
tSections = INIFile.GetSectionNames("AutoPlay\\Docs\\kurulum.ini")

if tSections ~= nil then
for i=1,100 do
for y in pairs(tSections) do
if CheckBox.GetText("CheckBox" .. i) == tSections[y] then
CheckBox.SetChecked("CheckBox" .. i, true)
end
end
end
else
for i=1,100 do
CheckBox.SetChecked("CheckBox" .. i, false)
end
end
end
[/code]

Sonra birtane daha label oluştur ve adını Adet Program Seçildi gibi yaz ve az önce açış olduğun labelin yanına koy.

Böyle görünsün; 0 Adet Program Seçildi.

[kral1122]

[quote name='prototype' date='02 September 2011 - 19:26 ' timestamp='1314984396' post='1073252']
Tek bir label oluştur Setting sekmesinden Text bölümüne 0 yaz, Attributes sekmesindeki "Object Name" bölümüne sayi yaz sonra global functionsa bu kodu yapıştır.

[code]
nSayi = 0;

function sec(sObject, sName)
bChecked = CheckBox.GetChecked(sObject)
if bChecked then
INIFile.SetValue("Autoplay\\Docs\\kurulum.ini", sName, "kur", "1")
nSayi = nSayi+1
Label.SetText("sayi", nSayi .. "")
else
INIFile.DeleteSection("Autoplay\\Docs\\kurulum.ini", sName)
nSayi = nSayi-1
Label.SetText("sayi", nSayi .. "")
end
end


function kontrol()
Label.SetText("sayi", nSayi .. "")
tSections = INIFile.GetSectionNames("AutoPlay\\Docs\\kurulum.ini")

if tSections ~= nil then
for i=1,100 do
for y in pairs(tSections) do
if CheckBox.GetText("CheckBox" .. i) == tSections[y] then
CheckBox.SetChecked("CheckBox" .. i, true)
end
end
end
else
for i=1,100 do
CheckBox.SetChecked("CheckBox" .. i, false)
end
end
end
[/code]

Sonra birtane daha label oluştur ve adını Adet Program Seçildi gibi yaz ve az önce açış olduğun labelin yanına koy.

Böyle görünsün; 0 Adet Program Seçildi.
[/quote]

dediklerini aynen yaptım ama olmadı arkadaşlar yardımcı olursanız sevinirim

[DivaneTR]

[b]Şimdiye Kadar Hazırlanmış En Güzel, En Sağlam AIO Örneği. Aradığın Şey Burada. Kodları İncele :[/b]
[code]http://www.tnctr.com/topic/156784-ayolarda-birden-cok-sayfa-ile-calythmak/[/code]

Edited September 2, 2011 by Baba_