include('wintools')
include("wincontrolworks")

func _create(_data)
  var(ctrl)
  fvar(style_)
  
  beginStyle('0')
  addStyle(isndef(Style), 'wxCHK_3STATE')
  addStyle(isndef(User3rdState), 'wxCHK_ALLOW_3RD_STATE_FOR_USER')
  style_ = endStyle()
  
  println(chbox, ' = new wxCheckBox(this, ID_', upper(chbox), ', ', Caption, ', wxPoint(', Left, ', ', Top, '), wxSize(', Width, ', ', Height, '), ', style_, ');')
  ctrl = chbox
  registerId(ctrl)

  if(linked(onCheck))
    createEventArg1(chbox, 'EVT_CHECKBOX', 'onCheck', 'event->IsChecked()')
  end
end

func initFree()
  _create('')
end

func init()
  lng.decl_priv_var(chbox, 'wxCheckBox*')
  if(not linked(doCreate))
    fvar(old)
    old = block.select(BLK_BODY)
    _create('')
    block.select(old)
  end
end

func doCreate(data)
  _create(data)
end

func doCaption(_data)
  println(chbox + '->SetLabel(', e_str(_data), ');')
end

func doChecked(_data)
  if (isdef(Style))
    println(chbox + '->SetValue(', e_int(_data), ');')
  else
    println(chbox + '->Set3StateValue((wxCheckBoxState)', e_int(_data), ');')
  end
end

func Checked()
  if (isdef(Style))
    return(chbox + '->GetValue()')
  else
    return(chbox + '->Get3StateValue()')
  end
end