Dimensionare dinamicamente un controllo in base al testo (ActiveReports)

pubblicato il 16/04/2008

Dopo aver visto come ridimensionare dinamicamente un controllo in una form Windows, stavolta affronto lo stesso problema in un report (lo strumento scelto è Active Reports di DataDynamics); quello che cambia è l'origine da cui trarre l'oggetto Graphics.

Innanzitutto importiamo la namespace:

Imports DataDynamics.ActiveReports.Design

Quindi creiamo la routine che esegue il calcolo:

  Private Function GetSizeControl(ByVal origin As String, ByVal myFont As System.Drawing.Font) As System.Drawing.SizeF

    Dim graphic As Graphics = new Designer().CreateGraphics()

    Return graphic.MeasureString(origin, myFont)

  End Function