Delphi – Checkbox Kullanımı

Merhaba arkadaşlar,

Sizlere bugün delphi ile açmış olduğumuz form üzerinde checkbox kullanımını örnek yaparak göstereceğim. Kullanımı oldukça basit checkboxları kullanarak örneğimizi yapacağız. Örneğimiz için ise 3 adet checkbox ve 1 adet buton kullanarak checkboxlar aracılığıyla seçim yaptıracağız.

Gerekli olan bileşenlerimizi ekledikten sonra butonun içine yani click olayına aşağıdaki kodları yazıyoruz.

Önemli: Checkboxlar ile aynı anda birden çok seçeneği işaretleyebiliriz. Bu yüzden radiobuttonların aksine çoklu seçimler için checkboxlar kullanılır.


procedure TForm1.Button1Click(Sender: TObject);
var
s: string;
begin

if checkbox1.Checked then s:= s+'Çay';
if checkbox2.Checked then s:= s+'-Kahve';
if checkbox3.Checked then s:= s+'-Meyve Suyu';
showmessage(s);
end;

Kodlarımız ile ne yaptık?

Başlangıçta string olarak seçim değişkenini tanımladık. Daha sonra if yapısı ile checkboxın seçili olması durumunda ne yapması gerektiğini tanımlayarak seçim değişkenine aktarılmasını ve seçili olan seçenekle birlikte göstermesini sağladık.

Ekran çıktımız ise tekli seçim ve çoklu seçimde ise aşağıdakiler gibi oldu.

Tekli Seçim İçin

Çoklu Seçim İçin

 

 

Sosyal Medyada Paylaş Facebook Twitter Google+

Etiketler: , , , , , , , , , ,
Eklenme Tarihi: 24 Şubat 2017

Konu hakkında yorumunuzu yazın