Jump to content

Border stsyle...


KXM
 Share

Recommended Posts

I know this is a simple one, but I can't for the life of me figure it out...

Which border style is the one with nothing but a single x(close) like a message box?

I am not sure about what border style you should use, but you can always makeup your own GUI.

#include <GuiConstants.au3>
GuiCreate("My message box", 400, 78,(@DesktopWidth-400)/2, (@DesktopHeight-78)/2, $WS_POPUP + $WS_DLGFRAME)
$Button = GuiCtrlCreateButton("X", 370, 0, 30, 30)
GUICtrlSetFont($Button, 24)
$Label = GuiCtrlCreateLabel("", 0, 0, 370, 30 )
GUICtrlSetBkColor(-1,0x8080ff)
GuiSetState()
While 1
    $msg = GuiGetMsg()
    Select
       Case $msg = $Button
        ExitLoop
    EndSelect
WEnd
Edited by BigDod


Time you enjoyed wasting is not wasted time ......T.S. Elliot
Suspense is worse than disappointment................Robert Burns
God help the man who won't help himself, because no-one else will...........My Grandmother

Link to comment
Share on other sites

I am not sure about what border style you should use, but you can always makeup your own GUI.

#include <GuiConstants.au3>
GuiCreate("My message box", 400, 78,(@DesktopWidth-400)/2, (@DesktopHeight-78)/2, $WS_POPUP + $WS_DLGFRAME)
$Button = GuiCtrlCreateButton("X", 370, 0, 30, 30)
GUICtrlSetFont($Button, 24)
$Label = GuiCtrlCreateLabel("", 0, 0, 370, 30 )
GUICtrlSetBkColor(-1,0x8080ff)
GuiSetState()
While 1
    $msg = GuiGetMsg()
    Select
       Case $msg = $Button
        ExitLoop
    EndSelect
WEnd
oooohhhh.... showing scripts now ... are we

but it works!!!!

i tried to find the correct coding.. i was sure it was an option in the coding... but i couldn't find it

so your idea may actually be the best way

8)

NEWHeader1.png

Link to comment
Share on other sites

i tried to find the correct coding.. i was sure it was an option in the coding... but i couldn't find it

I believe that is...

#include <GUIConstants.au3>
;Generated with Form Designer preview
$Form1 = GUICreate("Form1", 414, 306, 189, 116, BitOR($WS_SYSMENU,$WS_CAPTION,$WS_CLIPCHILDREN,$WS_BORDER,$WS_CLIPSIBLINGS))
GUISetState(@SW_SHOW)
While 1
    $msg = GuiGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
    Case Else
    ;;;;;;;
    EndSelect
WEnd
Exit
Link to comment
Share on other sites

I believe that is...

#include <GUIConstants.au3>
;Generated with Form Designer preview
$Form1 = GUICreate("Form1", 414, 306, 189, 116, BitOR($WS_SYSMENU,$WS_CAPTION,$WS_CLIPCHILDREN,$WS_BORDER,$WS_CLIPSIBLINGS))
GUISetState(@SW_SHOW)
While 1
    $msg = GuiGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
    Case Else
    ;;;;;;;
    EndSelect
WEnd
Exit
You win, I submit, no contest B)


Time you enjoyed wasting is not wasted time ......T.S. Elliot
Suspense is worse than disappointment................Robert Burns
God help the man who won't help himself, because no-one else will...........My Grandmother

Link to comment
Share on other sites

I played around with it and found that only one style is needed

#include <GUIConstants.au3>
;Generated with Form Designer preview
$Form = GUICreate("This is a test !!!", 414, 306, 189, 116,$WS_SYSMENU)
GUISetState(@SW_SHOW)
While 1
    $msg = GuiGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
    EndSelect
WEnd
Exit

Edit - This is only cause I do not understand what BitOR does

Edited by BigDod


Time you enjoyed wasting is not wasted time ......T.S. Elliot
Suspense is worse than disappointment................Robert Burns
God help the man who won't help himself, because no-one else will...........My Grandmother

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