Danke athos und sokobana
Das war der entscheidende Hinweis .
wie sokobana schon sagte . ![]()
Ich muss den Registry Eintrag vorher auslesen mit RegRead und in eine Variable schreiben in diesem Fall reg , diese Variable mit IF abfragen und fertig ist die Laube .
Wenn die Variable 0 war wird die Registry nicht geändert .
Edit: habe grad festgestellt das die Funktion Autom.Dimmen nur Nachts greift , auf Nachtansicht stellen reicht auch nicht ist wohl Uhrzeit abhängig , aber das ist eigentlich unabhängig von diese Registry Spielerei .
Die Registry-Geschichte ist für GoPal 5 passend .
Code
If( Question( "Soll die Klicksperre aktiv werden ? für deaktiv obenrechts Ecke klicken ! ", "NO = zurück ins Display !", "YesNo" )=1 )
reg = RegRead ("HKCU","Software\Elektrobit\streetdirector_hmi\DataPool", "2135556126")
If ( reg=1 )
RegWriteDWord ("HKCU","Software\Elektrobit\streetdirector_hmi\DataPool", "2135556126", "0")
EndIf
RunWait ("\My Flash Disk\Programme\koord465.exe", " Window=0 KoordServ=1 wndrefresh=5000 t=1 rb=0 gb=0 bb=0 Backlight=999 ServWnd=\time,0,0,-1,-1,5060,0,0,255,-1,-1{%02i:%02i h}\text,100,224,280,48,-5030,0,0,255,-1,-1{Klicksperre aktiv}\text,450,0,30,30,-5030,255,0,0,-1,0{x}|")
run ( "\My Flash Disk\programme\koord465.exe", "param= window=0 Backlight=999 " )
If ( reg=1 )
RegWriteDWord ("HKCU","Software\Elektrobit\streetdirector_hmi\DataPool", "2135556126", "1")
EndIf
EndIf
Alles anzeigen
Gruß Manni