/** \brief Test if a checkbox is checked. * \returns true if the Checkbox is checked. */ int UI_Lua::IsChecked(lua_State *L){ int n = lua_gettop(L); // Number of arguments if (n != 1) return luaL_error(L, "Got %d arguments expected 1 (self)", n); Checkbox *box = (Checkbox*)checkWidget(L,1); luaL_argcheck(L, box->GetMask() & WIDGET_CHECKBOX, 1, "`Checkbox' expected."); lua_pushboolean(L, (int) box->IsChecked() ); return 1; }
/** \brief Check or Uncheck a checkbox */ int UI_Lua::setChecked(lua_State *L){ int n = lua_gettop(L); // Number of arguments if (n != 2) return luaL_error(L, "Got %d arguments expected 2 (self, value)", n); Checkbox *box = (Checkbox*)checkWidget(L,1); luaL_argcheck(L, box->GetMask() & WIDGET_CHECKBOX, 1, "`Checkbox' expected."); bool checked = lua_toboolean(L, 2) != 0; box->Set(checked); return 0; }