CheckBox false true

   CheckBox1.isChecked = not CheckBox2.isChecked;
   CheckBox2.isChecked = not CheckBox1.isChecked;

 checkbox1 seçildiğinde checkbox 2  nin seçilmemesini istiyorum.
aynı şekilde checkbox 2 seçildiğinde checkbox 1 seçilmesin. Yani yalnızca birini select yapmak istiyorum. Buton kullanmadan nasıl yapabilirim.

Yazar	Mesaj Konu Arama Topic Seçenekleri Yanıt Yaz Yeni Konu Oluştur Konuyu Yazdır Çeviri Konu
dev70 Üye Profili Özel Mesaj Yolla Üye mesajı bul Arkadaş Listeme Ekle Deneyimli Üye Kayıt Tarihi: 23 Temmuz 2024 Durum: Aktif Değil Puanlar: 46	Mesaj Seçenekleri Yanıt Yaz Alıntı dev70 Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz. Teşekkürler(0) Alıntı Cevapla Konu: CheckBox false true Gönderim Zamanı: 01 Ağustos 2024 Saat 11:35
	CheckBox1.isChecked = not CheckBox2.isChecked; CheckBox2.isChecked = not CheckBox1.isChecked; checkbox1 seçildiğinde checkbox 2 nin seçilmemesini istiyorum. aynı şekilde checkbox 2 seçildiğinde checkbox 1 seçilmesin. Yani yalnızca birini select yapmak istiyorum. Buton kullanmadan nasıl yapabilirim.

OlgunAgac Üye Profili Özel Mesaj Yolla Üye mesajı bul Arkadaş Listeme Ekle Kıdemli Üye Kayıt Tarihi: 25 Mayıs 2024 Konum: Konya Durum: Aktif Değil Puanlar: 125	Mesaj Seçenekleri Yanıt Yaz Alıntı OlgunAgac Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz. Teşekkürler(0) Alıntı Cevapla Gönderim Zamanı: 01 Ağustos 2024 Saat 13:42
	CheckBox'a ekleyeceğin tbeOnChange fonksiyonu ile checkbox her değiştiğinde yukarıdaki kodu çalıştırabilirsin.
	Dünden bugüne süren sonu olmayan yolculuk.

Developer Üye Profili Özel Mesaj Yolla Üye mesajı bul Arkadaş Listeme Ekle Forum Yöneticisi Kayıt Tarihi: 14 Haziran 2023 Durum: Aktif Değil Puanlar: 354	Mesaj Seçenekleri Yanıt Yaz Alıntı Developer Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz. Teşekkürler(0) Alıntı Cevapla Gönderim Zamanı: 01 Ağustos 2024 Saat 13:59
	Merhaba dev70 Aşağıdaki kodu inceler misin? var MyForm:TclForm; testLabel : TclLabel; testCheckBox,testCheckBox2 : TClCheckBox; void ButtonClicked; var senderCheckBox:TClCheckBox; { senderCheckBox = TClCheckBox(Myform.Clsender); if senderCheckBox.clTagInt == 1 //testCheckBox kontrol testCheckBox2.isChecked = senderCheckBox.isChecked else if senderCheckBox.clTagInt == 2 //testCheckBox kontrol testCheckBox.isChecked = senderCheckBox.isChecked } { MyForm = TclForm.Create(Self); testLabel = MyForm.AddNewLabel(MyForm,'testLabel','Your hobbies?'); testLabel.StyledSettings = ssFamily; testLabel.TextSettings.Font.Size=25; testLabel.TextSettings.FontColor = clAlphaColor.clHexToColor('#4a08ff'); testLabel.Align = alMostTop; testLabel.Height = 30; testCheckBox = MyForm.AddNewCheckBox(MyForm,'testCheckBox','Reading book'); testCheckBox.StyledSettings = ssFamily; testCheckBox.TextSettings.Font.Size=15; testCheckBox.TextSettings.FontColor = clAlphaColor.clHexToColor('#272643'); testCheckBox.Align = alTop; testCheckBox.Height = 30; testCheckBox.clTagInt = 1; testCheckBox2 = MyForm.AddNewCheckBox(MyForm,'testCheckBox2','Watching movie'); testCheckBox2.StyledSettings = ssFamily; testCheckBox2.TextSettings.Font.Size=15; testCheckBox2.TextSettings.FontColor = clAlphaColor.clHexToColor('#272643'); testCheckBox2.Align = alTop; testCheckBox2.Height = 30; testCheckBox2.clTagInt = 2; MyForm.AddNewEvent(testCheckBox2,tbeOnClick,'ButtonClicked'); MyForm.AddNewEvent(testCheckBox,tbeOnClick,'ButtonClicked'); MyForm.Run; }