OptionButton ?

something like this :


break on

$form = createobject("kixtart.form")
$form.Caption = "OptionButton made easy ..."

$opt1 = $form.OptionButton("Option 1",20,20,80,15)
$opt2 = $form.OptionButton("Option 2",20,60,80,15)
$opt3 = $form.OptionButton("Option 3",20,100,80,15)

$Opt1.onclick = "Opt_CLick(1)"
$Opt2.onclick = "Opt_CLick(2)"
$Opt3.onclick = "Opt_CLick(3)"

$Opt1.Value = True
$lbl = $form.Label("Option 1 is selected",20,$Form.ClientHeight-20,$form.ClientWidth-40,15)

$form.Show
while $form.Visible
    $=execute($Form.DoEvents)
loop

exit 1

function Opt_Click($Opt)
    $lbl.Caption = "Option " + $Opt + " is selected"
endfunction

_________________________