Paint.RichTextExtents (gb.qt4)

Static Function RichTextExtents ( Text As String [ , Width As Float ] ) As PaintExtents

Obtiene las extensiones de una cadena de rich text.

Las extensiones describen el rectángulo del user-space que encierran la "tinta" para la porción del texto, dado que será dibujado por Paint.RichText y Paint.Fill sin matriz de transformación.

Esta función es un equivalente de: 

Dim hTextExtents as PaintExtents
Dim sText as String

Paint.NewPath
Paint.Reset
Paint.RichText(sText)

hTextExtents = Paint.PathExtents

Como solo una ruta es creada, los colores definidos por la marcación <font> no son tenidos en cuenta.