static status
computeLabel(Label lb)
{ if ( notNil(lb->request_compute) )
{ int w, h, b;
TRY(obtainClassVariablesObject(lb));
b = valInt(lb->border);
if ( notNil(lb->elevation) )
b += abs(valInt(lb->elevation->height));
if ( instanceOfObject(lb->selection, ClassCharArray) )
{ String s = &((CharArray)lb->selection)->data;
int minw;
int ex = valInt(getExFont(lb->font));
if ( lb->wrap == NAME_clip )
{ LocalString(buf, s->iswide, s->size+1);
str_one_line(buf, s);
s = buf;
}
str_size(s, lb->font, &w, &h);
w += ex;
if ( notDefault(lb->width) )
minw = valInt(lb->width) - 2*b;
else
minw = (valInt(lb->length)+1) * ex;
w = max(w, minw);
} else /*if ( instanceOfObject(lb->selection, ClassImage) )*/
{ Image image = (Image) lb->selection;
w = valInt(image->size->w);
h = valInt(image->size->h);
}
w += 2*b;
h += 2*b;
CHANGING_GRAPHICAL(lb,
assign(lb->area, w, toInt(w));
assign(lb->area, h, toInt(h));
changedEntireImageGraphical(lb));
assign(lb, request_compute, NIL);
}
static status
RedrawAreaLabel(Label lb, Area a)
{ int x, y, w, h;
Elevation z = lb->elevation;
int preview = (lb->status == NAME_preview && notNil(lb->message));
initialiseDeviceGraphical(lb, &x, &y, &w, &h);
if ( notNil(z) )
r_3d_box(x, y, w, h, 0, z, !preview);
x += valInt(lb->border);
y += valInt(lb->border);
w -= 2*valInt(lb->border);
h -= 2*valInt(lb->border);
if ( lb->wrap == NAME_clip )
d_clip(x, y, w, h);
if ( instanceOfObject(lb->selection, ClassCharArray) )
{ String s = &((CharArray)lb->selection)->data;
if ( notNil(z) )
x += valInt(getExFont(lb->font))/2;
if ( lb->wrap == NAME_clip )
{ LocalString(buf, s->iswide, s->size+1);
str_one_line(buf, s);
s = buf;
}
str_label(s, 0, lb->font, x, y, w, h, NAME_left, NAME_top,
lb->active == ON ? 0 : LABEL_INACTIVE);
} else /*if ( instanceOfObject(lb->selection, ClassImage) )*/
{ Image image = (Image) lb->selection;
r_image(image, 0, 0, x, y, w, h, ON);
}
if ( lb->wrap == NAME_clip )
d_clip_done();
if ( preview && isNil(z) )
r_complement(x, y, w, h);
return RedrawAreaGraphical(lb, a);
}
void JSPackagerClientResponder::error(const std::string &result) {
error(LocalString(result).string());
}
