[Tool] MsgBox Value

06/24/2009 18:24 Zabrus#1
hey, :D

Ich hab hier mal was aus langeweile gemacht.

Ein Tool zum Verstecken von Fenstern.

Ich weiß..blauwiggle hat das schon gemacht, aber ich will betonen das ich nichts aus seiner source kopiert habe sondern alle selbständigt gemacht habe

Code:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1_1 = GUICreate("Ich kann dich sehen! oO", 443, 603, 277, 157)
$Group1 = GUICtrlCreateGroup("", 8, 8, 425, 505)
$Input1 = GUICtrlCreateInput("", 40, 160, 161, 21)
$Input2 = GUICtrlCreateInput("", 40, 200, 161, 21)
$Button1 = GUICtrlCreateButton("Show", 256, 160, 57, 25)
$Button2 = GUICtrlCreateButton("Show", 256, 200, 57, 25)
$Button3 = GUICtrlCreateButton("Hide", 328, 160, 57, 25)
$Button4 = GUICtrlCreateButton("Hide", 328, 200, 57, 25)
$Input3 = GUICtrlCreateInput("", 40, 240, 161, 21)
$Button5 = GUICtrlCreateButton("Show", 256, 240, 57, 25)
$Button6 = GUICtrlCreateButton("Hide", 328, 240, 57, 25)
$Group3 = GUICtrlCreateGroup("Anleitung", 16, 24, 193, 105)
$Label7 = GUICtrlCreateLabel("Name vom Prog. eingben.", 24, 48, 127, 17)
$Label8 = GUICtrlCreateLabel("Show ---> Anzeigen", 24, 80, 96, 17)
$Label9 = GUICtrlCreateLabel("Hide -----> Verstecken", 24, 104, 107, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group4 = GUICtrlCreateGroup("Hotkeys", 232, 24, 185, 105)
$Label10 = GUICtrlCreateLabel("Beenden ------> F6", 240, 48, 156, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Input4 = GUICtrlCreateInput("", 40, 280, 161, 21)
$Input5 = GUICtrlCreateInput("", 40, 320, 161, 21)
$Button7 = GUICtrlCreateButton("Show", 256, 280, 57, 25)
$Button8 = GUICtrlCreateButton("Hide", 328, 280, 57, 25)
$Button9 = GUICtrlCreateButton("Show", 256, 320, 57, 25)
$Button10 = GUICtrlCreateButton("Hide", 328, 320, 57, 25)
$Input6 = GUICtrlCreateInput("", 40, 360, 161, 21)
$Input7 = GUICtrlCreateInput("", 40, 400, 161, 21)
$Input8 = GUICtrlCreateInput("", 40, 440, 161, 21)
$Input9 = GUICtrlCreateInput("", 40, 480, 161, 21)
$Button11 = GUICtrlCreateButton("Show", 256, 360, 57, 25, 0)
$Button12 = GUICtrlCreateButton("Hide", 328, 360, 57, 25, 0)
$Button13 = GUICtrlCreateButton("Show", 256, 400, 57, 25, 0)
$Button14 = GUICtrlCreateButton("Hide", 328, 400, 57, 25, 0)
$Button15 = GUICtrlCreateButton("Show", 256, 440, 57, 25, 0)
$Button16 = GUICtrlCreateButton("Hide", 328, 440, 57, 25, 0)
$Button17 = GUICtrlCreateButton("Show", 256, 480, 57, 25, 0)
$Button18 = GUICtrlCreateButton("Hide", 328, 480, 57, 25, 0)
GUICtrlCreateGroup("", -99, -99, 1, 1)

$Button20 = GUICtrlCreateButton("Show All", 256, 528, 57, 65, 0)
$Button21 = GUICtrlCreateButton("Hide All", 328, 528, 57, 65, 0)

GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###


HotKeySet("{F6}", "_exit")



While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Button20
			_show_all()
		Case $Button21
			_hide_all()
		Case $Button1
			WinSetState(GUICtrlRead($Input1), "", @SW_SHOW)
			WinSetState(GUICtrlRead($Input1), "", @SW_MINIMIZE)
		Case $Button3
			WinSetState(GUICtrlRead($Input1), "", @SW_MINIMIZE)
			WinSetState(GUICtrlRead($Input1), "", @SW_HIDE)
		Case $Button2
			WinSetState(GUICtrlRead($Input2), "", @SW_SHOW)
			WinSetState(GUICtrlRead($Input2), "", @SW_MINIMIZE)
		Case $Button4
			WinSetState(GUICtrlRead($Input2), "", @SW_MINIMIZE)
			WinSetState(GUICtrlRead($Input2), "", @SW_HIDE)
		Case $Button5
			WinSetState(GUICtrlRead($Input3), "", @SW_SHOW)
			WinSetState(GUICtrlRead($Input3), "", @SW_MINIMIZE)
		Case $Button6
			WinSetState(GUICtrlRead($Input3), "", @SW_MINIMIZE)
			WinSetState(GUICtrlRead($Input3), "", @SW_HIDE)
		Case $Button7
			WinSetState(GUICtrlRead($Input4), "", @SW_SHOW)
			WinSetState(GUICtrlRead($Input4), "", @SW_MINIMIZE)
		Case $Button8
			WinSetState(GUICtrlRead($Input4), "", @SW_MINIMIZE)
			WinSetState(GUICtrlRead($Input4), "", @SW_HIDE)
		Case $Button9
			WinSetState(GUICtrlRead($Input5), "", @SW_SHOW)
			WinSetState(GUICtrlRead($Input5), "", @SW_MINIMIZE)
		Case $Button10
			WinSetState(GUICtrlRead($Input5), "", @SW_MINIMIZE)
			WinSetState(GUICtrlRead($Input5), "", @SW_HIDE)
		Case $Button11
			WinSetState(GUICtrlRead($Input6), "", @SW_SHOW)
			WinSetState(GUICtrlRead($Input6), "", @SW_MINIMIZE)
		Case $Button12
			WinSetState(GUICtrlRead($Input6), "", @SW_MINIMIZE)
			WinSetState(GUICtrlRead($Input6), "", @SW_HIDE)
		Case $Button13
			WinSetState(GUICtrlRead($Input7), "", @SW_SHOW)
			WinSetState(GUICtrlRead($Input7), "", @SW_MINIMIZE)
		Case $Button14
			WinSetState(GUICtrlRead($Input7), "", @SW_MINIMIZE)
			WinSetState(GUICtrlRead($Input7), "", @SW_HIDE)
		Case $Button15
			WinSetState(GUICtrlRead($Input8), "", @SW_SHOW)
			WinSetState(GUICtrlRead($Input8), "", @SW_MINIMIZE)
		Case $Button16
			WinSetState(GUICtrlRead($Input8), "", @SW_MINIMIZE)
			WinSetState(GUICtrlRead($Input8), "", @SW_HIDE)
		Case $Button17
			WinSetState(GUICtrlRead($Input9), "", @SW_SHOW)
			WinSetState(GUICtrlRead($Input9), "", @SW_MINIMIZE)
		Case $Button18
			WinSetState(GUICtrlRead($Input9), "", @SW_MINIMIZE)
			WinSetState(GUICtrlRead($Input9), "", @SW_HIDE)
	EndSwitch
WEnd



Func _show_all()
	WinSetState(GUICtrlRead($Input1), "", @SW_SHOW)
	WinSetState(GUICtrlRead($Input1), "", @SW_MINIMIZE)
	WinSetState(GUICtrlRead($Input2), "", @SW_SHOW)
	WinSetState(GUICtrlRead($Input1), "", @SW_MINIMIZE)
	WinSetState(GUICtrlRead($Input3), "", @SW_SHOW)
	WinSetState(GUICtrlRead($Input1), "", @SW_MINIMIZE)
	WinSetState(GUICtrlRead($Input4), "", @SW_SHOW)
	WinSetState(GUICtrlRead($Input1), "", @SW_MINIMIZE)
	WinSetState(GUICtrlRead($Input5), "", @SW_SHOW)
	WinSetState(GUICtrlRead($Input1), "", @SW_MINIMIZE)
	WinSetState(GUICtrlRead($Input6), "", @SW_SHOW)
	WinSetState(GUICtrlRead($Input1), "", @SW_MINIMIZE)
	WinSetState(GUICtrlRead($Input7), "", @SW_SHOW)
	WinSetState(GUICtrlRead($Input1), "", @SW_MINIMIZE)
	WinSetState(GUICtrlRead($Input8), "", @SW_SHOW)
	WinSetState(GUICtrlRead($Input1), "", @SW_MINIMIZE)
	WinSetState(GUICtrlRead($Input9), "", @SW_SHOW)
	WinSetState(GUICtrlRead($Input1), "", @SW_MINIMIZE)
EndFunc   ;==>_show_all

Func _hide_all()
	WinSetState(GUICtrlRead($Input1), "", @SW_MINIMIZE)
	WinSetState(GUICtrlRead($Input1), "", @SW_HIDE)
	WinSetState(GUICtrlRead($Input2), "", @SW_MINIMIZE)
	WinSetState(GUICtrlRead($Input2), "", @SW_HIDE)
	WinSetState(GUICtrlRead($Input3), "", @SW_MINIMIZE)
	WinSetState(GUICtrlRead($Input3), "", @SW_HIDE)
	WinSetState(GUICtrlRead($Input4), "", @SW_MINIMIZE)
	WinSetState(GUICtrlRead($Input4), "", @SW_HIDE)
	WinSetState(GUICtrlRead($Input5), "", @SW_MINIMIZE)
	WinSetState(GUICtrlRead($Input5), "", @SW_HIDE)
	WinSetState(GUICtrlRead($Input6), "", @SW_MINIMIZE)
	WinSetState(GUICtrlRead($Input6), "", @SW_HIDE)
	WinSetState(GUICtrlRead($Input7), "", @SW_MINIMIZE)
	WinSetState(GUICtrlRead($Input7), "", @SW_HIDE)
	WinSetState(GUICtrlRead($Input8), "", @SW_MINIMIZE)
	WinSetState(GUICtrlRead($Input8), "", @SW_HIDE)
	WinSetState(GUICtrlRead($Input9), "", @SW_MINIMIZE)
	WinSetState(GUICtrlRead($Input9), "", @SW_HIDE)
	
EndFunc   ;==>_hide_all



Func _exit()
	$iResponse = MsgBox(4 + 64 + 262144, "Wirklich Beenden?", "Beim Beenden werden alle verstecken Fenster wieder hervorgerufen!!")
	If $iResponse = 6 Then
		WinSetState(GUICtrlRead($Input1), "", @SW_SHOW)
		WinSetState(GUICtrlRead($Input1), "", @SW_MINIMIZE)
		WinSetState(GUICtrlRead($Input2), "", @SW_SHOW)
		WinSetState(GUICtrlRead($Input1), "", @SW_MINIMIZE)
		WinSetState(GUICtrlRead($Input3), "", @SW_SHOW)
		WinSetState(GUICtrlRead($Input1), "", @SW_MINIMIZE)
		WinSetState(GUICtrlRead($Input4), "", @SW_SHOW)
		WinSetState(GUICtrlRead($Input1), "", @SW_MINIMIZE)
		WinSetState(GUICtrlRead($Input5), "", @SW_SHOW)
		WinSetState(GUICtrlRead($Input1), "", @SW_MINIMIZE)
		WinSetState(GUICtrlRead($Input6), "", @SW_SHOW)
		WinSetState(GUICtrlRead($Input1), "", @SW_MINIMIZE)
		WinSetState(GUICtrlRead($Input7), "", @SW_SHOW)
		WinSetState(GUICtrlRead($Input1), "", @SW_MINIMIZE)
		WinSetState(GUICtrlRead($Input8), "", @SW_SHOW)
		WinSetState(GUICtrlRead($Input1), "", @SW_MINIMIZE)
		WinSetState(GUICtrlRead($Input9), "", @SW_SHOW)
		WinSetState(GUICtrlRead($Input1), "", @SW_MINIMIZE)
		Exit
	EndIf
EndFunc   ;==>_exit
Mein Prob:

Bei Exit soll der bei Hotkey aktivierung, erst eine MsgBox hoch holen.
Bei "Ja" dann alle verstecketen Fenster !-minimiert-! vorholen und sich schließen.
Bei "Nein" soll sich die MsgBox einfach schließen


Und noch eine frage:
ich hab jetz @SW_show und @SW_MINIMIZ einzel gemacht.
Kann das das ned zusammen machen ?? mit "and" und "+" hab ich es versucht und kam ned weiter

für ewas hilfe wär ich dankbar:)

€dit:
Quote:
1. Wrong Sektion
hab extra hier rein gemacht weil man doch in den anderen beiden sektionen keine fragen stellen darf ??
06/24/2009 18:37 buFFy!#2
1. Wrong Sektion
2. Nein, muss man einzeln machen.
06/24/2009 19:15 __wadim#3
Quote:
Originally Posted by eF_Hacks View Post
1. Wrong Sektion
2. Nein, muss man einzeln machen.
arrays :)?
06/24/2009 21:16 | Moep |#4
Genau wie wadim schon sagt.. mit arrays sparst dir da n paar zeilen.

