Dialogu bu şekilde geliştirdim, ama bir hata verdi -m ile açarken;
Kod: Kodu kopyalamak için üzerine çift tıklayın!
dialog kimim {
title "Kimim ben ?"
size -1 -1 113 108
option dbu
text "Size ait olan rumuza, işaret bırakınız.", 1, 4 6 105 8, center
radio "Ahmet", 2, 4 19 50 10
radio "Mahmut", 3, 4 30 50 10
radio "Süleyman", 4, 4 41 50 10
radio "Osman", 5, 4 52 50 10
radio "Kenan", 6, 4 61 50 10
radio "MavipikSeL", 7, 4 61 50 10
text "Seçilen Yetkili Nick !", 8, 5 66 105 8, center
button "TAMAM", 8, 31 90 50 12, ok
edit "", 7, 31 78 50 10
}
on *:dialog:kimim:*:*: {
if $devent == init {
if %kimde == Ahmet { did -c $dname 2 }
elseif %kimde == Mahmut { did -c $dname 3 }
elseif %kimde == Süleyman { did -c $dname 4 }
elseif %kimde == Osman { did -c $dname 5 }
elseif %kimde == Kenan { did -c $dname 6 }
elseif %kimde == MavipikSeL { did -c $dname 7 }
did -a $dname 8 %kimde
}
if $devent == sclick {
if $did == 2 && $did(2).state == 1 { set %kimde Ahmet | did -ra $dname 7 %kimde }
if $did == 3 && $did(3).state == 1 { set %kimde Mahmut | did -ra $dname 7 %kimde }
if $did == 4 && $did(4).state == 1 { set %kimde Süleyman | did -ra $dname 7 %kimde }
if $did == 5 && $did(5).state == 1 { set %kimde Osman | did -ra $dname 7 %kimde }
if $did == 6 && $did(6).state == 1 { set %kimde Kenan | did -ra $dname 7 %kimde }
if $did == 7 && $did(7).state == 1 { set %kimde MavipikSeL | did -ra $dname 7 %kimde }
}
}
* /dialog: 'kimim' duplicate id '8'