das verstehe ich jetzt nicht mehr. Ich möchte nach Auswahl einer combobox 2 SLE-Felder disable() bzw. enable().
aber springt nicht in die Prf-Function ????
Die Definition der combobox
Code: Alles auswählen
oCombo1 := XbpCombobox():new( oDlg, , aPos, {40,60}, { { XBP_PP_BGCLR, XBPSYSCLR_ENTRYFIELD } } )
oCombo1:type := XBPCOMBO_DROPDOWNLIST
oCombo1:tabStop := .T.
oCombo1:create()
oCombo1:addItem( "J" )
oCombo1:addItem( "N" )
oCombo1:setData(aFelder[1])
// Datenlink von Eingabefeld zu LOCAL Variable
oCombo1:XbpSLE:dataLink := {|x| IIf( x==NIL, aFelder[1], aFelder[1] := x ) }
bAction := {|mp1, mp2, obj| obj:XbpSLE:getData(),Prf(aFelder,oSle3,oSle4) }
// Codeblock für Auswahl durch Up und Down Taste
oCombo1:ItemMarked := bAction
// Codeblock für Auswahl durch linken Mausklick in der Listbox
oCombo1:ItemSelected := bAction
Die msgbox wird nicht angezeigt. Ist aber befüllt. Habe ich vorher geprüft
Code: Alles auswählen
Function Prf(aFelder,oSle3,oSle4)
msgbox(var2lchar(aFelder))
If aFelder[1]="N"
oSle3:enable()
oSle4:enable()
Else
oSle4:disable()
oSle3:disable()
EndIf
Return Nil