Hanmac/rwx

/*
 * wxControl.cpp
 *
 *  Created on: 12.02.2012
 *      Author: hanmac
 */

#include "wxEvtHandler.hpp"

#if wxUSE_CONTROLS
VALUE rb_cWXControl;
#define _self unwrap<wxControl*>(self)

namespace RubyWX {
namespace Control {

macro_attr(LabelText,wxString)

APP_PROTECT(wxControl)

/*
 * call-seq:
 *   Control.new(parent, name, [options])
 *   Control.new(parent, [options])
 *
 * creates a new Control widget.
 * ===Arguments
 * * parent of this window or nil
 * * name is a String describing a resource in a loaded xrc
 *
 * *options: Hash with possible options to set:
 *   * label_text String depends on the control what is shown
 *
*/
DLL_LOCAL VALUE _initialize(int argc,VALUE *argv,VALUE self)
{
    VALUE parent,name,hash;
    rb_scan_args(argc, argv, "11:",&parent,&name,&hash);
    if(!_created && !rb_obj_is_kind_of(name,rb_cString)) {
        wxWindowID id(wxID_ANY);

        if(rb_obj_is_kind_of(hash,rb_cHash))
        {
            set_hash_option(hash,"id",id,unwrapID);
        }
        if(nil_check(parent))
            _self->Create(unwrap<wxWindow*>(parent),id);
    }
    rb_call_super(argc,argv);

    if(rb_obj_is_kind_of(hash,rb_cHash))
    {
        set_obj_option(hash, "label_text", &wxControl::SetLabelText,_self);
    }

    return self;
}


}
}

#endif

/*
 * Document-class: WX::Control
 *
 * This class represents an the base control class.
*/

/* Document-attr: label_text
 * the label_text of the Control. String
 */
DLL_LOCAL void Init_WXControl(VALUE rb_mWX)
{
#if 0
    rb_mWX = rb_define_module("WX");
    rb_cWXWindow = rb_define_class_under(rb_mWX,"Window",rb_cObject);
#endif

#if wxUSE_CONTROLS
    using namespace RubyWX::Control;
    rb_cWXControl = rb_define_class_under(rb_mWX,"Control",rb_cWXWindow);
    rb_define_alloc_func(rb_cWXControl,_alloc);

#if 0
    rb_define_attr(rb_cWXControl,"label_text",1,1);
#endif

    rb_define_method(rb_cWXControl,"initialize",RUBY_METHOD_FUNC(_initialize),-1);

    rb_define_attr_method(rb_cWXControl,"label_text",_getLabelText,_setLabelText);

    registerInfo<wxControl>(rb_cWXControl);
#endif
}