>Hi Richard,
>Me either didn't see any need for lLastSelected but I thought at start it would be needed. Futher there is no need for lSelected too. Deleted() works good. Today I played with it more and wrote somewhat similar to yours. I'll pass it to files section when fully finished. Currently trying to add per column incremental search capability + headers from dbc.
>Cetin


I used the following code to set the header caption:

* Open database where employee resides
open database (db.dbc)
for ix=1 to .columncount
.columns(ix).removeobject("Text1")
.columns(ix).addobject("myTextBox","myTxtBox")
.columns(ix).currentcontrol = "myTextBox"
.columns(pni).header1.caption = dbgetprop(strtran(upper(.columns(pni).controlsource), upper(tcSelector + '.'), employee + '.'), 'Field', 'Caption')

endfor

I briefly tried fooling with the keypress event(added the procedure) of the mytxtbox definition to create an incremental search but I did not achieve anything. You can use the chr() function convert the parameter of the event to a character and do a locate on that control source with that character. The problem I got was the data entered stayed in the field and when non-alphanumeric keys like the down/up arrows, etc. are pressed how would you trap for them? Certainly you could create a procedure to only search for alphanumeric which may have to be done.

Richard