表格控件初始显示问题

[ourangel]

我对两个表建了一对多的关系
我在表单中，加入了一个表格控件，表格数据源，来自子表，
可是在第一次启动表单后，表格显示了全部的子表数据，
我再点上一条，下一条按钮时，表格里显示的数据，这时才会跟父表的数据动。
怎么才能解决，表单动时，表格不全显示全部数据呢。

[TERRYYRRET]

没明白你什么意思

是说要在表单动时,让子表仍全部显示数据吗

[ourangel]

我从头说吧。
两个表都有编号(父表jiben,编号是唯一的，子表peifang，编号是不唯一的）建立一对多的关系
select 1
use jiben
index on 编号 to a
select 2
use peifang
index on 编号+配方号 to b
sele 1
set relation to 编号 into peifang
set skip to peifang
在表单的init事件中，对表格grid_pf的数据源设置
thisform.grid_pf.recordsource="peifang"
sele 1
go bottom
表单界面里，有编号文本框（连接着jiben父表）

问题：
运行表单，这时，表格里显示的数据，是peifang中全部的数据，而不是与jiben表中最后一条数据相同编号的数据，但是点击上一条按钮时，表格中显示的数据，就会跟着父表动了。
我想实现，运行表单后，表格中不要显示全部数据，而只显示，与jiben表中最后一条数据相同编号的数据

[十豆三]

比如你的上一条按钮为Command1

那么在表单的Activate事件：
THISFORM.Command1.CLICK()

[ourangel]

不是，按钮点击完显示是正确的，表单第一次运行时，表格显示不是我想要的。

[十豆三]

按钮点击完显示是正确的

*------------------------

帖出按钮CLICK代码

[ourangel]

上一条
sele 1
skip -1
if bof()
=messagebox("已是第一条记录！",48,"讯息视窗")
thisform.istop=.T.
go top
endif
thisform.refresh

下一条
sele 1
skip
if eof()
=messagebox("已是最后一条记录！",48,"讯息视窗")
thisform.isbottom=.T.
go bottom
endif
thisform.refresh
是正确的，我这显示都对。
我觉得可能是我表单启动时，表格控件哪个地方没触发与父表的关联

[十豆三]

在表单的Activate事件加代码：

sele 1
go top
thisform.istop=.T.
endif
thisform.refresh