Weißt du durch den Tipp nun wie du da rangehen kannst oder brauchst noch n anstoß, Zabrus?

;)
06/24/2009 21:58 Rosemarie Lein#5
The Following 4.294.967.295 Users Say Thank You to | Moep | For This Useful Post:
Hat das was mit Moeps Namen zu tun?
06/24/2009 22:03 buFFy!#6
Ach ich dachte er meinte das SetState in eine Zeile fassen..
In seiner GetMsg Schleife kann er auch mit @ControlID arbeiten.
Würde auch extrem Zeilen sparen.

Edit: Zur Sektion.. Was hat das mit Guild Wars zu tun? ;)
06/24/2009 22:18 Rosemarie Lein#7
Im Programm fehlt noch die WinTitleMatchMode Opt oder wie die heisst.
06/25/2009 00:07 | Moep |#8
Quote:
Originally Posted by Rosemarie Lein View Post
The Following 4.294.967.295 Users Say Thank You to | Moep | For This Useful Post:
Hat das was mit Moeps Namen zu tun?
lool
06/25/2009 01:05 Azunai#9
tja ich sag da nur zu
4294967295 ist max value für mysql bei INT

;)

die zahl ist ab heut bei jedem thx, epvp müsste einfach in der datenbank INT auf BIGINT stellen :D

