Ich möchte bitte die jeweiligen Trackbarergebnisse nur ausgeben wenn die jeweilige Trackbar verstellt wurde.
Wie kann man die beiden bitte durch Case irgendwie trennen ?
Es werden immer beide Ergebnisse gesendet wenn eine Trackbar bedient wurde.
Code: Alles auswählen
Select EventID
Case #PB_Event_CloseWindow
Quit = 1
Case #PB_Event_Gadget
tro = GetGadgetState(#track_tro)/10
If status=1
SendNetworkString(conID, "trottle,"+StrF(tro,1))
EndIf
hea = GetGadgetState(#track_hea)
If status=1
SendNetworkString(conID, "heading,"+StrF(hea,1))
EndIf
Select EventGadget()
Case #b_ende
Quit = 1
Case #b_connect
If Not status
conID = OpenNetworkConnection("127.0.0.1", Port,#PB_Network_TCP,2000)
If conID
status = 1
SetGadgetText(#str_netzwerk,"Connected" + #CR$)
EndIf
EndIf
Case #b_disconnect
If status <> 0
CloseNetworkConnection(conID)
status = 0
SetGadgetText(#str_netzwerk,"Connection closed" + #CR$)
EndIf
Case #b_stage
If status=1
SendNetworkString(conID, "stage,0")
EndIf
Case #b_cls
text_e=""
SetGadgetText(#edit, text_e)
Case #b_edit
If status=1
anzahl = CountGadgetItems(#edit)
For wert =0 To anzahl
text_e=GetGadgetItemText(#edit,wert)
SendNetworkString(conID,text_e)
Delay(100)
Next
EndIf
EndSelect
EndSelect
Gruss