Jump to content
Sign in to follow this  
star2

[ help ] making child gui

Recommended Posts

star2

hi again

I'll start with my problem directly

I have this gui

#include <GuiConstants.au3>
GUICreate ("test", 200,100)
GUISetFont (12,600)
$check_1 = GUICtrlCreateCheckbox ("control panel",10,20)
$button = GUICtrlCreateButton ("go",10,60,100,30)
$info = GUICtrlCreateButton ("info",120,60,50,30)
guisetstate ()


While 1
    $msg = GUIGetMsg ()
    If $msg = $GUI_EVENT_CLOSE Then ExitLoop
    If  $msg = $button Then
            If BitAND(GUICtrlRead($check_1),$GUI_CHECKED) = 1 Then
                Run ("control.exe")
            Else
                MsgBox (-1,"error", "nothing checked !!")
            EndIf
        EndIf
WEnd

oÝ÷ Ù©Ý#§¶Ú,zÛaz)ß¡»­¶í¡Ø¬¦V²¶¬B±©âú©hz-z«z{+!¢é]mçb±¦åyÜ!zx§~.+Êek'jwkzÛ«éÚnWj¢§íz¸§~.+vz-{grbè§~î¶Ú'ÊkzËvØ^wè謥uªiyªÚºÚ"µÍÓÕ^RXÛÛÚ[ÛYH ÐÛÛÝ[Ë]LÉÝÂÚ[ÛYH  ÑÕRPÛÛÝ[Ë]LÉÝÂÜ
    ][ÝÑÕRPÛÜÙSÛTÐÉ][ÝËJBÜ
    ][ÝÑÕRSÛ][[ÙI][ÝËJBÌÍØXÝ]HÝZPÜX]J  ][ÝÐXÝ]  ][ÝËMKMLLKLK]Ô   ÌÍÕÔ×ÐÐTSÓ  ÌÍÕÔ×ÔÖTÓQSJJBÕRTÙ]Û][
    ÌÍÑÕRWÑUSÐÓÔÑK ][ÝÐXÝ]ÒÉ][ÝÈ
BÕRPÝÜX]RXÛÛ
]]Ò]^KLKLKLJBÕRPÝÜX]SX[
    ][ÝÐ[YHK  ][ÝË
NKLKLÍK
BÕRPÝÙ]Û
LKL ][ÝÐX[    ][ÝÊHÈÛÕRPÝÜX]SX[
    ][ÝÊÊH
I][ÝÈ [ÈÔ   [ÈÔ   [È ][ÝÖYI][ÝË
NKÌLÍK

BÌÍÙ[XZ[HÕRPÝÜX]SX[
    ][ÝØ]]ÜÛÛY]ÚKÛÛI][ÝË
NK
ÌLÍKMJBÝZPÝÙ]Û
    ÌÍÙ[XZ[KLK
HÈ[[YÝZPÝÙ]ÛÛÜ   ÌÍÙ[XZ[BÝZPÝÙ]ÝÛÜ  ÌÍÙ[XZ[
BÕRPÝÙ]Û][
LK  ][ÝÓÛ[XZ[    ][ÝÊBÌÍÝÝÝÈHÕRPÝÜX]SX[
    ][ÝÝÝÝË]]Ú]ØÜÛÛKÙÜ[KÉ][ÝË
NK
KMMJBÝZPÝÙ]Û
    ÌÍÝÝÝËKLK
HÈ[[YÝZPÝÙ]ÛÛÜ   ÌÍÝÝÝËBÝZPÝÙ]ÝÛÜ    ÌÍÝÝÝË
BÕRPÝÙ]Û][
LK  ][ÝÓÛÕÕÉ][ÝÊBÕRPÝÜX]P]Û
    ][ÝÓÒÉ][ÝË
KLMK
ÍKË]Ü    ÌÍÑÕRWÔÔ×ÑQUSÐUÓ  ÌÍÐ×ÑQTÒUÓJBÕRPÝÙ]Ý]H
LK  ÌÍÑÕRWÑÐÕTÊBÕRPÝÙ]Û][
LK  ][ÝÐXÝ]ÒÉ][ÝÊBÕRTÙ]Ý]JÕ×ÔÒÕË    ÌÍØXÝ]
BÚ[HHTÛY
L
BÑ[[ÈÛ[XZ[

BT[ÛÛTÜXÈ   [È ][ÝÈØÈ  ][ÝÈ  [È ÌÎNÜÝXZ[Î]]ÜÛÛY]ÚKÛÛOÜÝXXÝTÛÛY][ÉÌÎNË   ][ÝÉ][ÝËÕ×ÒQJB[[Â[ÈÛÕÕÊ
BT[ÛÛTÜXÈ   [È ][ÝÈØÈ  ][ÝÈ  [È ÌÎNÜÝÝÝË]]Ú]ØÜÛÛKÙÜ[KÉÌÎNË    ][ÝÉ][ÝËÕ×ÒQJB[[Â[ÈXÝ]ÒÊ
BQ^][[Â[ÈÛ]]Ò]^]

BQÕRQ[]J   ÌÍØXÝ]
B[[ÂÈYÈ[ÜÈÛÙÈÈYHÜHHÙY[^[BBH
Edited by star2

[quote]Baby you're all that I want, When you're lyin' here in my armsI'm findin' it hard to believe, We're in heavenAnd love is all that I need , And I found it there in your heartIt isn't too hard to see, We're in heaven .Bryan Adams[/quote].............................................................................[u]AUTOIT[/u]

Share this post


Link to post
Share on other sites
smashly

Hi,

Will this do?

#include <GuiConstants.au3>

#NoTrayIcon

$GUI1 = GUICreate ("test", 200,100)
GUISetFont (12,600)
$check_1 = GUICtrlCreateCheckbox ("control panel",10,20)
$button = GUICtrlCreateButton ("go",10,60,100,30)
$info = GUICtrlCreateButton ("info",120,60,50,30)
GUISetState(@SW_SHOW, $GUI1)

$about = GuiCreate("About",215,150,-1,-1,BitOR($WS_CAPTION,$WS_SYSMENU), $WS_EX_TOPMOST,$GUI1)
GUICtrlCreateIcon (@AutoItExe,-1,11,11)
GUICtrlCreateLabel ("App name 1.0",59,11,135,20)
GUICtrlSetFont (-1,10, 800, 0, "Arial") ; bold
GUICtrlCreateLabel ("© 2005" & @CRLF & @CRLF & "Zedna",59,30,135,40)
$email = GUICtrlCreateLabel ("author@somewhere.com",59,70,135,15)
GuiCtrlSetFont($email, 8.5, -1, 4) ; underlined
GuiCtrlSetColor($email,0x0000ff)
GuiCtrlSetCursor($email,0)
$www = GUICtrlCreateLabel ("www.autoitscript.com/forum/",59,85,140,15)
GuiCtrlSetFont($www, 8.5, -1, 4) ; underlined
GuiCtrlSetColor($www,0x0000ff)
GuiCtrlSetCursor($www,0)
$OK = GUICtrlCreateButton ("OK",65,115,75,23,BitOr($GUI_SS_DEFAULT_BUTTON, $BS_DEFPUSHBUTTON))
GUICtrlSetState (-1, $GUI_FOCUS)
GUISetState(@SW_HIDE, $about)


While 1
    $msg = GUIGetMsg ()
    Select
        Case $msg = $GUI_EVENT_CLOSE 
            Exit
        Case $msg = $button
            If BitAND(GUICtrlRead($check_1),$GUI_CHECKED) = 1 Then
                Run ("control.exe")
            Else
                MsgBox (-1,"error", "nothing checked !!")
            EndIf
        Case $msg = $email
            Run(@ComSpec & " /c " & 'start mailto:author@somewhere.com?subject=Something', "", @SW_HIDE)
        Case $msg = $www
            Run(@ComSpec & " /c " & 'start www.autoitscript.com/forum/', "", @SW_HIDE)
        Case $msg = $info
            GUISetState(@SW_DISABLE, $GUI1)
            GUISetState(@SW_SHOW, $about)
        Case $msg = $OK
            GUISetState(@SW_HIDE, $about)
            GUISetState(@SW_ENABLE, $GUI1)
            WinActivate($GUI1)
    EndSelect
WEnd

GoodLuck

&

Cheers

Edit: Just re read your post.. changed Parent GUI to disable/enable instead of show/hide

Edited by smashly

Share this post


Link to post
Share on other sites
star2

Hi,

Will this do?

GoodLuck

&

Cheers

great work

but if I close the info gui (not using the OK button) the parent will close also?

but thank you so much for the great help


[quote]Baby you're all that I want, When you're lyin' here in my armsI'm findin' it hard to believe, We're in heavenAnd love is all that I need , And I found it there in your heartIt isn't too hard to see, We're in heaven .Bryan Adams[/quote].............................................................................[u]AUTOIT[/u]

Share this post


Link to post
Share on other sites
star2

could be done like this

$about = GuiCreate("About",215,150,-1,-1,BitOR($WS_CAPTION,$WS_EX_CLIENTEDGE), $WS_EX_TOPMOST,$GUI1)

[quote]Baby you're all that I want, When you're lyin' here in my armsI'm findin' it hard to believe, We're in heavenAnd love is all that I need , And I found it there in your heartIt isn't too hard to see, We're in heaven .Bryan Adams[/quote].............................................................................[u]AUTOIT[/u]

Share this post


Link to post
Share on other sites
smashly

You could change the info window style to remove the X on the titlebar, this way a user clicks OK to exit.

$about = GuiCreate("About",215,150,-1,-1, $WS_CAPTION, $WS_EX_TOPMOST,$GUI1)

Or there is more ways to do what your after, just play around till you get the desired result.. :)

Edit: looks like you found what your after as I was typing..lol

Edited by smashly

Share this post


Link to post
Share on other sites
star2

You could change the info window style to remove the X on the titlebar, this way a user clicks OK to exit.

$about = GuiCreate("About",215,150,-1,-1, $WS_CAPTION, $WS_EX_TOPMOST,$GUI1)

Or there is more ways to do what your after, just play around till you get the desired result.. :D

Edit: looks like you found what your after as I was typing..lol

thank u so much it's clear now :)

[quote]Baby you're all that I want, When you're lyin' here in my armsI'm findin' it hard to believe, We're in heavenAnd love is all that I need , And I found it there in your heartIt isn't too hard to see, We're in heaven .Bryan Adams[/quote].............................................................................[u]AUTOIT[/u]

Share this post


Link to post
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
Sign in to follow this  

×