Jump to content

how to resize the GUICtrlCreateLabel


geotau3
 Share

Recommended Posts

You can reset the size using GUICtrlSetPos. 

If I posted any code, assume that code was written using the latest release version unless stated otherwise. Also, if it doesn't work on XP I can't help with that because I don't have access to XP, and I'm not going to.
Give a programmer the correct code and he can do his work for a day. Teach a programmer to debug and he can do his work for a lifetime - by Chirag Gude
How to ask questions the smart way!

I hereby grant any person the right to use any code I post, that I am the original author of, on the autoitscript.com forums, unless I've specifically stated otherwise in the code or the thread post. If you do use my code all I ask, as a courtesy, is to make note of where you got it from.

Back up and restore Windows user files _Array.au3 - Modified array functions that include support for 2D arrays.  -  ColorChooser - An add-on for SciTE that pops up a color dialog so you can select and paste a color code into a script.  -  Customizable Splashscreen GUI w/Progress Bar - Create a custom "splash screen" GUI with a progress bar and custom label.  -  _FileGetProperty - Retrieve the properties of a file  -  SciTE Toolbar - A toolbar demo for use with the SciTE editor  -  GUIRegisterMsg demo - Demo script to show how to use the Windows messages to interact with controls and your GUI.  -   Latin Square password generator

Link to comment
Share on other sites

Func GUICtrlResize($iCtrlId = -1, $hWnd = $hMain)
    Local $aDim = GUICtrlMeasureString($iCtrlId)
    Local $aPos = ControlGetPos($hWnd, "", $iCtrlId)
    If (@error) Then Return
    GUICtrlSetPos($iCtrlId, $aPos[0], $aPos[1], $aDim[0], $aDim[1])
    Return $aDim
EndFunc   ;==>GUICtrlResize

Func GUICtrlMeasureString($iCtrlId)
    Local $hWnd = (IsHWnd($iCtrlId) ? $iCtrlId : GUICtrlGetHandle($iCtrlId))
    Local $aReturn[2] = [0, 0]
    Local $sText = GUICtrlRead($iCtrlId)
    Local $aText = Null
    If ($sText = "") Then Return $aReturn

    Local $hDC = _WinAPI_GetDC($hWnd)
    Local $hFont = _SendMessage($hWnd, $WM_GETFONT)
    Local $hSelectObject = _WinAPI_SelectObject($hDC, $hFont)
    Local $tSize = _WinAPI_GetTextExtentPoint32($hDC, $sText)

    If (StringInStr($sText, @LF)) Then
        $aText = StringSplit(StringStripCR($sText), @LF)
        Local $iMax = 0
        If (Not @error) Then
            For $i = 1 To $aText[0]
                $tSize = _WinAPI_GetTextExtentPoint32($hDC, $aText[$i])
                $iMax = Max($iMax, DllStructGetData($tSize, 1))
                $aReturn[0] = DllStructGetData($tSize, 1)
            Next
            $aReturn[0] = $iMax
            $aReturn[1] = DllStructGetData($tSize, 2) * $aText[0]
        Else
            $aReturn[0] = DllStructGetData($tSize, 1)
            $aReturn[1] = DllStructGetData($tSize, 2)
        EndIf
    Else
        $aReturn[0] = DllStructGetData($tSize, 1)
        $aReturn[1] = DllStructGetData($tSize, 2)
    EndIf

    _WinAPI_SelectObject($hDC, $hSelectObject)
    _WinAPI_ReleaseDC($hWnd, $hDC)

    Return $aReturn
EndFunc   ;==>GUICtrlMeasureString

You'll have to figure out the #includes yourself. This is from some big program I made and wanted to resize some labels based on the width and height of the text based on the font name/size I used.

Link to comment
Share on other sites

  • Moderators

geotau3,

Look at my StringSize UDF (the link is in my sig) - it gives you the required size of a control to fit the text in any font/style.

M23

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...