Jump to content

Resize Tab Controls?


lyledg
 Share

Recommended Posts

When trying to resize a GUI, all controls resize except the Tab controls when the Main GUI is maximised. Is this possible to do and if so how can I change the code below to reflect this?

Cheers

#include <GUIConstants.au3>
; == GUI generated with Koda ==);
$Form2 = GUICreate("Tabbed Notebook Dialog", 683, 582, 178, 104, BitOR($WS_MAXIMIZEBOX,$WS_MINIMIZEBOX,$WS_SYSMENU,$WS_CAPTION,$WS_POPUPWINDOW,
$WS_GROUP,$WS_TABSTOP,$WS_BORDER,$WS_CLIPSIBLINGS))
;GUISetIcon("D:\005.ico")
$PageControl1 = GUICtrlCreateTab(8, 8, 668, 528, -1, $TCS_EX_FLATSEPARATORS)
$TabSheet1 = GUICtrlCreateTabItem("TabSheet1")
$Edit1 = GUICtrlCreateEdit("", 16, 344, 649, 185)
GUICtrlSetData($Edit1, "AEdit1")
$TabSheet2 = GUICtrlCreateTabItem("TabSheet2")
$Edit2 = GUICtrlCreateEdit("", 16, 344, 649, 185)
GUICtrlSetData($Edit2, "AEdit1")
$TabSheet3 = GUICtrlCreateTabItem("TabSheet3")
$Edit3 = GUICtrlCreateEdit("", 16, 344, 649, 185)
GUICtrlSetData($Edit3, "AEdit1")
$TabSheet4 = GUICtrlCreateTabItem("TabSheet4")
$Edit4 = GUICtrlCreateEdit("", 16, 344, 649, 185)
GUICtrlSetData($Edit4, "AEdit1")
$TabSheet5 = GUICtrlCreateTabItem("TabSheet5")
GUICtrlSetState(-1,$GUI_SHOW)
$Edit5 = GUICtrlCreateEdit("", 16, 344, 649, 185)
GUICtrlSetData($Edit5, "AEdit1")
GUICtrlCreateTabItem("")
$Button1 = GUICtrlCreateButton("&OK", 422, 552, 75, 25, 0)
$Button2 = GUICtrlCreateButton("&Cancel", 510, 552, 75, 25, 0)
$Button3 = GUICtrlCreateButton("&Help", 600, 552, 75, 25, 0)
GUISetState(@SW_SHOW)
While 1
    $msg = GuiGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
    Case Else
;;;;;;;
    EndSelect
WEnd
Edited by lyledg
Link to comment
Share on other sites

#include <GUIConstants.au3>
; == GUI generated with Koda ==);
$Form2 = GUICreate("Tabbed Notebook Dialog", 683, 582, 178, 104, _
 BitOR($WS_MAXIMIZEBOX, $WS_MINIMIZEBOX, $WS_SYSMENU, $WS_CAPTION, _
 $WS_POPUPWINDOW, $WS_GROUP, $WS_TABSTOP, $WS_BORDER, $WS_CLIPSIBLINGS))
;GUISetIcon("D:\005.ico")
$PageControl1 = GUICtrlCreateTab(8, 8, 668, 528, -1, $TCS_EX_FLATSEPARATORS)

$TabSheet1 = GUICtrlCreateTabItem("TabSheet1")
$Edit1 = GUICtrlCreateEdit("", 16, 344, 649, 185)
GUICtrlSetData($Edit1, "AEdit1")

$TabSheet2 = GUICtrlCreateTabItem("TabSheet2")
$Edit2 = GUICtrlCreateEdit("", 16, 344, 649, 185)
GUICtrlSetData($Edit2, "AEdit1")

$TabSheet3 = GUICtrlCreateTabItem("TabSheet3")
$Edit3 = GUICtrlCreateEdit("", 16, 344, 649, 185)
GUICtrlSetData($Edit3, "AEdit1")

$TabSheet4 = GUICtrlCreateTabItem("TabSheet4")
$Edit4 = GUICtrlCreateEdit("", 16, 344, 649, 185)
GUICtrlSetData($Edit4, "AEdit1")

$TabSheet5 = GUICtrlCreateTabItem("TabSheet5")
GUICtrlSetState(-1, $GUI_SHOW)
$Edit5 = GUICtrlCreateEdit("", 16, 344, 649, 185)
GUICtrlSetData($Edit5, "AEdit1")

GUICtrlCreateTabItem("")
;*************************************************************
; need to add this
;*************************************************************
GUICtrlSetResizing ($PageControl1,$GUI_DOCKLEFT+$GUI_DOCKTOP)

$Button1 = GUICtrlCreateButton("&OK", 422, 552, 75, 25, 0)
$Button2 = GUICtrlCreateButton("&Cancel", 510, 552, 75, 25, 0)
$Button3 = GUICtrlCreateButton("&Help", 600, 552, 75, 25, 0)
GUISetState(@SW_SHOW)
While 1
    $msg = GUIGetMsg()
    Select
        Case $msg = $GUI_EVENT_CLOSE
            ExitLoop
        Case Else
        ;;;;;;;
    EndSelect
WEnd

SciTE for AutoItDirections for Submitting Standard UDFs

 

Don't argue with an idiot; people watching may not be able to tell the difference.

 

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...