Seite 1 von 1
Event-Steuerung
Verfasst: 31.12.2020 16:57
von BueNo
Moin,
bei mir taucht immer wieder ein Problem mit der Event-Steuerung auf. Wenn ich auch ein Event reagiert habe und dann einige Zeit kein anderes Ereignis auslöse, wiederholt das Programm manchmal den letzten Event. Es ist fast so, als würde nach Abarbeitung der Event nicht zurückgesetzt, sondern laufe nach einige Zeit wieder durch die Schleife. Den Event zurücksetzen oder so kann ich nicht. Ich habe dann versucht, den Focus einfach auf ein anderes Objekt zu setzen, um die Reaktion zu verhindern. Wenn ich dann aber das alte Objekt wieder anklicke, kann es sein, dass die Wiederholung auftritt.
Kann ich das irgendwie abstellen?
Beste Grüße und guten Rutsch!
BüNo
Thema verschoben von Ankündigungen --A.
Re: Event-Steuerung
Verfasst: 31.12.2020 17:16
von Benubi
Da müsstest Du vielleicht schon schreiben um welche art von event es sich handelt.
Wenn Du ein network data event hast, dann bleibt es so lange in der Schleife bis du es dann ausgelesen hast.
Re: Event-Steuerung
Verfasst: 31.12.2020 17:31
von ccode_new
Re: Event-Steuerung
Verfasst: 31.12.2020 19:43
von ccode_new
@BueNo
Ein Codebeispiel?
Außerdem darfst du auch in einer anderen Sprache als dein leider recht unverständliches Deutsch antworten.
You can also answer in another language.
Re: Event-Steuerung
Verfasst: 01.01.2021 11:29
von BueNo
Moin,
es handelt sich um Image-Events, mit denen der Benutzer bestimmt Funktionen auslöst.
Re: Event-Steuerung
Verfasst: 01.01.2021 12:29
von mk-soft
So können wir nichts sagen (Glaskugel)
Wie sieht den dein Event-Management aus. Hier wird auch viel am Anfang falsch gemacht.
CODE???
Re: Event-Steuerung
Verfasst: 01.01.2021 17:46
von BueNo
`tschuldigung, wenn's zu wenig war.
Hier ein Auszug aus dem S-Code. Leider sind bei Copy & Paste die Einrückungen flöten gegangen. Die einzelnen Bedingungschleifen sind aber jeweils geschlsossen.
Code: Alles auswählen
Case #PB_Event_Gadget
Select EventGadget()
; ##########
Case W01_Image_0 ; Programm beenden
End
; ##########
Case W01_Image_1 ; Job speichern
Proc_DSspeichern()
; ##########
Case W01_Image_2 ; Job löschen
If GetGadgetState(W01_Listview_0) > -1 ; Datei ausgewählt
ia = MessageRequester("Achtung", "Wollen Sie den Job wirklich löschen ?",#PB_MessageRequester_YesNo)
If ia = 6 ; ja
ia = DeleteFile(".\Jobs\" + GetGadgetText(W01_Listview_0))
Debug ".\Jobs\" + GetGadgetText(W01_Listview_0)
If ia <> 0 ; Lösung erfolgreich
RemoveGadgetItem(W01_Listview_0, GetGadgetState(W01_Listview_0))
Else
MessageRequester("Fehler", "Die Datei konnten icht gelöscht werden.",#PB_MessageRequester_Error)
EndIf
EndIf
EndIf
SetActiveGadget(W01_Puffer)
.............................
EndSelect
Delay(10)
Until event = 1
Re: Event-Steuerung
Verfasst: 01.01.2021 17:57
von NicTheQuick
BueNo hat geschrieben:Leider sind bei Copy & Paste die Einrückungen flöten gegangen.
Dafür gibt es die
Re: Event-Steuerung
Verfasst: 01.01.2021 19:56
von mk-soft
Du must auch den EventType fragen ...
Code: Alles auswählen
...
Case W01_Image_0
Select EventType()
Case #PB_EventType_LeftClick
End
EndSelect
...
etc ...
Re: Event-Steuerung
Verfasst: 02.01.2021 10:46
von BueNo
Besten Dank für den Tipp
