Делаю поиск в таблице, нахожу запись. RECNO()=8 (к примеру). На форме есть Grid. Как реализовать, что бы курсор в гриде перемещался на указанную запись. У Grid RecordSource=table1

Да,забыл ещё спросить. Перемещаясь по Grid мне ещё потребуется перемещаться в таблице. Как это организовать. К примеру,переместились в Grid на 2 строки в низ и Recno() увелицился на 2 в соответствующей таблице

Я немного не понял. Если я просто вставляю в код grid.Refresh то ничего не происходит. Проясню ситуацию. У меня есть форма, на которой размещён Грид. Ьам есть кнопка. При её нажатии открывается новая форма с текстовым полем, в котором указываешь фамилию и делаешь поиск. У меня правильно находится запись, но вот курсор в первойформе в гриде никуда не перемещаетсят и вообще не появляется!

Вот такой код ничего не делает!

SELECT "test1"
GO TOP IN test1
LOCATE FOR test1.name=ALLTRIM(thisform.text1.value)
frm1.Grid1.Refresh()

Добавил! Теперь устанавливает курсор на первую запись, но никак не на нужную!!!

Go top нигде не нашёл. Я код опубликую, может где ошибка какая.
Главная программа

DO FORM "form2" NAME frm1
DROP TABLE "test1"
SELECT name,p_ser,p_nom, adres from db_path+"vk_klie.dbf" INTO TABLE test1
frm1.Grid1.ColumnCount=4
frm1.Grid1.RecordSourceType=0
frm1.Grid1.RecordSource="test1"
frm1.Grid1.AutoFit()
frm1.Grid1.Column1.Header1.Caption="xxx"
frm1.Grid1.Column2.Header1.Caption="yyy"
frm1.Grid1.Column3.Header1.Caption="zzz"
frm1.Grid1.Column4.Header1.Caption="aaa"

READ EVENTS

Код кнопки формы, которую вызываю:
SELECT "test1"
GO TOP IN test1
LOCATE FOR test1.name=ALLTRIM(thisform.text1.value)
GO RECNO() IN "test1"
frm1.Grid1.Refresh()
frm1.Grid1.setfocus()

to GoshaS
ваш вариант
_screen.ActiveForm.refresh()
не подходит, т.к. активная форма не та, на которой находится грид.
А вот такой код:
SELECT "test1"
GO TOP IN test1
LOCATE FOR test1.name=ALLTRIM(thisform.text1.value)
frm1.Grid1.Refresh()
frm1.Grid1.setfocus()
thisform.Release
всё так же устанавливает курсор на первую запись в таблице

Если убрать результат одинаковый

to sar99
Он правильно находит запись. Если указать messagebox(RECNO()) то там будет правильный номер!!!!! А вот Гриде он никак не перемещае курсор. В чём затуп - не пойму!!!

to бендер
Практикиу меня не сильно много. Как посмотреть под фильтром ли таблицаа или нет???

Поставил browse
Как я и говорил.... Всё устанавливается!!!! Только не в Гриде!!!

У меня заработало... Я только прошу вас помочь мне понять, в чём было не так. Итак вот с этим кодом работает:

DROP TABLE "test1"
SELECT name,p_ser,p_nom, adres from db_path+"vk_klie.dbf" INTO TABLE test1
CLOSE TABLES
DO FORM "c:\Documents and Settings\alexx\Ìîè äîêóìåíòû\Visual FoxPro Projects\proj1\form2" NAME frm1
frm1.Grid1.ColumnCount=4
frm1.Grid1.RecordSourceType=0
frm1.Grid1.RecordSource="test1"
frm1.Grid1.AutoFit()
frm1.Grid1.Column1.Header1.Caption="ÔÈÎ"
frm1.Grid1.Column2.Header1.Caption="Ñåðèÿ Ï."
frm1.Grid1.Column3.Header1.Caption="Íîìåð Ï."
frm1.Grid1.Column4.Header1.Caption="Àäðåñ"

Код, где поиск
SELECT "test1"
GO TOP IN test1
LOCATE FOR test1.name=ALLTRIM(thisform.text1.value)
frm1.Grid1.Refresh()
frm1.Grid1.setfocus()
thisform.Release

А вот с этим кодом не работает:
DROP TABLE "test1"
SELECT name,p_ser,p_nom, adres from db_path+"vk_klie.dbf" INTO TABLE test1
DO FORM "c:\Documents and Settings\alexx\Ìîè äîêóìåíòû\Visual FoxPro Projects\proj1\form2" NAME frm1
frm1.Grid1.ColumnCount=4
frm1.Grid1.RecordSourceType=0
frm1.Grid1.RecordSource="test1"
frm1.Grid1.AutoFit()
frm1.Grid1.Column1.Header1.Caption="ÔÈÎ"
frm1.Grid1.Column2.Header1.Caption="Ñåðèÿ Ï."
frm1.Grid1.Column3.Header1.Caption="Íîìåð Ï."
frm1.Grid1.Column4.Header1.Caption="Àäðåñ"

Различие в том что я добавил close tables. И всё заработало. В чём причина??? Может ошибка серьёзней, чем мне кажется?