| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 2417 人关注过本帖
标题:表格控件重置数据源后,为什么表格不显示表记录内容?
只看楼主 加入收藏
a965788818
Rank: 1
等 级:新手上路
帖 子:11
专家分:0
注 册:2009-7-31
结帖率:100%
收藏
已结贴  问题点数:20 回复次数:7 
表格控件重置数据源后,为什么表格不显示表记录内容?
请教各位大侠:
        Select 1
        Use &wjm Exclusive
        Thisform.grid1.RecordSource=''
        Thisform.grid1.RecordSource='&wjm'
        Thisform.grid1.RecordSourceType=1

        Go jlh
        Delete
到此:表格控件能显示打开表记录

        Pack

                  use
        Select 1
        If !Used('&wjm')
            Use &wjm
        Endif

        Thisform.grid1.RecordSource=''
        Thisform.grid1.RecordSource='&wjm'
        Thisform.grid1.RecordSourceType=1
        Thisform.grid1.Visible=.T.
        Thisform.grid1.Enabled= .T.
        Thisform.grid1.Refresh
到此:表格控件不显示打开表记录
搜索更多相关主题的帖子: 数据源 表格 控件 记录 
2009-07-31 15:47
sywzs
Rank: 10Rank: 10Rank: 10
来 自:辽宁
等 级:贵宾
威 望:15
帖 子:508
专家分:1725
注 册:2009-5-13
收藏
得分:10 
以上代码不是在一个程序段里写的吧,
把 WJM 定义为全局变量,就不会有问题了。
2009-08-01 06:13
hu9jj
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:红土地
等 级:贵宾
威 望:400
帖 子:11857
专家分:43421
注 册:2006-5-13
收藏
得分:10 
执行pack之前先切断表格的数据源,表格就不会变成空白的了。

活到老,学到老!http://www.(该域名已经被ISP盗卖了)E-mail:hu-jj@
2009-08-01 08:25
a965788818
Rank: 1
等 级:新手上路
帖 子:11
专家分:0
注 册:2009-7-31
收藏
得分:0 
回复 2楼 sywzs
以上代码是在一个程序段里写的。
WJM 已定义为全局变量
2009-08-01 09:17
a965788818
Rank: 1
等 级:新手上路
帖 子:11
专家分:0
注 册:2009-7-31
收藏
得分:0 
回复 3楼 hu9jj
表格控件重置数据源后,为什么表格不显示表记录内容?

请教各位大侠:
        Select 1
        Use &wjm Exclusive
        Thisform.grid1.RecordSource='&wjm'
        Thisform.grid1.RecordSourceType=1
        Go jlh
        Delete
        Thisform.grid1.RecordSource=''
        Pack
        use
        Select 1
        If !Used('&wjm')
            Use &wjm
        Endif
        Thisform.grid1.RecordSource='&wjm'
        Thisform.grid1.RecordSourceType=1
        Thisform.grid1.Visible=.T.
        Thisform.grid1.Enabled= .T.
        Thisform.grid1.Refresh
到此:表格控件还是不显示打开表记录 ,空白
2009-08-01 09:20
sywzs
Rank: 10Rank: 10Rank: 10
来 自:辽宁
等 级:贵宾
威 望:15
帖 子:508
专家分:1725
注 册:2009-5-13
收藏
得分:0 
如果代码是在一个程序段里写的,运行下面的代码没有错。

wjm="表A"
jlh=1 &&表内任意记录号

SELECT 1
USE &wjm EXCLUSIVE
THISFORM.grid1.RECORDSOURCE='&wjm'
THISFORM.grid1.RECORDSOURCETYPE=1
GO jlh
DELETE
PACK
THISFORM.grid1.RECORDSOURCE='&wjm'
2009-08-01 10:49
sd_tysd
Rank: 5Rank: 5
等 级:职业侠客
威 望:1
帖 子:81
专家分:319
注 册:2009-7-23
收藏
得分:0 
回复 5楼 a965788818
wjm='表名'

        Select 1
        Use &wjm Exclusive
        Thisform.grid1.RecordSource='&wjm'
        Thisform.grid1.RecordSourceType=1

        Delete
        Thisform.grid1.RecordSource=''
        Pack
         Thisform.grid1.RecordSource='&wjm'
        Thisform.grid1.RecordSourceType=1
以上运行通过
2009-08-01 20:54
longky
Rank: 1
来 自:广东
等 级:新手上路
帖 子:1
专家分:0
注 册:2012-10-30
收藏
得分:0 
回复 7楼 sd_tysd
谢谢,我刚好遇上这问题,用您的方法解决了,太谢谢了

互相帮助总觉开心
2013-05-31 15:59
快速回复:表格控件重置数据源后,为什么表格不显示表记录内容?
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.035357 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved