| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 4432 人关注过本帖
标题:通过选择,grid1中出现想看到的字段信息
只看楼主 加入收藏
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:451
帖 子:10608
专家分:43186
注 册:2014-5-20
收藏
得分:0 
以下是引用吹水佬在2018-6-7 14:45:07的发言:


只是可视化编程与非可视化编程的差别,其他方面实质并无差别吧,更谈不上面向对象的意义不在。

写示例,个人喜欢用非可视化方式,全部代码都可视,比较直观,方便理解,操作也方便,直接复制代码就可以测试运行,不用整套打包上传下载那么麻烦。
2018-06-07 14:54
gs2536785678
Rank: 10Rank: 10Rank: 10
等 级:贵宾
威 望:45
帖 子:610
专家分:1784
注 册:2017-7-16
收藏
得分:0 
你上传出东东吧。看来也讲不清楚了。
2018-06-07 14:58
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:451
帖 子:10608
专家分:43186
注 册:2014-5-20
收藏
得分:0 
以下是引用gs2536785678在2018-6-7 14:26:32的发言:

有现成的FORM窗口,现成的GRID表格为何不直接使用?

DEFINE CLASS form1 as Form
    ADD OBJECT grid1 as grid
难道这样写不是用现成的FORM和现成的GRID吗?
2018-06-07 15:28
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:451
帖 子:10608
专家分:43186
注 册:2014-5-20
收藏
得分:0 
以下是引用gs2536785678在2018-6-7 14:58:05的发言:

你上传出东东吧。看来也讲不清楚了。

是不是我理解错了。
我的意思是用可视化编程,使用FORM设计器会生成SCX表文件,提供给人家时要打包上传,人家还要下载,再用FORM设计器打开才能了解写的内容。对于简单几行代码的示例,这样做不觉得有点麻烦吗?
2018-06-07 15:35
gs2536785678
Rank: 10Rank: 10Rank: 10
等 级:贵宾
威 望:45
帖 子:610
专家分:1784
注 册:2017-7-16
收藏
得分:1 
我想,你[吹水]大师一定是误会了。
我的
[你上传出东东吧。看来也讲不清楚了。]
是叫提出问题的
[NanT]
上传东东。
2018-06-07 15:35
NanT
Rank: 1
等 级:新手上路
帖 子:18
专家分:0
注 册:2018-6-1
收藏
得分:0 
回复 15楼 gs2536785678
比如说这样:
图片附件: 游客没有浏览图片的权限,请 登录注册

我选择了joint,name 在表格中只显示joint,name的字段信息。
2018-06-07 16:25
mywisdom88
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:191
帖 子:3147
专家分:8408
注 册:2015-3-25
收藏
得分:0 
楼主是想,动态的查看表的各个字段内容。
大概的思路这样:
1.用 List1 列出表字段,然后,选择需要的字段,到 List2 列表
2.根据 List2 列表,动态拼接 SQL查询语句,查询数据,再绑定 Grid1的数据源
和下面的表单向导差不多。。
图片附件: 游客没有浏览图片的权限,请 登录注册


[此贴子已经被作者于2018-6-7 16:29编辑过]

2018-06-07 16:27
mywisdom88
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:191
帖 子:3147
专家分:8408
注 册:2015-3-25
收藏
得分:5 
*如果用16楼的,自己先把字段名称用 CheckBox 列出来,选择后,在查询,那就简单多了

* 在 thisform.init
CREATE CURSOR 成绩(学号 c(6),语文 n(5,2),数学 n(5,2),英语 n(5,2),物理 n(5,2),生物 n(5,2))
INSERT INTO 成绩 VALUES ("1001",95.5,85,95,84,89)
INSERT INTO 成绩 VALUES ("1002",93.5,85,95,84,89)
INSERT INTO 成绩 VALUES ("1003",97.5,85,95,84,89)
thisform.grid1.ColumnCount = -1
thisform.grid1.RecordSourceType = 1
thisform.grid1.RecordSource = "成绩"
* 分别建立6个CheckBox,名称分别是 check1,check2,check3,check4,check5,check6,代表(语文,数学,英语,物理,生物)
* 建立1个按钮,command1.click
LOCAL cSql
cSql="select 学号"
IF thisform.check1.Value = 1
   cSql = cSql + "," + thisform.check1.Caption
ENDIF
IF thisform.check2.Value = 1
   cSql = cSql + "," + thisform.check2.Caption
ENDIF
IF thisform.check3.Value = 1
   cSql = cSql + "," + thisform.check3.Caption
ENDIF
IF thisform.check4.Value = 1
   cSql = cSql + "," + thisform.check4.Caption
ENDIF
IF thisform.check5.Value = 1
   cSql = cSql + "," + thisform.check5.Caption
ENDIF

cSql = cSql + " from 成绩 into cursor tmp_成绩 readwrite"

EXECSCRIPT(cSql)

thisform.grid1.ColumnCount = -1
thisform.grid1.RecordSourceType = 1
thisform.grid1.RecordSource = "tmp_成绩"
图片附件: 游客没有浏览图片的权限,请 登录注册
图片附件: 游客没有浏览图片的权限,请 登录注册





[此贴子已经被作者于2018-6-7 16:58编辑过]

2018-06-07 16:31
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:451
帖 子:10608
专家分:43186
注 册:2014-5-20
收藏
得分:0 
回复 16楼 NanT
最好能上传相关文件测试
2018-06-07 16:43
NanT
Rank: 1
等 级:新手上路
帖 子:18
专家分:0
注 册:2018-6-1
收藏
得分:0 
回复 18楼 mywisdom88
我运行后 出现了这个是为什么啊?
图片附件: 游客没有浏览图片的权限,请 登录注册
2018-06-07 17:35
快速回复:通过选择,grid1中出现想看到的字段信息
数据加载中...
 
   



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

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