XProfan

Español

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 Zitat

Absatzweise Cita Zeilenweise Cita

H.Brill

Was para una Wait-Befehl nutzt du porque en deiner Bucle ?
Das Clic-Event muß sí irgendwie verarbeitet voluntad.

Wenn du GetMessage verwendest, probablemente el Clicked()
no zurück gesetzt. Es sólo en el Wait-Befehlen así.

Usted puede dir aber behelfen, si du en lugar de Clicked simplemente
GetFocus nimmst.

Kompilieren Marca Separación

Declarar Handle btn1, btn2, liste, Largo ende
ende = 0
Ventana 600,400
btn1 = Crear("Button", %HWnd, "Test", 10, 10, 60, 25)
btn2 = Crear("Button", %HWnd, "Ende", 10, 50, 60, 25)
Conjunto("FastMode", 1)

Sinestar encargado ende

    GetMessage

    If GetFocus(btn1)

        MessageBox("", "Info", 0)

    ElseIf GetFocus(btn2)

        ende = 1

    EndIf

EndWhile

PS: en Daten auszulesen könntest du auch una Temporizador benutzen.
Como funktioniert así de 200 Millisekunden auch 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 Zitat

Absatzweise Cita Zeilenweise Cita

Erasmus.Herold

GetFocus, anstatt Clicked - perfekt.

Macht genau, was es soll