如何在gloss中找到文本图片的宽度？

Question

在Haskell Gloss库中，可以使用Picture类型的文本构造函数绘制文本。但是，如何才能找到这样的图片的宽度(和高度)呢？

Answer 1

Here的how text is rendered in Gloss：

        Text str
         -> do
                GL.blend        $= GL.Disabled
                GL.preservingMatrix $ GLUT.renderString GLUT.Roman str
                GL.blend        $= GL.Enabled

这里重要的一点是，它调用renderString。看看the documentation for renderString，我们马上就会看到另外两个有用的函数：stringWidth和fontHeight。这样，你就可以像这样得到你的宽度和高度：

import Graphics.UI.GLUT.Fonts

do
    width <- stringWidth Roman str
    height <- fontHeight Roman