Bild in eine GUI einfügen

[An]Ion

Guten Abend liebes Forum,
ich schlage mich seit mehreren Stunden mit dem Problem herum, das ich es nicht schaffe ein Bild in eine GUI hinzufügen.
Ich versuche es mit;
GUICtrlCreatePic,
aber sagen tut er immer, wenn ich das Script starten will
"C:\Users\Lars\Desktop\1\GUI.au3" (6) : ==> Unknown function name.:
GUICtrlCreatePic(Nawi-Logo2.JPEG, -1, -1)
GUICtrlCreatePic(^ ERROR
>Exit code: 1 Time: 0.08888
Ich habe es probiert in dem ich das Bild von png. in jpg. geändert habe.
Das Script und das Bild auf dem Desktop liegen gehabt zuhabe.
Und das Script und das Bild in einen Ordner verschoben habe.

Doch leider finde ich das Problem nicht!
Auch die AutoIt-Hilfe hat nicht weitergeholfen und das Internet auch nicht.
Vllt. übersehe ich den Fehler oder mir ist wieder ein Befehl aus C++ hereingerutscht der da gar nichts zu suchen hat.

AutoIt

#include <GuiMenu.au3>


GUICreate("xxx", 500, 500, 500, 250)
$Button = GUICtrlCreateButton("B1", 10, 100, 100, 20)
$Button2 = GUICtrlCreateButton("EXIT", 395, 465, 100, 30)
GUICtrlCreatePic(@ScriptDir & "Nawi-Logo.jpg", -1, -1)
GUISetState()
while 1
	$msg = GUIGetMsg()
	Select
		case $msg = -3
			Exit
		case $msg = $Button
			MsgBox(0, "Button", "B1 funktioniert")
		case $msg = $Button2
			Exit
	EndSelect
WEnd

Alles anzeigen

**UEZ**

Probiere es mal mit

AutoIt

GUICtrlCreatePic(@ScriptDir & "\Nawi-Logo.jpg", -1, -1)

Das "\" hatte gefehlt.

[An]Ion

Danke das war der "Fehler" der fehlte.

[An]Ion

Ist es möglich in einer MsgBox ein UpDown-Menü einzubauen?
Und wo finde ich die Control-ID für die GUICtrl.. Befehle?

**UEZ**

In eine MsgBox nicht, du müsstest die MsgBox als GUI nachbauen.

[An]Ion

Also statt Button-->MsgBox+Updown-Menü
lieber Button-->neue GUI+Updown-Menü.
Dazu müsste ich lediglich nocheinmal GUICreate eingeben in mein Script oder?
Wenn ich Werte aus dem UpDown-Menü speichern möchte, kan ich diese auch als Variabel angeben oder?
$save1 = Inputbox( "xxx", "xxx")
weil das mit der .ini habe ich noch nicht ganz verstanden.
Ist dieser noch erhalten nach dem schließen des Scripts und erneutem Aufrufen?

**Raupi**

Zitat von [An]Ion

Und wo finde ich die Control-ID für die GUICtrl.. Befehle?

Das ist der Wert der bei GUICtrlCreate... zurückgegeben wird.
Beispiel:

AutoIt

$Button = GUICtrlCreateButton("B1", 10, 100, 100, 20)

$Button enthällt die ControlID

Zitat von [An]Ion

Also statt Button-->MsgBox+Updown-Menü
lieber Button-->neue GUI+Updown-Menü.
Dazu müsste ich lediglich nocheinmal GUICreate eingeben in mein Script oder?
Wenn ich Werte aus dem UpDown-Menü speichern möchte, kan ich diese auch als Variabel angeben oder?
$save1 = Inputbox( "xxx", "xxx")

Keine Ahnung was du damit meinst.
Was willst du eigentlich genau machen mit einem UP-/Down Control und das ganze in einer MessageBox?
Was soll da ausgewählt werden?

Zitat von [An]Ion

Ist dieser noch erhalten nach dem schließen des Scripts und erneutem Aufrufen?

Wenn du Werte dauerhaft speichern willst, must du diese in eine INI schreiben und später wieder lesen.

[An]Ion

Eine bekannte hat mich gebeten für ihren kleinen Sohn ein Spiel zu Programmieren.
Doch schon von Anfang an dachte ich mir das, dass mit C++ ein ziemlicher Arbeitsaufwand wäre, hab ich mich kurzerhand für AutoIt entschieden, da sich GUI's leichter erstellen lassen.
Es sollte ein einfaches 2D Strategiespiel werden wo der Junge Freude dran hat. Seine Mutter hat mir das Konzept erklärt worum es darin gehen sollte.
Nur gestaltet sich AutoIt im Gegensatz zu C++ als ziemlich Unterschiedlich.
Idee war eigentlich mit einer geöffneten MsgBox und einem UpDown-Menü, die Anzahl der Soldaten/oder der Auszubildenden Soldaten auszuwählen, diesen Wert Speichern und später irgendwo anzeigen zu lassen.
Also ein 0815-prinzip von Strategiespielen.
Und mit .ini's habe ich bisher noch nicht gearbeitet, und auch in der Hilfe zu AutoIt steht mir manchmal noch ein Fragezeichen über dem Kopf.
Ich weiß ein spiel zu Programmieren, obwohl man noch nicht einmal die Materie richtig kennt ist ziemlich hoch gegriffen.
Und im Script hängt und hakt es immer wieder mal, aber ich bin optimistisch und such dann andere Wege.

**Raupi**

Eine MessageBox/ExtraGui in C++ zu erstellen ist gemessen an AutoIt eine Qual unter C++.
Ich bin nicht der C++ Freak, aber auch unter C++ kann man nicht so einfach eine MsgBox um ein Up-/Downcontrol erweiter, weil es ein Standarddialog ist.
Aber ohne Grundkenntnisse wirst du auch bei einer so kleinen Aufgabe (GUI mit Input , UP-/DownControl und 1-2 Buttons) in AutoIt scheitern.
Wenn ich dir jetzt solch eine GUI als Funktion vorwerfe, wirst du nichts lernen und beim nächsten noch so kleinen Vorhaben nachfragen.

Btw, wenn du C++ kannst, dann sollte dir soch ein Problem wie das Rausfinden der CtrlId eigentlich keine Probleme machen.
Jedes Beispiel in der Hilfe zu den GUICtrlSet... Befehlen benutzt die ControlID und man sollte schon wissen, wie Variablen zugeordnet werden.
Gemessen an allen anderen Programmiersprachen, ist die AutoIt Hilfe eine der besten überhaut.

PS: Wenn du willst werde ich dir eine Funktion schreiben um eine MsgBox ähnliche GUI zu verwalten, aber die GUI dazu musst du schon selber erstellen.
Dies ist ein Hilfeforum und kein mach mir mal eben Forum
Die Verwaltung der GUI werde ich dir programmieren, aber nur mit der entsprechenden Vorarbeit von dir.

[An]Ion

Das Script ist schon angefangen, GUI läuft einigermaßen
Bei C++ war es meine Aufgabe lediglich Batch-Dateien zu Schreiben die verschiedene Programme und Script's aus Bibliotheken ausführen sollten.
Mit C++ haben wir immer nur im cmd gearbeitet und die Funktionen wurden mit einfachen Befehlen wie z.B (1,Daten, Informationen,Bibliothek, ausführen, öffnen usw.) ausgeführt.
Beim jetzigen Script harkt es an ein paar ecken und enden. Hierbei habe ich schon etwas mehr zu tun als "gebe das ein um das zu bekommen". Möchte ungern mit Inputboxen arbeiten, sonst kriegt der Junge beim Spielen noch ein schreibrappel.
Es läuft meistens alles gut, nur mit dem Verknüpfen von Funktionen und Delokalisieren gibt es Probleme.
Theorie:
Auf Button klicken --> Fenster öffnet sich --> Anzahl der Soldaten etc. Auswählen per Updown-Menü/Inputbox --> Button drücken für ausführen (z.B Anzahl der Truppen ausbilden) --> zurück zum Spiel.
Praxis:
Script starten --> beide Fenster offen+Fenster lassen sich nicht mehr schließen(Außer über Task-Manager)
An solchen Sachen hapert es meistens.
Und ich möchte keines Wegs ein "mach mal für mich". Empfinde ich als sinnlos, dann kann ich ihm gleich Anno 1602-2205 kaufen oder einen Programmierer anheuern.
Sinn ist es auch mich weiter zu bilden und es macht ja auch Spaß zu Scripten und nach Fehlern zu suchen, aber irgendwann ist man festgefahren und braucht Hilfe.
Ich kann mal das erabeitete hier reinstellen, wird aber für entsetzen sorgen wie es aussieht.(hab da so meine eigene Ordnung)

**Raupi**

Dann zeig doch her, was du bis jetzt gemacht hast.

Da mit gerade langweiligwar, habe ich dir mal ein 5 Minuten Beispiel gebaut.

C

#include <GUIConstantsEx.au3>
#include <GuiMenu.au3>


$hGUI1 = GUICreate("xxx", 500, 500, 500, 250)
$Button = GUICtrlCreateButton("Ausbilden", 100, 20)
$Button2 = GUICtrlCreateButton("EXIT", 395, 465, 100, 30)
GUICtrlCreatePic(@ScriptDir & "Nawi-Logo.jpg", -1, -1)
GUISetState()
While 1
	$msg = GUIGetMsg()
	Select
		Case $msg = -3
			Exit
		Case $msg = $Button
			MsgBox(0, "Soldatenanzahl zur Ausbildung", _Auswahl("Soldatenausbildung", "Anzahl der Soldaten "))
		Case $msg = $Button2
			Exit
	EndSelect
WEnd










Func _Auswahl($Titel, $Labeltext = "")
	Local $Return = ""
	Local $opt = Opt("GUIOnEventMode", 0) ; Hier wird der Zustand vom OnEventMode gespeichert und dieser ausgeschaltet
	Local $hGUI = GUICreate($Titel, 300, 100, -1, -1, Default, Default)
	Local $hLabel = GUICtrlCreateLabel($Labeltext, 10, 10, 190, 17)
	Local $hInput = GUICtrlCreateInput("", 10, 30, 50, 17)
	Local $hUpDown = GUICtrlCreateUpdown($hInput)
	Local $hOK = GUICtrlCreateButton("OK", 60, 60, 50, 21)
	Local $hCancel = GUICtrlCreateButton("Abbrechen", 120, 60, 70, 21)
	GUISetState()
	#Region - GUI SwitchLoop
	While True
		Switch GUIGetMsg()
			Case $GUI_EVENT_CLOSE, $hCancel
				GUIDelete($hGUI)
				ExitLoop
			Case $hOK
				$Return = GUICtrlRead($hInput)
				GUIDelete($hGUI)
				ExitLoop
		EndSwitch
	WEnd
	Opt("GUIOnEventMode", $opt)
	Return $Return
EndFunc   ;==>_Auswahl

Alles anzeigen

[An]Ion

Anscheinend habe ich mit dem Versuch einer 2 GUI das ganze Script zerschossen.

AutoIt

#Include <GuiComboBox.au3>
#include <GuiMenu.au3>




$gui1 = GUICreate("xxx", 600, 600, 500, 200)
$Button1 = GUICtrlCreateButton("Deine Armee", 495, 5, 100, 30)
$Button2 = GUICtrlCreateButton("Deine Ressourcen", 495, 35, 100, 30)
$Button3 = GUICtrlCreateButton("Lager", 495, 65, 100, 30)
$Buttonx = GUICtrlCreateButton("EXIT", 495, 565, 100, 30)
GUICtrlCreatePic(@ScriptDir & "\Logo 1.jpg", 1, 1, 300, 80)
GUICtrlCreatePic(@ScriptDir & "\Wiese 1.jpg", 2, 180, 400, 400)
$bauten = GUICtrlCreateCombo("Burg", 390, 5, 100, 30, $CBS_DROPDOWNLIST)
GUICtrlSetData(-1, "Kaserne")
Opt("GUIOnEventMode", 1)
$gui2 = GUICreate( "Kaserne", 200, 200, 400, 100)
GUISetOnEvent( -1, "_show1")
GUISetState(@SW_SHOW, $gui2)
GUISetState(@SW_SHOW, $gui1)
while 1
	$msg = GUIGetMsg()
	Select
		case $msg = -3
			Exit
		        case $msg = $Button1
			MsgBox(0, "Deine Armee", "Deine Armee besteht aus" &@CRLF & "" &@CRLF & "Lanzenknechte:" &@CRLF & "Schwertkämpfer:" &@CRLF & "Bogenschütze:" &@CRLF & "Ritter:" &@CRLF & "Späher:")
			;-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------;
		case $msg = $Button2
			MsgBox(0, "Ressourcen", "Deine Ressourcen" &@CRLF & ""  & @CRLF & "Nahrung:" & @CRLF & "Holz:" & @CRLF & "Stein:" & @CRLF & "Eisen:" & @CRLF & "Gold:")
			;------------------------------------------------------------------------------------------------------------------------------------------------------;
			case $msg = $Button3
			MsgBox(0, "Lager", "In deinem Lager befinden sich folgende Gegenstände" &@CRLF & ""  & @CRLF & "Lanze):" & @CRLF & "Schwert:" & @CRLF & "Bogen:" & @CRLF & "Rüstung:" & @CRLF & "Pferd:" & @CRLF & "Schild:")
			;-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------;
					case $msg = $Buttonx
			Exit
			;---;
		 $selected = GUICtrlRead($bauten)
		 Switch $selected
		 case "Burg"
			MsgBox(0, "Burg", "Burg")
		 EndSwitch


Func _show1()
   $gui2 = GUISetState(@SW_HIDE, $gui2)
   EndFunc




	  	EndSelect
 WEnd

Alles anzeigen

**Raupi**

Schau dir mein Script an, da siehst du wie das mit der 2. GUI funktionieren könnte.
Hab noch ein Paar Kommentare eingebaut

AutoIt

#include <GUIConstantsEx.au3>


$hGUI1 = GUICreate("xxx", 500, 500, 500, 250)
$Button = GUICtrlCreateButton("Ausbilden", 100, 20)
$Button2 = GUICtrlCreateButton("EXIT", 395, 465, 100, 30)
GUICtrlCreatePic(@ScriptDir & "Nawi-Logo.jpg", -1, -1)
GUISetState()
While 1
	$msg = GUIGetMsg()
	Select
		Case $msg = -3
			Exit
		Case $msg = $Button
			Local $iAnz = _Auswahl("Soldatenausbildung", "Anzahl der Soldaten "); Auswahlfunktion aufrufen (1.Parameter Fenstertitel, 2.Parameter Labeltext) und Rückgabewert in $iAnz speichern
			If $iAnz <> 0 Then MsgBox(0, "Soldatenanzahl zur Ausbildung", $iAnz); Wenn $iAnz nicht 0 oder "" ist, dann Messagebox anzeigen
		Case $msg = $Button2
			Exit
	EndSelect
WEnd










Func _Auswahl($Titel, $Labeltext = "")
	Local $Return = ""
	Local $opt = Opt("GUIOnEventMode", 0) ; Hier wird der Zustand vom OnEventMode gespeichert und dieser ausgeschaltet. Es wird der MessageLoop Modus verwendet und die Messages innerhalb der Funktion abgearbeitet
	Local $hGUI = GUICreate($Titel, 300, 100, -1, -1, Default, Default)
	Local $hLabel = GUICtrlCreateLabel($Labeltext, 10, 10, 190, 17)
	Local $hInput = GUICtrlCreateInput("", 10, 30, 50, 17)
	Local $hUpDown = GUICtrlCreateUpdown($hInput)
	Local $hOK = GUICtrlCreateButton("OK", 60, 60, 50, 21)
	Local $hCancel = GUICtrlCreateButton("Abbrechen", 120, 60, 70, 21)
	GUISetState()
	#Region - GUI SwitchLoop
	While True
		$msg = GUIGetMsg(1); Eweiterte Messageabfrage (Hilfe dazu lesen)
		If $msg[1] = $hGUI Then ; Message ist von der Auswahlgui
			Switch $msg[0]; Switch IventID oder ControlID
				Case $GUI_EVENT_CLOSE, $hCancel
					GUIDelete($hGUI); GUI löschen
					ExitLoop ; Aus der While Wend Schleife springen
				Case $hOK
					$Return = GUICtrlRead($hInput); Wert des Input speichern
					GUIDelete($hGUI); GUI löschen
					ExitLoop ; Aus der While Wend Schleife springen
			EndSwitch
		EndIf
	WEnd
	Opt("GUIOnEventMode", $opt) ; Alten Zustand des OnEventMode wieder herstellen
	Return $Return; Hier wird die Funktion verlassen mit der Rückgabe der Variable $Return
EndFunc   ;==>_Auswahl

Alles anzeigen

Vorteil bei dem Beispiel ist, die 2. GUI existiert nur wenn die Funktion aufgerufen wurde.

Dein letztes Script ist total verhunzt.
Du wechselst zu OnEnetMode d.H. die Message Loop wird niemals mehr aufgerufen.
Die 2. GUI hat keine Elemente.
Die Funktion _show1 ist voll für den A...., was du damit bezwecken willst geht mir nicht in den Kopf.
Davon angesehen estellst du die Funktion in deiner Hauptschleife und beendest die Funktion nicht (EndFunc)
Funktionen gehören nicht in die Schleife sondern z.B. an das Scriptende

[An]Ion

Danke das Script hilft weiter, auch wenn ich bei manchen Sachen noch überlege.
Und genau das meinte ich das ich bei diesem Script immer von Schema C++ ausgehe und es genau so aussieht wie bei einer .bat.
Und gegeen Ende habe ich den Überblick verloren und die ganzen Funktionen nicht mehr weitergearbeitet oder vollendet.

**Raupi**

Schau dir im Portal mal die Box wichtige Links an, speziell der 1. und 2. Link.
Erstmal Grundlagen pauken
Wenn du Fragen zu meinem Scriptbeispiel hast, frag einfach.

[An]Ion

Kann bei dem Script auch der Button durch einen Wert aus einem UpDown-Menü ersetzt werden.
Ich hab eine Variabel, anstat vor enem Button, vor den Wert aus der ComboBox gepackt.
Doch Reagieren will er nicht. Und wenn ich die Variabel vor den GUICtrlCreateCombo-Befehl setze spring schnell eine neue GUI auf aber beide GUI's schließen sich daraufhin, bei allen.

**Raupi**

Zitat von [An]Ion

Kann bei dem Script auch der Button durch einen Wert aus einem UpDown-Menü ersetzt werden.

Welcher Button? Beschreib mal genauer.

Zitat von [An]Ion

Ich hab eine Variabel, anstat vor enem Button, vor den Wert aus der ComboBox gepackt.

Hä? Was? Sprechen wir die selbe Sprache? Ich versteh kein Wort was du vorhast.

Zitat von [An]Ion

Doch Reagieren will er nicht. Und wenn ich die Variabel vor den GUICtrlCreateCombo-Befehl setze spring schnell eine neue GUI auf aber beide GUI's schließen sich daraufhin, bei allen.

Das selbe wie vorher. Was? Wo?

Ich kenne zwar HarryPotter, aber ich kann nicht hellsehen. Wo ist dein Script? Wo genau in diesem Script soll was passieren?

[An]Ion

In deine Script war es der Button "Ausbilden", bei mir habe ich versucht den Button durch einen Wert aus dem UpDown-Menü zu ersetzen.

Bei dir im Script war es die Variabel $Button vor GUICtrlCreateButton
Ich habe versucht die Variabel umzukehren mit $Kas vor GUICtrlSetData

AutoIt

#include <GuiMenu.au3>
#Include <GuiComboBox.au3>


GUICreate("xxx", 600, 600, 500, 200)
$Button1 = GUICtrlCreateButton("Deine Armee", 495, 5, 100, 30)
$Button2 = GUICtrlCreateButton("Deine Ressourcen", 495, 35, 100, 30)
$Button3 = GUICtrlCreateButton("Lager", 495, 65, 100, 30)
$Buttonx = GUICtrlCreateButton("EXIT", 495, 565, 100, 30)
GUICtrlCreatePic(@ScriptDir & "\Logo 1.jpg", 1, 1, 300, 80)
GUICtrlCreatePic(@ScriptDir & "\Wiese 1.jpg", 2, 180, 400, 400)
GUICtrlSetImage(GUICtrlCreatePic, "\Nawi-Logo2.jpg")
GUICtrlCreateCombo( "Burg", 390, 5, 100, 20, $CBS_DROPDOWNLIST)
GUICtrlSetData(-1, "Felder")
GUICtrlSetData(-1, "Mühle")
GUICtrlSetData(-1, "Wohnhsiedlung")
$Kas = GUICtrlSetData(-1, "Kaserne")
GUICtrlSetData(-1, "Bogenschießanlage")
GUICtrlSetData(-1, "Reitstall")
GUICtrlSetData(-1, "Wachtürme")
GUICtrlSetData(-1, "Mauer")
GUICtrlSetData(-1, "Graben")


GUISetState()


; alle $xxx
$sfti2 = "a"
$sfte2 = "b"
;---------------------------------;
; $xxx fuer "Deine Armee" Anzeige
$sDA = "Deine Armee"
$sDAba = "Deine Armee besteht aus"
$sLk = "Lanzenknechten:"
$sSk = "Schwertkämpfern:"
$sBs = "Bogenschützen:"
$sR = "Ritter:"
$sS = "Späher:"
;---------------------------------;
; $xxx fuer "Deine Ressourcen" Anzeige
$sRes = "Ressourcen"
$sDres = "Deine Ressourcen"
$sNah = "Nahrung:"
$sHo = "Holz:"
$sSt = "Stein:"
$sFe = "Eisen:"
$sAu = "Gold:"
;--------------------------;
; $xxx fuer "Lager" Anzeige
$sLa = "Lager"
$sIdLbsfG = "In deinem Lager befinden sich folgende Gegenstände"
$sLanz = "Lanze:"
$sSchw = "Schwert:"
$sBo = "Bogen:"
$sRu = "Rüstung:"
$sPf = "Pferd:"
$sSchi = "Schild:"
;----------------------------------------------------------------;
while 1
	$msg = GUIGetMsg()
	Select
		case $msg = -3
			Exit
		        case $msg = $Button1
			MsgBox(0, $sDA, $sDAba  &@CRLF & "" &@CRLF & $sLk &@CRLF & $sSk &@CRLF & $sBs &@CRLF & $sR &@CRLF & $sS)
			;-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------;
		case $msg = $Button2
			MsgBox(0, $sRes, $sDres &@CRLF & ""  & @CRLF & $sNah & @CRLF & $sHo & @CRLF & $sSt & @CRLF & $sFe & @CRLF & $sAu)
			;------------------------------------------------------------------------------------------------------------------------------------------------------;
			case $msg = $Button3
			MsgBox(0, $sLa, $sIdLbsfG &@CRLF & ""  & @CRLF & $sLanz & @CRLF & $sSchw & @CRLF & $sBo & @CRLF & $sRu & @CRLF & $sPf & @CRLF & $sSchi)
			;-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------;
			$Pic1 = GUICtrlCreatePic("C:\Users\Saschas\Desktop\1\Nawi-Logo2.jpg", 2, 180, 400, 400)
		 case $msg = $Buttonx
			Exit
		    ;---;
	EndSelect
 WEnd
;----;
While 1
   Select
   	 Case $msg = $Kas
			$iauskas = _AusbildungKaserne("Soldatenausbildung", "Anzahl der Soldaten")
			If $iauskas > 1 Then MsgBox(0, "Soldatenanzahl zur Ausbildung", $iauskas)
			   EndSelect
			WEnd
;---------------;
Func _AusbildungKaserne($sfti2, $sfte2 = "")
   $Return = ""
   ;------------------------------;
   $opt = Opt("GUIOnEventMode", 0) ;Hpt-GUI wird hier angehalten
   ;------------------------------;
   $gui2 = GUICreate( $sfti2, 300, 300, 250, 100)
   ;hier kommt ein Label
   $input1 = GUICtrlCreateInput("", 10, 30, 50, 17)
   $updown2 = GUICtrlCreateUpdown($input1)
   $ausb = GUICtrlCreateButton( "Ausbilden" , 100, 100, 20, 20)
   $abbr = GUICtrlCreateButton( "Abbrechen" , 200, 200, 20, 20)
  GUISetState()
  ;-----------;
  While 1
	 $mdg = GUIGetMsg(1)
	 If $msg[1] = $gui2 Then
		Switch $msg[0]
		 Case $GUI_EVENT_CLOSE, $abbr
		 GUIDelete($gui2)
		 ExitLoop
		 ;------;
	  Case $ausb
		$Return = GUICtrlRead( $input1) ;speichert den Wert im Eingabefenster
		 GUIDelete($gui2)
		 ExitLoop
	  EndSwitch
   EndIf
   WEnd
   Opt("GUIOnEventMode", $opt)
   Return $Return
EndFunc

Alles anzeigen

**Raupi**

Also nochmal:
Auf welchem Button soll die Anzahl angezeigt werden? (Varname)
Wann soll dieser Wert angezeigt werden? (Nach welcher Aktion?)
Was willst du mit der Zuweisung $Kas = GUICtrlSetData(-1, "Kaserne") erreichen?
Diese Zuweisung ist Bullshit. Die Rückgabe ist immer 0 bei Misserfolg,1 bei Erfolg oder -1 bei fehlerhaften Daten ,jenachdem was GUICtrlSetData zurückgibt.
Nicht einfach irgendwas zusammentippen, sondern die Hilfe mal genauer lesen.

Btw, dieser Codeblock wird niemals zur ausgeführt:

AutoIt

While 1
   Select
   	 Case $msg = $Kas
			$iauskas = _AusbildungKaserne("Soldatenausbildung", "Anzahl der Soldaten")
			If $iauskas > 1 Then MsgBox(0, "Soldatenanzahl zur Ausbildung", $iauskas)
			   EndSelect
			WEnd
;---------------;

Der Code Steht nach deiner Hautschleife und diese verlässt du durch Exit, was dein Script beendet.
Zum Glück wird diese Schleife nicht ausgefüht weil $Kas den Wert 1 hat und gleichzusetzen mit $Button1 ist.
Controlids werden fortlaufend nummeriert und 1 entspricht dem 1. Control welches du erstellt hast.

[An]Ion

Ich glaub ich muss mich erstmals entschuldigen.
Ich habe mich gestern Abend und heute Morgen hingesetzt und habe nochmal durch alle meine Bücher durchgelesen und festgestellt das sich C++ Erfahrungen mit den erstellen von Scripten in AutoIt doch sehr beißt.
Ich dachte mit AutoIt müsste ich eine Handvoll neue Befehle etc lernen, da ich ja aus C++ soviel "hätte" übernehmen können.
Aber anscheinend sind es doch ein paar mehr Befehle die mir noch Fremd sind und die Verknüpfung von Funktionen gestaltet sich in AutoIt auch ganz anders als in C++.
Ich werde mir mal ein paar Scripte anschauen und versuchen sie selber per Wiki und der Hilfe auseinander zu nehmen und die Verknüpfungen der Funktionen so besser verstehen zu können.