Paint.TextExtents (gb.qt4)

Static Function TextExtents ( Text As String ) As PaintExtents

Obtiene las extensiones de una cadena de texto.

Las extensiones describe un espacio de usuario rectangular que encierra la porción de "tinta" del texto, ya que sería pintado por Paint.Text y con Paint.Fill es pintado sin matriz de transformación.

Esta función es equivalente a:

Dim hTextExtents as PaintExtents
Dim sText as String

Paint.NewPath
Paint.Reset
Paint.Text(sText)

hTextExtents = Paint.PathExtents