XProfan

Français

Erasmus.Herold

Hallo Leute.

Folgender Code ist innerhalb einer Schleife im Einsatz.

ElseIf Clicked(button_einzelteilverfolgung%)

ausgewaehlte_position& = GetCurSel(listbox_epcs&)

if (ausgewaehlte_position& < 0)

    @Messagebox("Es wurde keine Position aus der Liste gewählt !!!"+@chr$(13)+@chr$(13)+"Eine Einzelteilverfolgung ist so nicht möglich.", "Sicherheitshinweis",288)

else

    'XML_speichern

endif

endif

Wird nun der Button "button_einzelteilverfolgung" geklickt, kommt ein Hinweis, wenn aus der Listbox "listbox_epcs" keine Position ausgewählt wurde. Das ist so okay.
Aber nach einem Klick auf "okay" kommt das Hinweisfenster erneut und erneut und ...
Wie kann ich dem Button sagen: bleib ruhig und melde dich erst wieder, wenn ich wirklich draufklicke (wie gesagt, dieser Code-Auszug läuft durch eine Schleife / waitinput geht nicht, weil ich beizu Daten auslese)

Viel Text, hoffentlich verständlich.
Gruß und Dank
Erasmus

27.06.2019 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

H.Brill

quoi pour une Wait-Befehl utilise du car dans deiner Boucle ?
cela Klick-Event doit oui irgendwie verarbeitet volonté.

si du GetMessage verwendest, wird wohl cela Clicked()
pas zurück gesetzt. c'est seulement chez den Wait-Befehlen so.

tu peux dir mais behelfen, si du statt Clicked simple
GetFocus prends.

Kompilieren Marque Séparation

Déclarer Handle btn1, btn2, liste, Long ende
ende = 0
Fenêtre 600,400
btn1 = Créer("Button", %HWnd, "Test", 10, 10, 60, 25)
btn2 = Créer("Button", %HWnd, "Ende", 10, 50, 60, 25)
Set("Fastmode", 1)

WhileNot ende

    GetMessage

    Si GetFocus(btn1)

        MessageBox(», "Info", 0)

    ElseIf GetFocus(btn2)

        ende = 1

    EndIf

Endwhile

PS: um données auszulesen könntest du aussi une Minuteur benutzen.
là funktioniert so ab 200 Millisekunden aussi WaitInput normal.

Benutze XPROFAN X3 + FREEPROFAN
Wir sind die XProfaner.
Sie werden von uns assimiliert.
Widerstand ist zwecklos!
Wir werden alle ihre Funktionen und Algorithmen den unseren hinzufügen.

Was die Borg können, können wir schon lange.

27.06.2019 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Erasmus.Herold

GetFocus, anstatt Clicked - perfekt.

Macht genau, was es soll