General information
Category:
Coding, syntax & commands
tried many things to get new text to stay...but either the first letter gets missed or it resets after every letter, it has no problems with items that are already in the listbox.
any ideas?
- jer
code follows:
grid.combo.valid ( no problems here )
if this.listindex < 1 and !isblank(this.displayvalue)
replace Doc_type with allt(this.displayvalue)
this.value = Doc_Type && fox needs this
FFound = .F.
for i = 1 to this.listcount
if Allt(Upper(this.list(i,1))) == allt(Upper(this.Value))
FFound = .T.
exit
endif
endfor
if !FFOund
this.additem(allt(this.Value))
endif
endif
grid.combo.interactiveChange ( this one chops first letter typed ):
select tmpRevControl
replace Status with iif(tmpRevControl.Status == "N", "N", "M")
if doc_rev > 0
replace isMod with "1" + substr(ismod, 2)
endif
thisform.caption = thisform.modcap
thisform.refresh
grid.combo.InteractiveChange ( this one removes each letter as it's typed )
select tmpRevControl
replace Doc_type with allt(this.displayvalue)
replace Status with iif(tmpRevControl.Status == "N", "N", "M")
if doc_rev > 0
replace isMod with "1" + substr(ismod, 2)
endif
this.value = Doc_Type
thisform.caption = thisform.modcap
thisform.refresh
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only