Halle,
ich habe ein Problem mit meinem Menü
eine Tastenmatrix erfasst meine Eingabe mit 4 Tasten
Hoch Links Rechts Runter
mein Menü hat 9 Punkte und der aktive Eintrag soll durchgeschoben
werden
Richtung Runter..1click...2click
Menüpunkt1 Menüpunkt1 Menüpunkt1
Menüpunkt2 Menüpunkt2 Menüpunkt2
Menüpnukt3 Menüpnukt3 Menüpnukt3
Menüpunkt4 Menüpunkt4 Menüpunkt4
Menüpunkt5 Menüpunkt5 Menüpunkt5
usw.
für die "positiver" Richtung nach unten funktioniert es nur in Richtung von unten nach oben -> Taste Hoch klappt es nicht
also wechsel von menüpunkt 5 nach menüpunkt 4
->neuer Menüpunkt ist 4 ->wechsel farbe blau =aktives Menü
->alter Menpunkt war 5 ->wechsel farbe grau
->neuer Tastendruck "hoch
->neuer Menüpunkt ist 3 ->wechsel farbe von grau nach blau =aktiv
->alter Menüpunkt ist 4 ->wechsel farbe von blau nach grau = inaktiv
usw.
der Tastendruck wird in einer "Schleife" ausgewertet
Incr A
If A = 10 Then
A = 1
End If
If A = 1 Then
Ly1_temp = Val(ly1posi_list(9) )
Else
Ly1_temp = Val(ly1posi_list(a - 1))
End If
Print #2 , "ly1_temp....... " ; Ly1_temp
Print #2 , "key_taste A............. " ; A
Call Lcd_print(temp , Lx1_temp , Ly1_temp , 2 , 1 , 1 , White , Dark_red) 'oldstate aktualisieren
Waitms Icon_waiting
If Menu_tempe = True Then
Temp = Tempmnu_list(a) 'Temperaturmenü aufrufen
Ly1_pos = Val(ly1posi_list(1))
Else
Temp = Menu_select_list(a) 'oder Hauptmenü aufrufen
End If
If A = 10 Then 'überlauf Tastenschleife
Ly1_pos = Val(ly1posi_list(1)) 'Menü Punkt 1 überschreiben
Else
Ly1_pos = Val(ly1posi_list(a)) 'neuen Meüpunkt überscreiben
End If
Print #2 , "key_taste A............................. " ; A
Print #2 , "ly1_temp................................. " ; Ly1_temp
Print #2 , "Ly1_pos.................................. " ; Ly1_pos
Call Lcd_print(temp , Lx1_temp , Ly1_pos , 2 , 1 , 1 , Blue , Dark_red) 'neuer Menüeintrag
Die Menüpukte und die Y-Position sind in einer Tabelle abgelegt
Mein Problem ist das ich es nicht hinbekomme das beim "durchschieben" des Menüeintrages von unten nach oben ( Taste Hoch) den letzen Menüeintrag
vor dem call Lcd_print Befehl mit dem "alten"Wert aus der Tabelle zu beschrieben
temp =aktueller Wert -1???? wie kann ich aus einer Tabelle
die Werte vor einem "aktuellen Wert" auslesen
bei mir ist temp= Menu_select_list (a) wobei a die schleife (1bis 9) ist
wie bekomme ich es hin das ich an den Wert des letzen aktiven Menüpunktes
rankomme ....
sry ich bin Anfäger ich bin über jeden auch völlig neuen Lösungsansatz dankbar.
ich habe schon ein statemenü probiert läuft auch im Terminal. Aber mein
display (2.1 "tft Diplay3000)hat mit statemenüs timingprobleme die ich nicht hinbekomme
ich hoffe irgend jemand kann mit meiner Problembeschreibung etwas anfangen
MfG Torsten
ich habe ein Problem mit meinem Menü
eine Tastenmatrix erfasst meine Eingabe mit 4 Tasten
Hoch Links Rechts Runter
mein Menü hat 9 Punkte und der aktive Eintrag soll durchgeschoben
werden
Richtung Runter..1click...2click
Menüpunkt1 Menüpunkt1 Menüpunkt1
Menüpunkt2 Menüpunkt2 Menüpunkt2
Menüpnukt3 Menüpnukt3 Menüpnukt3
Menüpunkt4 Menüpunkt4 Menüpunkt4
Menüpunkt5 Menüpunkt5 Menüpunkt5
usw.
für die "positiver" Richtung nach unten funktioniert es nur in Richtung von unten nach oben -> Taste Hoch klappt es nicht
also wechsel von menüpunkt 5 nach menüpunkt 4
->neuer Menüpunkt ist 4 ->wechsel farbe blau =aktives Menü
->alter Menpunkt war 5 ->wechsel farbe grau
->neuer Tastendruck "hoch
->neuer Menüpunkt ist 3 ->wechsel farbe von grau nach blau =aktiv
->alter Menüpunkt ist 4 ->wechsel farbe von blau nach grau = inaktiv
usw.
der Tastendruck wird in einer "Schleife" ausgewertet
Incr A
If A = 10 Then
A = 1
End If
If A = 1 Then
Ly1_temp = Val(ly1posi_list(9) )
Else
Ly1_temp = Val(ly1posi_list(a - 1))
End If
Print #2 , "ly1_temp....... " ; Ly1_temp
Print #2 , "key_taste A............. " ; A
Call Lcd_print(temp , Lx1_temp , Ly1_temp , 2 , 1 , 1 , White , Dark_red) 'oldstate aktualisieren
Waitms Icon_waiting
If Menu_tempe = True Then
Temp = Tempmnu_list(a) 'Temperaturmenü aufrufen
Ly1_pos = Val(ly1posi_list(1))
Else
Temp = Menu_select_list(a) 'oder Hauptmenü aufrufen
End If
If A = 10 Then 'überlauf Tastenschleife
Ly1_pos = Val(ly1posi_list(1)) 'Menü Punkt 1 überschreiben
Else
Ly1_pos = Val(ly1posi_list(a)) 'neuen Meüpunkt überscreiben
End If
Print #2 , "key_taste A............................. " ; A
Print #2 , "ly1_temp................................. " ; Ly1_temp
Print #2 , "Ly1_pos.................................. " ; Ly1_pos
Call Lcd_print(temp , Lx1_temp , Ly1_pos , 2 , 1 , 1 , Blue , Dark_red) 'neuer Menüeintrag
Die Menüpukte und die Y-Position sind in einer Tabelle abgelegt
Mein Problem ist das ich es nicht hinbekomme das beim "durchschieben" des Menüeintrages von unten nach oben ( Taste Hoch) den letzen Menüeintrag
vor dem call Lcd_print Befehl mit dem "alten"Wert aus der Tabelle zu beschrieben
temp =aktueller Wert -1???? wie kann ich aus einer Tabelle
die Werte vor einem "aktuellen Wert" auslesen
bei mir ist temp= Menu_select_list (a) wobei a die schleife (1bis 9) ist
wie bekomme ich es hin das ich an den Wert des letzen aktiven Menüpunktes
rankomme ....
sry ich bin Anfäger ich bin über jeden auch völlig neuen Lösungsansatz dankbar.
ich habe schon ein statemenü probiert läuft auch im Terminal. Aber mein
display (2.1 "tft Diplay3000)hat mit statemenüs timingprobleme die ich nicht hinbekomme
ich hoffe irgend jemand kann mit meiner Problembeschreibung etwas anfangen
MfG Torsten