Modify

Opened 17 years ago

Closed 17 years ago

#214 closed Bug (Fixed)

Some GUI objects display about 3% smaller in build 3.2.11.7

Reported by: Koder Owned by: Jon
Milestone: 3.2.11.8 Component: AutoIt
Version: 3.2.11.7 Severity: None
Keywords: Cc:

Description

This is the same issue from v3.2.5.1. http://www.autoitscript.com/forum/index.php?showtopic=50553

The controls are all slightly squashed. In a 653 height GUI form, there is now about 20 pixels of empty space at the bottom. When I run the same script with 3.2.10.0 there is no squashing.

In particular, groups, list boxes and the tab text on tab controls are all slightly smaller. Vertical space between objects has also changed. Width does not appear to have changed, only height.

If the 'squishing' were uniform it wouldn't be too much of a problem, but the controls no longer fit as designed (they are a bit tightly packed).

#include <GUIConstantsEX.au3>
#include <EditConstants.au3>
#include <WindowsConstants.au3>
#include <ListBoxConstants.au3>
#include <ButtonConstants.au3>

Global $Form1 = GUICreate("", 622, 653, 199, 120)
Global $tb_Results = GUICtrlCreateEdit("", 0, 501, 620, 111, BitOR ($ES_READONLY, $WS_HSCROLL, $WS_VSCROLL))
GUICtrlSetFont(-1, 9, 400, 0, "Terminal")
Global $AGroup1 = GUICtrlCreateGroup("Folders", 0, 40, 337, 172)
Global $btn_AddBuild = GUICtrlCreateButton("Add", 280, 54, 50, 20, 0)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
Global $lbl_bVersion = GUICtrlCreateLabel("[0.0.0.0]", 8, 144, 267, 17)
GUICtrlSetFont(-1, 12, 800, 0, "Terminal")
Global $lbl_bdASzip = GUICtrlCreateLabel("[File Not Found]", 8, 160, 267, 17)
Global $lbl_bdBLWebZip = GUICtrlCreateLabel("[File Not Found]", 8, 176, 267, 17)
Global $btn_bdUpdate = GUICtrlCreateButton("Update", 280, 184, 50, 20, 0)
Global $btn_bdRemove = GUICtrlCreateButton("Remove", 280, 80, 50, 20, 0)
Global $list_bdList = GUICtrlCreateList("", 5, 54, 273, 87, BitOR ($LBS_SORT, $LBS_NOINTEGRALHEIGHT, $LBS_STANDARD, $WS_VSCROLL, $WS_BORDER))
GUICtrlSetFont(-1, 8, 400, 0, "Lucida Console")
Global $lbl_bdASWSZip = GUICtrlCreateLabel("[File Not Found]", 8, 192, 267, 17)
Global $btn_BrowseBF = GUICtrlCreateButton("Browse", 280, 120, 50, 20, 0)
Global $btn_Scan = GUICtrlCreateButton("Scan", 280, 152, 50, 17, 0)
GUICtrlCreateGroup("", -99, -99, 1, 1)
Global $AGroup2 = GUICtrlCreateGroup(">>>>>>> setup <<<<<<<", 0, 360, 198, 137)
Global $tb_Server = GUICtrlCreateInput("", 72, 376, 121, 21)
GUICtrlCreateLabel("Server", 8, 380, 59, 17)
GUICtrlCreateLabel("User", 8, 404, 50, 17)
GUICtrlCreateLabel("PW", 8, 428, 46, 17)
Global $tb_User = GUICtrlCreateInput("", 72, 400, 121, 21)
Global $tb_PW = GUICtrlCreateInput("", 72, 424, 121, 21, BitOR ($ES_PASSWORD, $ES_AUTOHSCROLL))
Global $btn_SQLSave = GUICtrlCreateButton("Save", 104, 472, 34, 20, 0)
Global $tb_Master = GUICtrlCreateInput("", 72, 448, 121, 21)
Global $btn_Help = GUICtrlCreateButton("Help", 8, 472, 34, 20, 0)
Global $btn_IIS = GUICtrlCreateButton("IIS", 48, 472, 50, 20, 0)
Global $btn_GetDBs = GUICtrlCreateButton("DBs", 144, 472, 49, 20, 0)
GUICtrlCreateGroup("", -99, -99, 1, 1)
Global $AGroup4 = GUICtrlCreateGroup("", 340, 0, 281, 358)
Global $list_DBs = GUICtrlCreateList("", 344, 32, 140, 295, BitOR ($LBS_SORT, $LBS_NOINTEGRALHEIGHT, $LBS_DISABLENOSCROLL, $LBS_STANDARD, $WS_HSCROLL, $WS_VSCROLL, $WS_BORDER))
GUICtrlSetFont(-1, 8, 400, 0, "Lucida Console")
Global $btn_CompRefresh = GUICtrlCreateButton("Refresh", 347, 330, 57, 20, 0)
Global $list_DBsSelected = GUICtrlCreateList("", 487, 32, 129, 295, BitOR ($LBS_SORT, $LBS_NOINTEGRALHEIGHT, $LBS_STANDARD, $WS_HSCROLL, $WS_VSCROLL, $WS_BORDER))
GUICtrlSetFont(-1, 8, 400, 0, "Lucida Console")
Global $lbl_Available = GUICtrlCreateLabel("Available", 388, 16, 79, 17)
Global $lbl_Selected = GUICtrlCreateLabel("Selected", 516, 16, 70, 17)
Global $btn_SelectAll = GUICtrlCreateButton("Select All", 452, 330, 65, 20, 0)
Global $btn_Clear = GUICtrlCreateButton("Clear", 556, 330, 57, 20, 0)
GUICtrlCreateGroup("", -99, -99, 1, 1)
Global $pb_Progress = GUICtrlCreateProgress(0, 615, 620, 17)
GUICtrlSetData(-1, 25)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
Global $AGroup3 = GUICtrlCreateGroup("Group3", 200, 360, 421, 105)
Global $btn_InstallSQL = GUICtrlCreateButton("1", 500, 392, 105, 19, $BS_LEFT)
Global $btn_InstallWeb = GUICtrlCreateButton("2", 344, 370, 145, 19, $BS_LEFT)
Global $btn_InstallASWS = GUICtrlCreateButton("3", 500, 370, 105, 19, $BS_LEFT)
Global $btn_InstallRG = GUICtrlCreateButton("4", 344, 392, 145, 19, $BS_LEFT)
Global $btn_IIS2 = GUICtrlCreateButton("5", 500, 414, 105, 19, $BS_LEFT)
Global $btn_DBBuilder = GUICtrlCreateButton("6", 344, 414, 145, 19, $BS_LEFT)
Global $btn_InstallAll = GUICtrlCreateButton("7", 429, 438, 105, 19, 0)
Global $btn_ClearInstallFlags = GUICtrlCreateButton("C", 584, 444, 33, 17, 0)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateGroup("Profiles", 0, 0, 337, 41)
Global $cb_Profile = GUICtrlCreateCombo("Default", 8, 14, 209, 25)
GUICtrlSetData(-1, "Default")
Global $btn_AddProfile = GUICtrlCreateButton("Add", 223, 14, 50, 20, 0)
Global $btn_DelProfile = GUICtrlCreateButton("Del", 279, 14, 50, 20, 0)
GUICtrlCreateGroup("", -99, -99, 1, 1)
Global $tb_DBBuilder = GUICtrlCreateInput('', 288, 472, 283, 21)
Global $btn_DBBuilderSave = GUICtrlCreateButton("Save", 576, 472, 41, 25, 0)
Global $tab_WebFolders = GUICtrlCreateTab(0, 213, 284, 146)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH + $GUI_DOCKHEIGHT)
Global $TabSheet1 = GUICtrlCreateTabItem("BW")
Global $list_WebFolders = GUICtrlCreateList("", 4, 239, 275, 116, BitOR ($LBS_SORT, $LBS_NOINTEGRALHEIGHT, $WS_BORDER))
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
Global $TabSheet2 = GUICtrlCreateTabItem("AW")
Global $list_ASWSFolders = GUICtrlCreateList("", 4, 239, 275, 116, BitOR ($LBS_SORT, $LBS_NOINTEGRALHEIGHT, $WS_BORDER))
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
Global $TabSheet3 = GUICtrlCreateTabItem("RG")
Global $list_RGFolders = GUICtrlCreateList("", 4, 239, 275, 116, BitOR ($LBS_SORT, $LBS_NOINTEGRALHEIGHT, $WS_BORDER))
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
GUICtrlCreateTabItem("")
Global $btn_AddWebFolder = GUICtrlCreateButton("Add", 286, 237, 50, 20, 0)
Global $btn_RemoveWebFolder = GUICtrlCreateButton("Remove", 286, 262, 50, 20, 0)
Global $btn_BrowseWebFolder = GUICtrlCreateButton("...", 286, 287, 50, 20, 0)
Global $lbl_Master = GUICtrlCreateLabel("?", 288, 312, 51, 41)
Global $mnu_File = GUICtrlCreateMenu("&File")
Global $mnu_Exit = GUICtrlCreateMenuItem("Exit", $mnu_File)
GUISetState(@SW_SHOW)
Global $msg

While 1
    $msg = GUIGetMsg()
    Switch $msg
        Case $GUI_EVENT_CLOSE
            Exit
    EndSwitch
WEnd

Thanks!
Rick

Attachments (0)

Change History (1)

comment:1 Changed 17 years ago by Jon

  • Milestone set to 3.2.11.8
  • Owner set to Jon
  • Resolution set to Fixed
  • Status changed from new to closed

Fixed in version: 3.2.11.8

Guidelines for posting comments:

  • You cannot re-open a ticket but you may still leave a comment if you have additional information to add.
  • In-depth discussions should take place on the forum.

For more information see the full version of the ticket guidelines here.

Add Comment

Modify Ticket

Action
as closed The owner will remain Jon.
Author


E-mail address and user name can be saved in the Preferences.

 
Note: See TracTickets for help on using tickets.