Opened 18 years ago
Closed 18 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 by , 18 years ago
| Milestone: | → 3.2.11.8 |
|---|---|
| Owner: | set to |
| Resolution: | → Fixed |
| Status: | new → closed |

Fixed in version: 3.2.11.8