GUi

[DePoS]

Witam Serdecznie

Chodzi o o to ze po kliklnieciu buttona splash wszystko wyskakuje ok , podacz klikniecia w 2 gui ( zaraz po splash ) Splash i med nie dzieje sie nic ;/ nie mam juz pomyslow wiem ze dla was to z 2 min wiec nie ma sensu meczyc sie kolejnej godziny

np zeby po klnieknieciu splash i med wyskoczyla ta msg asdasdasd :}{ dziekuje all odp zostana docenione ;]

tutaj macie skrypt

 

 

 

#include <ButtonConstants.au3>

#include <GUIConstantsEx.au3>

#include <StaticConstants.au3>

#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=

$Form2 = GUICreate("Form2", 557, 248, 332, 162)

$Group1 = GUICtrlCreateGroup("Group1", -5, -10, 561, 257)

$Pic1 = GUICtrlCreatePic("D:\asa.jpg", -5, 38, 273, 209)

$Pic2 = GUICtrlCreatePic("D:\image_kalonline_1.jpg", 267, 38, 289, 209)

$cr = GUICtrlCreateButton("Button1", -5, -2, 137, 41)

$wt = GUICtrlCreateButton("Splash", 131, -2, 137, 41)

$ry = GUICtrlCreateButton("Button3", 267, -2, 153, 41)

$Button4 = GUICtrlCreateButton("Button4", 419, -2, 137, 41)

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

GUISetState(@SW_SHOW)

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

 

while 2

$msg=GUiGetmsg()

if $msg = -3 then Exit

If $msg = $cr Then b()

if $msg =$wt then o()

WEnd

 

 

func b()

msgbox( 0 , "asd" , "asd")

endfunc

; ------------------------------------------------------------------------------------------------------------------------------------------ ;

func o()

#include <ButtonConstants.au3>

#include <GUIConstantsEx.au3>

#include <StaticConstants.au3>

#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=

$Form2 = GUICreate("Form2", 521, 275, 273, 173)

$Group1 = GUICtrlCreateGroup("Group1", -9, -7, 529, 281)

$Pic1 = GUICtrlCreatePic("D:\asdasdasd.jpg", -9, 49, 529, 225)

$Radio1 = GUICtrlCreateRadio("medy", 463, 1, 57, 17)

$Radio2 = GUICtrlCreateRadio("splash", 463, 25, 57, 17)

$But = GUICtrlCreateButton("Splash i Med", -9, 1, 465, 41)

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

GUISetState(@SW_SHOW)

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

endfunc

 

while 23

IF Case $But=true then sa()

WEnd

 

func sa()

msgbox( 0 , " SpaceOne" , " asdasd" 2 )

endfunc

[jackraymund]

To jest ukryta treść, proszę

• Zaloguj się
• lub
• Zarejestruj się

pokaleczyłeś język ze głowa boli, ale chyba o to ci chodziło

poprawiłem syntaxy

[DePoS]

Dziekuje all dziala poprawnie

Edytowane 30 Października 2011 przez DePoS

[Protecto]

@EDIT

Zapadła decyzja, że od 6.11.2011 nie będę pisał informacji o zamknięciu tematu, aby ich. nie podbijać.

Edytowane 5 Listopada 2011 przez Protecto