TradioGroup 'da tıklanan buton hangisi[çözüldü]

[kahraman1285]

mrb.

TRadioGroup componentine Run-Time'da itemlar ekliyorum.Ekledim Itemların hangisine tıklandığını daha doğrusu tıklanan ıtemin caption özelliğini okumam lazım ama bir türlü yapamadım.

Kod: Tümünü seç

for i:= 0 to SebepListe.Items.Count-1 do
  begin
if ((sender is TRadioGroup)) then
        begin
            secilensebep:=(sender as TRadioGroup).Buttons[i].Caption;
        end;
end;

[Vital]

olusturacagin option button sayisi sabitse ve basliklari biliyorsan
0 ali
1 veli
2 ahmet gibi

if RadioGroup1.ItemIndex=0 then
label1.caption:='ali';

gibi yapabilirsin.

[bgoktas]

Kod: Tümünü seç

showmessage(RadioGroup1.Items[RadioGroup1.itemindex]);

[kahraman1285]

Buton sayısı sabit değil am buna rağmen bi çözüm buldum paylaşmak isteidm.

Kod: Tümünü seç

var
i:integer;
begin
i:=SebepListe.ItemIndex;
SecilenSebep:=SebepListe.Buttons[i].Caption;

Kolay Gelsin.