Class: RWin::Font

Inherits:

Data

• Object
• Data
• RWin::Font

Defined in:

ext/rwin/rw_resources.c

Direct Known Subclasses

WR::Font

Class Method Summary

• .wraphandle(v_hfont) ⇒ Object

Instance Method Summary

• #_hfont ⇒ Object
• #dispose ⇒ Object
• #external? ⇒ Boolean
• #facename ⇒ Object
• #height ⇒ Object
• #initialize(*args) ⇒ Object constructor
• #logfont ⇒ Object

Constructor Details

#initialize(*args) ⇒ Object

# File 'ext/rwin/rw_resources.c', line 1522

static VALUE
rwfont_initialize(int argc, VALUE *argv, VALUE self){
    RwFont *rf = DATA_PTR(self);
    if (argc==1){
	CStructData *cs;
	LOGFONT *lf;
	if(!rb_typeddata_is_kind_of(argv[0], &cstruct_data_type)){
	    rb_raise(rb_eArgError, "Not CStruct");
	}
	CStruct_Data_Get_Struct(argv[0], cs);
	lf = (LOGFONT*)(cs->dtstr + cs->dtoffset);
	rf->hfont = CreateFontIndirect(lf);
    } else {
	LOGFONT lf;
	TCHAR *fontname;
	size_t n;
	VALUE v_name, v_height, v_weight, v_italic, v_underline, v_strikeout;
	rb_scan_args(argc, argv, "24",
		     &v_name, &v_height, &v_weight, &v_italic, &v_underline, &v_strikeout);
	fontname = rw_str2tchar2(v_name, &n);
	if(n/sizeof(TCHAR) > LF_FACESIZE){
	    rb_raise(rb_eArgError, "face name size over (>%d)", LF_FACESIZE);
	}
	ZeroMemory(&lf, sizeof(LOGFONT));
	memcpy(lf.lfFaceName, fontname, n);
	lf.lfHeight = FIX2INT(v_height);
	lf.lfWeight = NIL_P(v_weight) ? FW_DONTCARE : FIX2INT(v_weight);
	lf.lfItalic = (NIL_P(v_italic) || !v_italic) ? FALSE : TRUE;
	lf.lfUnderline = (NIL_P(v_underline) || !v_underline) ? FALSE : TRUE;
	lf.lfStrikeOut = (NIL_P(v_strikeout) || !v_strikeout) ? FALSE : TRUE;
	lf.lfCharSet = DEFAULT_CHARSET;
	rf->hfont = CreateFontIndirect(&lf);
    }
    if(!rf->hfont) rb_raise(rb_eRuntimeError, "CreateFont failed");
    Register_rsc(rf->hfont, self);
    return self;
}

Class Method Details

.wraphandle(v_hfont) ⇒ Object

# File 'ext/rwin/rw_resources.c', line 1560

static VALUE
rwfont1_wrap_hfont(VALUE klass, VALUE v_hfont){
    RwFont* rf;
    VALUE robj = RwFont_Data_Make_Struct(klass, rf);
    rf->hfont = (HANDLE)NUM2ULONG_PTR(v_hfont);
    rf->type = RcFont;
    rf->external = 1;
    return robj;
}

Instance Method Details

#_hfont ⇒ Object

# File 'ext/rwin/rw_resources.c', line 1588

static VALUE
rwfont_hfont(VALUE self){
    RwFont *rf = DATA_PTR(self);
    return ULONG_PTR2NUM((ULONG_PTR)rf->hfont);
}

#dispose ⇒ Object

# File 'ext/rwin/rw_resources.c', line 1594

static VALUE
rwfont_delete(VALUE self){
    RwFont *rf = DATA_PTR(self);
    if (rf->external) rb_raise(rb_eRuntimeError, "external font can't be deleted");
    Unregister_rsc(rf->hfont);
    DeleteObject(rf->hfont);
    rf->hfont=0;
    return Qtrue;
}

#external? ⇒ Boolean

Returns:

• (Boolean)

# File 'ext/rwin/rw_resources.c', line 1623

static VALUE
rwfont_external_p(VALUE self){
    RwFont *rf = DATA_PTR(self);
    return rf->external ? Qtrue : Qfalse;
}

#facename ⇒ Object

# File 'ext/rwin/rw_resources.c', line 1570

static VALUE
rwfont_fname(VALUE self){
    LOGFONT lf;
    RwFont *rf = DATA_PTR(self);
    if(!rf->hfont) return Qnil;
    GetObject(rf->hfont, sizeof(LOGFONT), &lf);
    return rw_encode_external(lf.lfFaceName);
}

#height ⇒ Object

# File 'ext/rwin/rw_resources.c', line 1579

static VALUE
rwfont_height(VALUE self){
    LOGFONT lf;
    RwFont *rf = DATA_PTR(self);
    if(!rf->hfont) return Qnil;
    GetObject(rf->hfont, sizeof(LOGFONT), &lf);
    return INT2NUM(lf.lfHeight);
}

#logfont ⇒ Object

# File 'ext/rwin/rw_resources.c', line 1604

static VALUE
rwfont_logfont(VALUE self){
    RwFont *rf = DATA_PTR(self);
    if(!rf->hfont) {
	return Qnil;
    } else {
	CStructData *cd;
	VALUE v_lf = CStruct_Data_Make_Struct(ccsLOGFONT, cd);
	cd->dtstr = malloc(sizeof(LOGFONT));
	GetObject(rf->hfont, sizeof(LOGFONT), cd->dtstr);
	cd->dtoffset = 0;
	cd->dtlen = sizeof(LOGFONT);
	cd->dtparent = 0;
	cd->dtreferences = 0;
	cd->dtwrapped = 0;
	return v_lf;
    }
}