Program Açılırken Seçenekleri Hatırlasın

[ergunpoyraz]

Program ile ilgili http://www.tnctr.com/index.php?showtopic=128070&st=0 |

Arkadaşlar Şimdi ben 2. Yardım Sayfasına Yeni Projemde 1tane checbox ekledim ve ben bu checkbox un İşaretli olduğu zaman ISIS programını menüden Önce Çalıştırmasını İstiyorum....

Fakat burdaki checkbox u işaretleyip(true) kapatınca tekrar eski konumuna dönüyor(false)işaret kalkıyor...

Şimdi Ben bunu nasıl yapabilirim..

Program dosyalarının İçerisine ayarlar.ini diye bir dosya oluşturup oraya kodları aktartabilirsek heralde eski konumuna geri dönmez diye düşünüyorum yardımcı olabilirmisiniz...

[KintaRo]

O sayfanın On Show evresine:

bak = INIFile.GetValue("AutoPlay\\Docs\\ayarlar.ini", "ayarlar", "secim")

if bak == "1" then

CheckBox.SetChecked("CheckBox1", true) -- checkbox ismini sizin checkbox ismine gore duzenleyin

else

CheckBox.SetChecked("CheckBox1", false)  -- checkbox ismini sizin checkbox ismine gore duzenleyin

end[/CODE]

ve Checkbox'in On Click evresine: 

[CODE]bak = CheckBox.GetChecked(this)

if bak then

INIFile.SetValue("AutoPlay\\Docs\\ayarlar.ini", "ayarlar", "secim", "1")

else

INIFile.SetValue("AutoPlay\\Docs\\ayarlar.ini", "ayarlar", "secim", "0")

end[/CODE]

yazarsan o iş tamamdır 

[ergunpoyraz]

O sayfanın On Show evresine:

bak = INIFile.GetValue("AutoPlay\\Docs\\ayarlar.ini", "ayarlar", "secim")

if bak == "1" then

CheckBox.SetChecked("CheckBox1", true) -- checkbox ismini sizin checkbox ismine gore duzenleyin

else

CheckBox.SetChecked("CheckBox1", false)  -- checkbox ismini sizin checkbox ismine gore duzenleyin

end[/CODE]

ve Checkbox'in On Click evresine:

[CODE]bak = CheckBox.GetChecked(this)
if bak then
INIFile.SetValue("AutoPlay\\Docs\\ayarlar.ini", "ayarlar", "secim", "1")
else
INIFile.SetValue("AutoPlay\\Docs\\ayarlar.ini", "ayarlar", "secim", "0")
end[/CODE]

yazarsan o iş tamamdır

Dediğiniz gibi yaptım on show kısmına bide şu kodu ekledim

ac = CheckBox.GetChecked("CheckBox1")

if ac==true then

File.Run("AutoPlay\\Docs\\ISIS.exe", "", "")

end

İşe yarıyor fakat 2,sayfaya geçtiğim zaman ISIS ı Çalıştırıyor.. İlk(Açılış) Sayfası Açıldığı gibi eğer 2,sayfadaki checkbox1==true ise ISIS.exe yi Çalıştırması İçin Ne yapabiliriz burda tıkandım kaldım.. bu on show kodlarını global function page1 de ki on show a Actions a ekledim Fakat İşe yaramıyor...

Yani illa ikinci sayfaya gitmem gerekiyor ya da checkbox u ilk sayfaya eklemem gerekiyor İlk sayfaya checkbox ekledimmide bi işe yaramıyo ne yapabiliriz...

Çok Teşekkürler...

[KintaRo]

tamanlamadım ama sanırım 1. sayfa açılınca 2. sayfadaki checkboxı daha onceden seçmişsek isis.exe nin calismasi gerekiyor? eğer boyle ise 1. sayfanın on show evresine;

bak = INIFile.GetValue("AutoPlay\\Docs\\ayarlar.ini", "ayarlar", "secim")

if bak == "1" then

File.Run("AutoPlay\\Docs\\ISIS.exe", "", "")

end[/CODE]

bunu yaptiğin zaman eğer daha önceden 2. sayfadaki checkbox seçilmişse 1. sayfayi açınca isis.exe otomatik çalışacak.

[ergunpoyraz]

Sn Kintaro Çok Teşekkür Ederim Allah Razı Olsun

2,sayfanın onshow kısmına

bak = INIFile.GetValue("AutoPlay\\Docs\\ayarlar.ini", "ayarlar", "secim")

if bak == "1" then

CheckBox.SetChecked("CheckBox1", true) -- checkbox ismini sizin checkbox ismine gore duzenleyin

else

CheckBox.SetChecked("CheckBox1", false)  -- checkbox ismini sizin checkbox ismine gore duzenleyin

end[/CODE]

Yine 2.Sayfadaki checkbox a

[CODE]bak = CheckBox.GetChecked(this)
if bak then
INIFile.SetValue("AutoPlay\\Docs\\ayarlar.ini", "ayarlar", "secim", "1")

else
INIFile.SetValue("AutoPlay\\Docs\\ayarlar.ini", "ayarlar", "secim", "0")
end[/CODE]

Kodlarını ekleyip

en son Actions OnStartup a

[CODE]bak = INIFile.GetValue("AutoPlay\\Docs\\ayarlar.ini", "ayarlar", "secim")
if bak == "1" then
File.Run("AutoPlay\\Docs\\ISIS.exe", "", "")
end[/CODE]

Verdiğiniz Kodları Ekledim ve İstediğim gibi 2.sayfadaki checkbox eğer İşaretliyse menüden önce ISIS.exe yi Çalıştırıyo....

Acaba son bi soru daha sorsam sizlere ayıp olur mu?