QFontMetrics::boundingRect() returns too-small result

#include <QtGui>

int main(int argc, char **argv) {
  QApplication app(argc, argv);

  const QString kText = "Salem";

  QFont font("MS Shell Dlg 2");  // Arial, Arial Black also fail; Courier New, Verdana, Times New Roman are fine.
  font.setPixelSize(11);

  QFontMetrics metrics(font);  // QFontMetricsF also fails.
  QRect text_bounding_rect = metrics.boundingRect(kText);  // tightBoundingRect() also seems to fail.
  text_bounding_rect.moveTopLeft(QPoint(0, 0));

  QPixmap pm(200, 200);
  pm.fill(Qt::white);

  QPainter painter(&pm);
  QTransform transform = QTransform::fromScale(3.0, 3.0);
  painter.setTransform(transform);

  painter.setBrush(QBrush(Qt::yellow));
  painter.setPen(Qt::NoPen);
  painter.drawRect(text_bounding_rect);

  painter.setBrush(Qt::NoBrush);
  painter.setPen(Qt::SolidLine);
  painter.setFont(font);
  painter.drawText(text_bounding_rect, kText);

  QLabel lbl;
  lbl.setPixmap(pm);
  lbl.show();

  return app.exec();
}