dann wär das maximum bei: 18.446.744.073.709.551.615

18 trillionen :D net schlecht
06/25/2009 14:09 Zabrus#10
hm mit den arrays wäre ein kleine erklärung notwendig :/ in der Referenz steht nix und in der AutoIt hilfe sind viele array und in englisch.


EDIT:Hab die deutsche Hilfe für AutoIt gefunden...aber ich find da nix mit_array

EDIT2: "WinTitleMatchMode Opt" verstanden und im scribt eingefügt :D
06/25/2009 18:24 | Moep |#11
Quote:
Originally Posted by Zabrus View Post
hm mit den arrays wäre ein kleine erklärung notwendig :/ in der Referenz steht nix und in der AutoIt hilfe sind viele array und in englisch.


EDIT:Hab die deutsche Hilfe für AutoIt gefunden...aber ich find da nix mit_array

EDIT2: "WinTitleMatchMode Opt" verstanden und im scribt eingefügt :D

Deine Input Variabeln hast du doch alle mit ner ID durchnummeriert.
Diese ID könntest nun durch eine variabel ersetzen, welche man dann z.B. mit ner For... Schleife durchläuft ;)

Wenn du das nicht verstanden hast, dann schau dir mal [Only registered and activated users can see links. Click Here To Register...] an, da wird finde ich sehr gut erklärt was rein array ist.