Sign in to follow this  
Followers 0
erikson

GUI help

2 posts in this topic

i have a gui window.

CODE
$AForm1 = GUICreate("Regulament", 280, 500, 480, 311)

GUISetIcon("D:09.ico")

$GroupBox1 = GUICtrlCreateGroup("Alegeti Optiunea ", 8, 300, 180, 175)

GUICtrlCreateGroup ("Welcome", 0, 0, 270, 300)

$Radio1 = GUICtrlCreateRadio(" Logare User ", 10, 330, 150, 20)

GUICtrlSetFont(-1, 12, 800, 1, "Times New Roman")

GUICtrlSetColor(-1, 0x800000)

GUICtrlSetState ($Radio1, $GUI_CHECKED); arbitrary

$Radio2 = GUICtrlCreateRadio(" Modificare Parola ", 10, 355, 150, 20)

GUICtrlSetFont(-1, 12, 800, 1, "Times New Roman")

GUICtrlSetColor(-1, 0x800000)

$Radio3 = GUICtrlCreateRadio(" Creare Cont ", 10, 380, 150, 20)

GUICtrlSetFont(-1, 12, 800, 1, "Times New Roman")

GUICtrlSetColor(-1, 0x800000)

$Radio4 = GUICtrlCreateRadio(" Anonymous ", 10, 405, 150, 20)

GUICtrlSetFont(-1, 12, 800, 1, "Times New Roman")

GUICtrlSetColor(-1, 0x800000)

GUICtrlCreateGroup("", -99, -99, 1, 1)

$Button1 = GUICtrlCreateButton("&OK", 195, 355, 75, 25, 0)

$Button2 = GUICtrlCreateButton("&Cancel", 195, 390, 75, 25, 0)

$Label1 = GUICtrlCreateLabel("", 8, 8, 2, 26)

GUICtrlSetFont(-1, 14, 800, 1, "Times New Roman")

GUICtrlSetColor(-1, 0x800000)

GUISetState(@SW_SHOW)

#EndRegion ### END Koda GUI section ###

While 1

$nMsg = GUIGetMsg()

Switch $nMsg

Case $GUI_EVENT_CLOSE

Exit

Case $Button1

run_selected()

Case $Button2

Exit

EndSwitch

WEnd

Func run_selected()

If BitAND(GUICtrlRead($Radio1), $GUI_CHECKED) = $GUI_CHECKED Then Run ("")

If BitAND(GUICtrlRead($Radio2), $GUI_CHECKED) = $GUI_CHECKED Then Run("")

if $Button1 then Exit

EndFunc

all i whant is to put some text in this group ( GUICtrlCreateGroup ("Welcome", 0, 0, 270, 300) )

Share this post


Link to post
Share on other sites



To place text on a GUI use GUICtrlCreateLabel, just be careful to fit your label's dimensions into the window.

#include <GUIConstants.au3>


$AForm1 = GUICreate("Regulament", 280, 500, 480, 311)


GUISetIcon("D:09.ico")
$GroupBox1 = GUICtrlCreateGroup("Alegeti Optiunea ", 8, 300, 180, 175)
GUICtrlCreateGroup ("Welcome", 0, 0, 270, 300)
GUICtrlCreateLabel("Welcome text goes here.............", 10,50,250,100)

;...rest goes here

I didn't copy your whole code but hopefully this is what you wanted!


While ProcessExists('Andrews bad day.exe')
	BlockInput(1)
	SoundPlay('Music.wav')
	SoundSetWaveVolume('Louder')
WEnd

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  
Followers 0