Cloudsx Posted July 4, 2006 Share Posted July 4, 2006 i want to make an Open/close dialog with button so if i press the button its must open and if i press the X to close but if i press the button again i cant open it again how can i find a solution for this problem???? Link to comment Share on other sites More sharing options...
Somniis Posted July 4, 2006 Share Posted July 4, 2006 Would you perhaps mind adding the code you have so we can help? Link to comment Share on other sites More sharing options...
Cloudsx Posted July 4, 2006 Author Share Posted July 4, 2006 (edited) oke wel this is the first game i made only itas has to be bug fix $status=GUICtrlCreateButton("Status",25,200,40,40) While 1 $msg = GUIGetMsg($main_GUI) If $msg = $GUI_EVENT_CLOSE Then If WinActive("elcaponis") then Exit If WinActive("Hunt") then GUIDelete($Hunt) If WinActive("Status") then GUIDelete($status) EndIf If $msg = $hunt then Gui2create() if $msg = $status then Gui3create() Wend func Gui2create() If WinExists("Hunt") then Return $Hunt = GUICreate("",100,100,700,550) GUISetBkColor(0x49bf49) $button = GUICtrlCreatePic("Blood Hund.jpg",18,18 ,64,64) GUISetState (@SW_SHOW) EndFunc Func Gui3create() if WinExists("Status") then Return $status= GUICreate("Status",300,200,200,200) GUISetBkColor(0xB7B7B7) GUISetState(@SW_SHOW) EndFunc Edited July 4, 2006 by Cloudsx Link to comment Share on other sites More sharing options...
Cloudsx Posted July 4, 2006 Author Share Posted July 4, 2006 COould some one please help me with this Link to comment Share on other sites More sharing options...
Xenobiologist Posted July 4, 2006 Share Posted July 4, 2006 COould some one please help me with thisHI,that isn't the complete script. The Gui is missing. :"> So long,Mega Scripts & functions Organize Includes Let Scite organize the include files Yahtzee The game "Yahtzee" (Kniffel, DiceLion) LoginWrapper Secure scripts by adding a query (authentication) _RunOnlyOnThis UDF Make sure that a script can only be executed on ... (Windows / HD / ...) Internet-Café Server/Client Application Open CD, Start Browser, Lock remote client, etc. MultipleFuncsWithOneHotkey Start different funcs by hitting one hotkey different times Link to comment Share on other sites More sharing options...
Cloudsx Posted July 4, 2006 Author Share Posted July 4, 2006 yes sorry i have it put out but i will give u now the good example expandcollapse popup#include <GUIconstants.au3> $Player=IniRead("Player.ini", "Player", "PlayerName","NotSet"); Reads the player from the ini file ;if the ini file does not exist or no entry then load the file open dialogue. If $Player = "NotSet" then MsgBox(4096,"Choose your picture", "choose you picture you want to use for the game") $Player=FileOpenDialog ("choose your picture","C:\","(*.*)") EndIf IniWrite ("Player.ini", "Player", "PlayerName", $Player);write the player back to the ini file $main_GUI = GUICreate ("elcaponis" ,400,400) GUISetState(@SW_SHOW) GUICtrlCreatePic ($Player,25,70,64,64);you should be adjust at size your image $exp = IniRead("Exp.ini", "Exp", "Exp",0) $Lvl = IniRead("Exp.ini", "Lvl", "Lvl",0) $TNL = IniRead("Exp.ini", "TNL", "TNL",0) $HP = IniRead("HP.ini", "HP","HP",0) $MP = iniRead("MP.ini", "MP","MP",0) GUICtrlCreateLabel("Exp", 25,15, 25,25) $exp = GuiCtrlCreateLabel($exp,50,15) GUICtrlCreateLabel("Lvl", 70,15,25,25) $Lvl = GUICtrlCreateLabel($Lvl,95,15) GUICtrlCreateLabel("Tnl", 120,15,25,25) $TNL=GUICtrlCreateLabel($TNL,145,15) GUICtrlCreateLabel("HP:",30,150,25,25) $HP=GUICtrlCreateLabel($HP,50,150) GUICtrlCreateLabel("MP:",30,175,25,25) $MP=GUICtrlCreateLabel($Mp,50,175) if $exp > 50 Then $Lvl + 1 if $exp > 50 Then $HP + 12 if $exp > 50 then $MP + 6 if $exp > 120 then $Lvl + 1 if $exp > 120 then $HP + 12 if $exp > 120 then $mp + 6 if $exp > 290 then $Lvl + 1 if $exp > 290 then $HP + 12 If $exp > 290 then $mp + 6 If $exp > 630 Then $Lvl + 1 if $exp > 630 then $HP + 12 if $exp > 630 then $MP + 6 Opt("GUICoordMode",4) $Hunt=GUICtrlCreateButton("Hunt",200, 350, 40,40) $status=GUICtrlCreateButton("Status",25,200,40,40) While 1 $msg = GUIGetMsg($main_GUI) If $msg = $GUI_EVENT_CLOSE Then If WinActive("elcaponis") then Exit If WinActive("Hunt") then GUIDelete($Hunt) If WinActive("Status") then GUIDelete($status) EndIf If $msg = $hunt then Gui2create() if $msg = $status then Gui3create() Wend func Gui2create() If WinExists("Hunt") then Return $Hunt = GUICreate("",100,100,700,550) GUISetBkColor(0x49bf49) $button = GUICtrlCreatePic("Blood Hund.jpg",18,18 ,64,64) GUISetState (@SW_SHOW) EndFunc Func Gui3create() if WinExists("Status") then Return $status= GUICreate("Status",300,200,200,200) GUISetBkColor(0xB7B7B7) GUISetState(@SW_SHOW) EndFunc Global $Pic1 = 100000000000000000 $main = GUICreate('') $button = GUICtrlCreateButton("Create Pic Button", 10, 10, 100, 30) GUISetState() While 2 $msg = GUIGetMsg() If $msg = $button Then $Pic1 = GUICtrlCreatePic(@MyDocumentsDir "F:\autoit base\autoit basis2", 10, 100, 100, 30) EndIf If $msg = $Pic1 Then MsgBox(0, 'Works', 'You clicked the button pic') EndIf WEnd this one better Cloud Link to comment Share on other sites More sharing options...
Cloudsx Posted July 5, 2006 Author Share Posted July 5, 2006 please can some one help me with this Link to comment Share on other sites More sharing options...
Skruge Posted July 6, 2006 Share Posted July 6, 2006 Is this what you're trying to do? While 42 $msg = GUIGetMsg() If $msg = $button Then GUICtrlSetState($button, $GUI_DISABLE) $Pic1 = GUICtrlCreatePic(@MyDocumentsDir "F:\autoit base\autoit basis2", 10, 100, 100, 30) EndIf If $msg = $Pic1 Then MsgBox(0, 'Works', 'You clicked the button pic') EndIf WEnd p.s. It's best not to recreate controls in a loop, unless you're tracking each instance. [font="Tahoma"]"Tougher than the toughies and smarter than the smarties"[/font] Link to comment Share on other sites More sharing options...
Cloudsx Posted July 7, 2006 Author Share Posted July 7, 2006 oke thanks and can i also use to the line of endif and then i can use it Link to comment Share on other sites More sharing options...
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now