foxpro中带查询按钮的表单怎样做?

sele * from jhwh into cursor jhwh_temp &&jhwh为数据表
**显示
thisform.grid1.RecordSource="jhwh_temp"
thisform.grid1.visible=.t.
thisform.grid1.columncount=8 &&字段数
thisform.grid1.readonly=.t. &&表不能修改
thisform.grid1.column1.header1.caption="编号"
thisform.grid1.column1.width=60
thisform.grid1.column2.header1.caption="品名"
thisform.grid1.column2.width=120
thisform.grid1.column3.header1.caption="进货数量"
thisform.grid1.column3.width=55
thisform.grid1.column4.header1.caption="进货单价"
thisform.grid1.column4.width=55
thisform.grid1.column5.header1.caption="进货金额"
thisform.grid1.column5.width=65
thisform.grid1.column6.header1.caption="进货日期"
thisform.grid1.column6.width=75
thisform.grid1.column7.header1.caption="客户代码"
thisform.grid1.column7.width=50
thisform.grid1.column8.header1.caption="厂家名称&qu