Event auslösen

Anfängerfragen zum Programmieren mit PureBasic.
Benutzeravatar
Karl
Beiträge: 520
Registriert: 21.07.2005 13:57
Wohnort: zu Hause

Event auslösen

Beitrag von Karl »

Ich habe für eine editierbare Combobox eine Aktionsfolge geschrieben, die bei Änderung etwas macht (Datenfüllen nach Suchkriterium).

Event: #CBN_EDITCHANGE

Wenn ich mit SetGadgetText hantiere, dann wird diese Prozedur nicht ausgeführt. Wahrscheinlich muss ich eine Nachricht posten oder senden? Wie mache ich dies - wie spiele ich Windows eine manuelle Änderung vor?
(WinAPI ist noch recht neu für mich).

kleiner Codeausschnitt:

Code: Alles auswählen

         Select ET
            Case #CBN_EDITCHANGE
              Select Right(GetGadgetText(#Diagnosen),1)
                Case "%"
                  If Len(GetGadgetText(#Diagnosen)) > 1
                    Liste_fuellen()
                  EndIf
                Case " "
                  SetGadgetText(#Diagnosen, Left(GetGadgetText(#Diagnosen), Len(GetGadgetText(#Diagnosen)) - 1))
                  Liste_fuellen()
              EndSelect
          EndSelect

...

SetGadgetText(#Diagnosen, GetGadgetItemText(#SitListe, pos, 2)+ "%")
                SendMessage_(GadgetID(#Diagnosen), #CBN_EDITCHANGE, 0, 0)
Gruß Karl


OK, ich habe eine bessere Möglichkeit gefunden und betrachte die Sache vorerst als erledigt. Möge der Admin sein Eraser anstoßen.

EOF
The Kopyright Liberation Front also known as the justified ancients of Mumu!
PB 5.X