GroupBox and child controls

[lookfar]

when inserting a radio button or checkbox inside a groupbox within a IDE like Delphi or VB or VC++, the component inherits the propertys of the parent so that one can move the groupbox and all the controls inside move with it, the controls are owned by the parent. The Top,Left,Width and Height are based off the Parent and not the form.

when I insert a radio button using :

$GroupBox1 = GuiCtrlCreateGroup("GroupBox1", 96, 48, 185, 105)

$RadioButton1 = GuiCtrlCreateRadio("RadioButton1", 16, 16, 113, 17)

The radio button should be inside the groupbox, but in fact the radio button ends up outside the groupbox because it is still owned by the main form and not the groupbox.

I cannot seem to find any reference to this in the help file..

Can I set "Parent" as a parameter of a control?

[quaizywabbit]

perhaps using

$GroupBox1 = GuiCtrlCreateGroup("GroupBox1", 96, 48, 185, 105)
Opt("GUICoordMode", 0)      ;1=absolute, 0=relative, 2=cell
$RadioButton1 = GuiCtrlCreateRadio("RadioButton1", 16, 16, 113, 17)

if that doesn't work then you could add the group and radio's to a child window on the parent form

Edited July 21, 2005 by quaizywabbit

[lookfar]

perhaps using

$GroupBox1 = GuiCtrlCreateGroup("GroupBox1", 96, 48, 185, 105)
Opt("GUICoordMode", 0)     ;1=absolute, 0=relative, 2=cell
$RadioButton1 = GuiCtrlCreateRadio("RadioButton1", 16, 16, 113, 17)

if that doesn't work then you could add the group and radio's to a child window on the parent form

<{POST_SNAPBACK}>

Well that works if there is only one control in the groupbox but as soon as you put more than one they shuffle over to the right:

#include <GuiConstants.au3>
If Not IsDeclared('WS_CLIPSIBLINGS') Then Global $WS_CLIPSIBLINGS = 0x04000000
GuiCreate("Form1", 420, 331, 302,218 ,$WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS)
$GroupBox1 = GuiCtrlCreateGroup("GroupBox1", 168, 32, 185, 105)
Opt("GUICoordMode", 0)
$CheckBox1 = GuiCtrlCreateCheckbox("CheckBox1", 24, 24, 97, 17 ); lines up ok
$CheckBox2 = GuiCtrlCreateCheckbox("CheckBox2", 24, 48, 97, 17 ); wrong alignment
Opt("GUICoordMode", 1)
$Button1 = GuiCtrlCreateButton("Button1", 8, 8, 75, 25); button is outside,good

GuiSetState()
While 1
    $msg = GuiGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
    Case Else
        
    EndSelect
WEnd
Exit

[quaizywabbit]

Well that works if there is only one control in the groupbox but as soon as you put more than one they shuffle over to the right:

#include <GuiConstants.au3>
If Not IsDeclared('WS_CLIPSIBLINGS') Then Global $WS_CLIPSIBLINGS = 0x04000000
GuiCreate("Form1", 420, 331, 302,218 ,$WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS)
$GroupBox1 = GuiCtrlCreateGroup("GroupBox1", 168, 32, 185, 105)
Opt("GUICoordMode", 0)
$CheckBox1 = GuiCtrlCreateCheckbox("CheckBox1", 24, 24, 97, 17 ); lines up ok
$CheckBox2 = GuiCtrlCreateCheckbox("CheckBox2", 24, 48, 97, 17 ); wrong alignment
Opt("GUICoordMode", 1)
$Button1 = GuiCtrlCreateButton("Button1", 8, 8, 75, 25); button is outside,good

GuiSetState()
While 1
    $msg = GuiGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
    Case Else
        
    EndSelect
WEnd
Exit

<{POST_SNAPBACK}>

try this instead:

If Not IsDeclared('WS_CLIPSIBLINGS') Then Global $WS_CLIPSIBLINGS = 0x04000000
GuiCreate("Form1", 420, 331, 302,218 ,$WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS)
$GroupBox1 = GuiCtrlCreateGroup("GroupBox1", 168, 32, 185, 105)
Opt("GUICoordMode", 0)
$CheckBox1 = GuiCtrlCreateCheckbox("CheckBox1", 24, 24, 97, 17 ); lines up ok
$CheckBox2 = GuiCtrlCreateCheckbox("CheckBox2", -1, 48, 97, 17 ); -1 lines up control from previous control during 'relative coord mode'
Opt("GUICoordMode", 1)
$Button1 = GuiCtrlCreateButton("Button1", 8, 8, 75, 25); button is outside,good

GuiSetState()
While 1
    $msg = GuiGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
    Case Else
        
    EndSelect
WEnd
Exit

Edited July 23, 2005 by quaizywabbit