Inputbox doesnt show variable

[asdfmovie99e]

expandcollapse popup

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#NoTrayIcon


;EINMALIGE AKTIONEN AM ANFANG
DirCreate(".\tmp")
global $wirklich = 0
if not FileExists("./log.txt") then
FileWrite("./log.txt","@@Textlog Datei zur Judo Anzeige@@" & @CRLF & @CRLF & @CRLF & @CRLF)
EndIf

global $blauipponint = 1

main()
While 1




   ;HAUPTGUISWITCH
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
   Exitfunc()
Case $yukoblau
   yukoblau()
case $wazablau
   wazablau()
case $ipponblau
   ipponblau()
case $shidoblau
   shidoblau()
Case $yukoweiss
   yukoweiss()
case $wazaweiss
   wazaweiss()
case $ipponweiss
    ipponweiss()
case $shidoweiss
   shidoweiss()


case $dellog
dellog()

EndSwitch







;BEENDEN JA NEIN SWITCH
switch $wirklich
   case 6
   finalexit()
EndSwitch
WEnd



func main()


  global $maingui = GUICreate("Judo Anzeige Hauptfenster",800,600)
   GUICtrlCreateLabel("Blau/Rot",100,70)
   GUICtrlCreateLabel("Weiss",600,70)

;BLAU
global $yukoblau = GUICtrlCreateButton("Yuko",50,100,60,30)
GUICtrlCreateButton("Yuko zurück",140,100,90,30)
global $wazablau =GUICtrlCreateButton("Waza-ari",50,150,60,30)
   GUICtrlCreateButton("Waza-ari zurück",140,150,90,30)
global $ipponblau = GUICtrlCreateButton("Ippon",50,200,60,30)
   GUICtrlCreateButton("Ippon zurück",140,200,90,30)
global $shidoblau = GUICtrlCreateButton("Shido",50,250,60,30)
   GUICtrlCreateButton("Shido zurück",140,250,90,30)

;WEISS
  global $yukoweiss = GUICtrlCreateButton("Yuko",550,100,60,30)
   GUICtrlCreateButton("Yuko zurück",640,100,90,30)
  global $wazaweiss = GUICtrlCreateButton("Waza-ari",550,150,60,30)
  GUICtrlCreateButton("Waza-ari zurück",640,150,90,30)
 global $ipponweiss =  GUICtrlCreateButton("Ippon",550,200,60,30)
   GUICtrlCreateButton("Ippon zurück",640,200,90,30)
  global $shidoweiss = GUICtrlCreateButton("Shido",550,250,60,30)
   GUICtrlCreateButton("Shido zurück",640,250,90,30)


GUICtrlCreateButton("Anzeigeeinstellungen ändern",20,20)

GUICtrlCreateButton("Anzeige auf Hauptbildschirm an/aus",200,20)

global $dellog = GUICtrlCreateButton("Log löschen",420,20)


;ANZEIGE AUF DEM AUSWAHLFENSTER
GUICtrlCreateLabel("Ippon",113,480)
$blauipponint = GUICtrlCreateInput("", 100, 500, 50, 20, $ES_READONLY)






GUISetState(@SW_SHOW, $maingui)



EndFunc


Func Exitfunc()
global $wirklich = MsgBox(4,"Wirklich beenden?", "Wollen sie die Judo Turnier Anzeige wirklich beenden?")   ; Yes, No, Cancel
EndFunc


Func finalexit()
;anzeige schleissen dateien entfernen etc fehlt

Exit
EndFunc


Func dellog()
FileDelete("./log.txt")
FileWrite("./log.txt","@@Textlog Datei zur Judo Anzeige@@" & @CRLF & @CRLF & @CRLF & @CRLF)
EndFunc














;FUNKTIONEN ZU DEN WERTUNGEN IPPON WAZAARI YUKO SHIDO


;BLAU
Func yukoblau()
FileWrite("./log.txt","yukoblau" & @crlf)
FileWrite("./tmp/yukoblau.judo","")

endfunc

Func wazablau()
FileWrite("./log.txt","wazablau" & @crlf)
FileWrite("./tmp/wazablau.judo","")

endfunc

Func ipponblau()
FileWrite("./log.txt","ipponblau" & @crlf)
FileWrite("./tmp/ipponblau.judo","")

endfunc

Func shidoblau()
FileWrite("./log.txt","shidoblau" & @crlf)
FileWrite("./tmp/shidoblau.judo","")

endfunc

;WEISS

Func yukoweiss()
FileWrite("./log.txt","yukoweiss" & @crlf)
FileWrite("./tmp/yukoweiss.judo","")

endfunc

Func wazaweiss()
FileWrite("./log.txt","wazaweiss" & @crlf)
FileWrite("./tmp/wazaweiss.judo","")

endfunc

Func ipponweiss()
FileWrite("./log.txt","ipponweiss" & @crlf)
FileWrite("./tmp/ipponweiss.judo","")

endfunc

Func shidoweiss()
FileWrite("./log.txt","shidoweiss" & @crlf)
FileWrite("./tmp/shidoweiss.judo","")

endfunc

why does the input box in gui stay blank even if I defined $blauipponint as 1  in line 19?

[mikell]

$blauipponint is the ID of the input control
To display something inside it you must use GuiCtrlSetData

[AutoBert]

In Zeile 17 weist du $blauipponint 1 zu. In Zeile 105 weis du der gleichen Variable dann den Wert des erstellten Inputs zu.

[mikell]

Damn my mouse is messing around... yet I clicked on the English forum icon 

[Melba23]

AutoBert,

if you wish to post in the OP's mother tongue, please also add a n English translation next time as this is an English speaking forum.

Dank für Ihre Mitarbeit. (Thanks for your cooperation).

M23