void RSceneDevice::TextUTF8(double x, double y, char *str, double rot, double hadj, R_GE_gcontext *gc) { if (debug) Rprintf("RSceneDevice::TextUTF8\n"); int col = gc->col; //double gamma = gc->gamma; double cex = gc->cex; double ps = gc->ps; double lineheight = gc->lineheight; int fontface = gc->fontface; char* fontfamily = gc->fontfamily; // [201] ?? QString qstr = QString::fromUtf8(str); QGraphicsTextItem *text = addText(qstr, r2qFont(fontfamily, fontface, ps, cex, lineheight, defaultFamily())); text->setDefaultTextColor(r2qColor(col)); QRectF brect = text->boundingRect(); text->rotate(-rot); text->translate(-hadj * brect.width(), -0.7 * brect.height()); text->setPos(x, y); addClippedItem(text); return; }