Neue form öffnen

07/06/2010 22:36 Flyffaaa#1
Hey ich habe mit Koda ein Gerüst gebaut^^

nun wollte ich fragen, wie ich die 3 Formen zusammen fügen.

und wie ich dann eine neue Form öffne^^
07/06/2010 22:54 bladerofdarknes#2
[Only registered and activated users can see links. Click Here To Register...]
07/06/2010 23:00 Flyffaaa#3
wow *-* ein ganz toller ._.
07/06/2010 23:04 FetterArsch500#4
Entweder du kannst 3 verschiedene Exen machen die du nach einander aufrufst (ganz blöd) oder du packst die Forms in Functions und rufst die dann auf
07/07/2010 00:01 Flyffaaa#5
sry bin neu in AutoIt ^^

wie macht man denn sowas ?
07/07/2010 00:15 Jeoni#6
PHP Code:
Func _neueForm()
;Nochmal das selbe, wie in der KoDa Section
EndFunc 
Anwendung:
PHP Code:
;blabla
_neueForm() ;aufruf der neuen Form 
Ganz einfach.
07/07/2010 16:16 Smincke2#7
du kannst auch einfach alle gui hintereinander in das script schreiben
07/07/2010 16:32 Flyffaaa#8
zb. so ?
1
Code:
#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=C:\Users\Administrator\Desktop\Tooooooolllll\Form2.kxf
$Form2 = GUICreate("~*Special-Tools*~", 251, 101, 618, 533)
$Button1 = GUICtrlCreateButton("Server Starten", 24, 32, 200, 25, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
					Case $Button1
Run("Program\AccountServer\AccountServer.exe", "Program\AccountServer")
  Sleep(1000)
 Run("Program\Certifier\Certifier.exe", "Program\Certifier")
 Sleep(1000)
 Run("Resource\DatabaseServer.exe", "Resource")
 Sleep(9000)
 Run("Program\CoreServer\CoreServer.exe", "Program\CoreServer")
 Sleep(1000)
 Run("Program\CacheServer\CacheServer.exe", "Program\CacheServer")
 Sleep(1000)
 Run("Program\LoginServer\LoginServer.exe", "Program\LoginServer")
 Sleep(1000)
 Run("Resource\WorldServer.exe", "Resource")
 Run("Antihack\packetfilter.exe", "Antihack")

	EndSwitch
WEnd
+2
Code:
#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=C:\Users\Administrator\Desktop\Tooooooolllll\Form3.kxf
$Form3 = GUICreate("~*Special-Tools*~", 251, 101, 533, 434)
$Button1 = GUICtrlCreateButton("Server schließen", 24, 32, 200, 25, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
			Case $Button1
			 ProcessClose("AccountServer.exe")
 Sleep(120)
 ProcessClose("Certifier.exe")
 Sleep(120)
 ProcessClose("DatabaseServer.exe")
 Sleep(120)
 ProcessClose("CoreServer.exe")
 Sleep(120)
 ProcessClose("CacheServer.exe")
 Sleep(120)
 ProcessClose("LoginServer.exe")
 Sleep(120)
 ProcessClose("WorldServer.exe")
 Sleep(120)
 ProcessClose("packetfilter.exe")

	EndSwitch
WEnd
=
Code:
#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=C:\Users\Administrator\Desktop\Tooooooolllll\Form3.kxf
$Form3 = GUICreate("~*Special-Tools*~", 251, 101, 533, 434)
$Button1 = GUICtrlCreateButton("Server schließen", 24, 32, 200, 25, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
			Case $Button1
			 ProcessClose("AccountServer.exe")
 Sleep(120)
 ProcessClose("Certifier.exe")
 Sleep(120)
 ProcessClose("DatabaseServer.exe")
 Sleep(120)
 ProcessClose("CoreServer.exe")
 Sleep(120)
 ProcessClose("CacheServer.exe")
 Sleep(120)
 ProcessClose("LoginServer.exe")
 Sleep(120)
 ProcessClose("WorldServer.exe")
 Sleep(120)
 ProcessClose("packetfilter.exe")

	EndSwitch
WEnd

#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=C:\Users\Administrator\Desktop\Tooooooolllll\Form2.kxf
$Form2 = GUICreate("~*Special-Tools*~", 251, 101, 618, 533)
$Button1 = GUICtrlCreateButton("Server Starten", 24, 32, 200, 25, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
					Case $Button1
Run("Program\AccountServer\AccountServer.exe", "Program\AccountServer")
  Sleep(1000)
 Run("Program\Certifier\Certifier.exe", "Program\Certifier")
 Sleep(1000)
 Run("Resource\DatabaseServer.exe", "Resource")
 Sleep(9000)
 Run("Program\CoreServer\CoreServer.exe", "Program\CoreServer")
 Sleep(1000)
 Run("Program\CacheServer\CacheServer.exe", "Program\CacheServer")
 Sleep(1000)
 Run("Program\LoginServer\LoginServer.exe", "Program\LoginServer")
 Sleep(1000)
 Run("Resource\WorldServer.exe", "Resource")
 Run("Antihack\packetfilter.exe", "Antihack")

	EndSwitch
WEnd
07/07/2010 16:40 omer36#9
eher so ;)

PHP Code:
#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=C:\Users\Administrator\Desktop\Tooooooolllll\Form3.kxf
$Form3 = GUICreate("~*Special-Tools*~", 251, 101, 533, 434)
$Button2 = GUICtrlCreateButton("Server schließen", 24, 32, 200, 25, 0)
GUISetState(@SW_SHOW)
$Form2 = GUICreate("~*Special-Tools*~", 251, 101, 618, 533)
$Button1 = GUICtrlCreateButton("Server Starten", 24, 32, 200, 25, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button2
            _button2()
        Case $Button1
            _button1()
    EndSwitch
WEnd

Func _button2()
 ProcessClose("AccountServer.exe")
 Sleep(120)
 ProcessClose("Certifier.exe")
 Sleep(120)
 ProcessClose("DatabaseServer.exe")
 Sleep(120)
 ProcessClose("CoreServer.exe")
 Sleep(120)
 ProcessClose("CacheServer.exe")
 Sleep(120)
 ProcessClose("LoginServer.exe")
 Sleep(120)
 ProcessClose("WorldServer.exe")
 Sleep(120)
 ProcessClose("packetfilter.exe")
EndFunc


Func _button1()
 Run("Program\AccountServer\AccountServer.exe", "Program\AccountServer")
 Sleep(1000)
 Run("Program\Certifier\Certifier.exe", "Program\Certifier")
 Sleep(1000)
 Run("Resource\DatabaseServer.exe", "Resource")
 Sleep(9000)
 Run("Program\CoreServer\CoreServer.exe", "Program\CoreServer")
 Sleep(1000)
 Run("Program\CacheServer\CacheServer.exe", "Program\CacheServer")
 Sleep(1000)
 Run("Program\LoginServer\LoginServer.exe", "Program\LoginServer")
 Sleep(1000)
 Run("Resource\WorldServer.exe", "Resource")
 Run("Antihack\packetfilter.exe", "Antihack")
EndFunc 
07/07/2010 20:15 Flyffaaa#10
also du hast erst die functionen zusammen gemacht und dann noch die Whiles ? also sortieren


E: hab grad getestet :

und was ist wenn ich beim button klick erst ne neue form öffnen möchte