You have to choose here, either very slow in InterActiveChange, or fast in LostFocus.

>thank you for reply
>what, exactly, does not work in interactive change? it works but very slow
>
>Anyway, I would no appreciate such time consuming stuff on every keystroke. It makes the interface slow if it rereads the data and rebuild the whole grid evertime.? any small example
>
>
>
>
>
>>Mohammed,
>>
>>what, exactly, does not work in interactive change?
>>
>>Anyway, I would no appreciate such time consuming stuff on every keystroke. It makes the interface slow if it rereads the data and rebuild the whole grid evertime.
>>
>>Agnes
>>>hi all,
>>>
>>>this code below works under event lostfocus is there away to works under event interactivechange or rewrite it
>>>
>>>

>>>SET EXCLUSIVE off
>>>SET EXACT on
>>>SET TALK OFF
>>>SET NOTIFY OFF
>>>
>>>
>>>             lcName1 = alltrim(thisform.text1.value)
>>>             lcName2 = alltrim(thisform.text2.value)
>>>             lcName3 = alltrim(thisform.text3.value)
>>>             lcName4 = alltrim(thisform.text4.value)
>>>
>>>DO case
>>>
>>>    CASE lcName1<>"" AND lcName2 <>""   AND lcName3 <>"" AND lcName4<>"" AND LEN(ALLTRIM(lcName1)) >= 3 AND LEN(ALLTRIM(lcName2)) >= 3 AND LEN(ALLTRIM(lcName3)) >= 3 AND LEN(ALLTRIM(lcName4)) >= 3
>>>           Select F4,F1,name4,name3,name2,name1 from x2 where   name1=lcName1 AND name2=lcName2 AND  name3=lcName3 AND  name4=lcName4;
>>>                                  into cursor lcResultTable
>>>
>>>
>>>    CASE lcName1<>"" AND lcName2 <>""   AND lcName3 <>"" AND lcName4=="" AND LEN(ALLTRIM(lcName1)) >= 3 AND LEN(ALLTRIM(lcName2)) >= 3 AND LEN(ALLTRIM(lcName3)) >= 3
>>>           Select F4,F1,name4,name3,name2,name1 from x2 where   name1=lcName1 AND name2=lcName2 AND  name3=lcName3 ;
>>>                                  into cursor lcResultTable
>>>
>>>
>>>
>>>    CASE lcName1<>"" AND lcName2 <>""   AND lcName3 =="" AND lcName4==""  AND LEN(ALLTRIM(lcName1)) >= 3 AND LEN(ALLTRIM(lcName2)) >= 3
>>>           Select F4,F1,name4,name3,name2,name1 from x2 where   name1=lcName1 AND name2=lcName2 AND  name3=lcName3;
>>>                                  into cursor lcResultTable
>>>
>>>
>>>
>>>    CASE lcName1<>"" AND lcName2 ==""  AND lcName3 =="" AND lcName4==""  AND LEN(ALLTRIM(lcName1)) >= 3
>>>           Select F4,F1,name4,name3,name2,name1 from x2 where name1=lcName1 ;
>>>                                  into cursor lcResultTable
>>>
>>>    CASE lcName1<>"" AND lcName2 ==""  AND lcName3 =="" AND lcName4<>""  AND LEN(ALLTRIM(lcName1)) >= 3 AND LEN(ALLTRIM(lcName4)) >= 3
>>>           Select F4,F1,name4,name3,name2,name1 from x2 where name1=lcName1 AND  name4=lcName4;
>>>                                  into cursor lcResultTable
>>>
>>>
>>>
>>>    CASE lcName1<>"" AND lcName2 ==""  AND lcName3 <>"" AND lcName4==""  AND LEN(ALLTRIM(lcName1)) >= 3 AND LEN(ALLTRIM(lcName3)) >= 3
>>>           Select F4,F1,name4,name3,name2,name1 from x2 where name1=lcName1 AND  name3=lcName3;
>>>                                  into cursor lcResultTable
>>>
>>>
>>>    CASE lcName1<>"" AND lcName2 ==""   AND lcName3 <>"" AND lcName4<>"" AND LEN(ALLTRIM(lcName1)) >= 3 AND LEN(ALLTRIM(lcName3)) >= 3 AND LEN(ALLTRIM(lcName4)) >= 3
>>>           Select F4,F1,name4,name3,name2,name1 from x2 where   name1=lcName1 AND name3=lcName3 AND  name4=lcName4 ;
>>>                                  into cursor lcResultTable
>>>
>>>
>>>
>>>  endcase
>>>
>>> GO top
>>>                                         thisform.Grid1.RecordSource="lcResultTable"
>>>                                         thisform.grid1.Visible=.t.
>>>
>>>

>>>
>>>thanks