Hi!

thsiform.Refresh command calls the refresh of all child control. Refresh of the combobox in this process causes the problem. I guess you should not do anything in the InteractiveChange but just remember the DisplayValue in some property, than use it in the Valid event to add to teh table if it is new. If you want interactive search work using InteractiveChange, than do not do the refresh of entire form, but just a container than contains all other element, and put this combobox outside of the container, so refreshing of data when searching in combobox will not cause refreshing of the combobox.

HTH.

>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