>>>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
>Richard,
>It's nearly done. When finished will deliver to you too.
>Cetin

Hi Cetin -
This sounds interesting. Can you send me a copy too when you're done?
Thanks,
Sylvia