SAS中文论坛

标题: 如何将鼠标在table viewer中点击的行数返回 [打印本页]

作者: shiyiming    时间: 2003-10-2 21:39
标题: 如何将鼠标在table viewer中点击的行数返回
将一个SAS dataset model与一个table viewer连接,要将鼠标在table viewer中所点击的(数据集的)一行显示在若干个test entry中。

我目前的困惑是,如何辨识用户以鼠标在table viewer中所选择的行号?只有得到这个行号,才能通过fetchobs方法将相应观测的有关变量值读入相应的text entry中。

请shiyiming版主和其他各位高手不吝赐教!感激不尽。
作者: shiyiming    时间: 2003-10-3 00:41
1、打开Properties,将Tableviewer1->runObjectLabel改为SingleClick
2、在SCL中插入
tableviewer1:
tableviewer1._getActiveCell(listRow, listColumn);
if listlen(listRow)>0 then numRow=getitemn(listRow);
return;

numRow应该就是你所要的行号。
希望我没有理解错,对你能有帮助。
作者: shiyiming    时间: 2003-10-3 10:28
标题: thanks a lot!
这正是我所要的,太感谢了!

今后还希望shiyiming版主不要嫌我太麻烦,我肯定还要不断向您请教。
作者: shiyiming    时间: 2003-10-3 12:08
哪里话,能为大家做一点点事情我很快乐!
希望以后我有统计方面的问题请教你和大家,还要不吝赐教哦。
作者: shiyiming    时间: 2003-10-4 10:57
shiyiming斑竹有什么问题,尽管提出来,无论是AF方面还是统计应用方面。

可能有些问题我是无能为力,但这里肯定会有很多高手,有他们参与讨论,就算解决不了问题,也会提供很多有益的思路。

另外,就有关问题扩展开来,还会引发更多有价值的话题讨论。
作者: shiyiming    时间: 2005-1-6 17:56
标题: ???
请问
tableviewer1:
tableviewer1._getActiveCell(listRow, listColumn);
if listlen(listRow)>0 then numRow=getitemn(listRow);
return;
这段代码您调试成功了吗?
请问()内的两个参数直接写成listrow和listcolumn在调试中有没有出现缺失值的错误呢?listrow和listcolumn是作为什么变量出现的呢?
我在调试的时候会出现listrow listcolumn分别是却是值,
ERROR: Invalid list identifier.的错误提示
请问如何修改呢?
作者: shiyiming    时间: 2005-1-6 19:08
标题: to shenjuju
tableviewer1:
[color=red:5106b]listRow=makelist();
listColumn=makelist();[/color:5106b]
tableviewer1._getActiveCell(listRow, listColumn);
......
return;

要灵活点嘛 <!-- s:lol: --><img src="{SMILIES_PATH}/icon_lol.gif" alt=":lol:" title="Laughing" /><!-- s:lol: -->
作者: shiyiming    时间: 2005-1-6 19:43
标题: 不好意思
<!-- s:oops: --><img src="{SMILIES_PATH}/icon_redface.gif" alt=":oops:" title="Embarassed" /><!-- s:oops: --> 因为刚刚开始学者用scl,所以比较笨拙,不好意思让您见笑了!
不过笨鸟有笨鸟的方法阿,下面是在尝试了很多次getactivecell都没有成功后用6的方法想出来的一段笨程序,往指教:
init:                                                                                                                                   
lib_is='sasuser';ds_is='admit';                                                                                                         
lib_dsn=lib_is||'.'||ds_is;                                                                                                                                                                              
dsid=open(lib_dsn);                                                                        
rec_num=1;                                                                                                                              
call notify('.','_get_widget_','table',t_id);                                          
call notify('table','_set_dataset_',lib_dsn,'browse','record','bronly','noadd','nodelete');         
return;   
table:                                                                                         
call send(t_id,'_get_current_row_number_',rec_num);                       
rc=fetchobs(dsid,rec_num);                                                            
t.text=getvarc(dsid,1);  /*获取table中的数据单元得值*/
return;   
想请教您的是那两个call notify能否用8里面的方法代替呢?
作者: shiyiming    时间: 2005-1-7 01:03
标题: kao
这世道,居然还有人喜欢AF?

[code:6e493]init&#58;
   dcl object tableId;
   _frame_&#46;_getWidget&#40;'obj1', tableId&#41;;
   tableId&#46;_setDataset&#40;'sashelp&#46;class'&#41;;
return;

term&#58;
   tableId&#46;_term&#40;&#41;;
return;[/code:6e493]

还有
[code:6e493]tableId&#46;_setColumnAttribute&#40;'var1','dataClass','comboBox'&#41;;
tableId&#46;_setColumnAttribute&#40;'var1','dataAttributes',dataAttrList&#41;;

tableId&#46;_setColumnAttribute&#40;'var2','minValue',0&#41;;
tableId&#46;_setColumnAttribute&#40;'var3','informat','yymmdd10&#46;'&#41;;
tableId&#46;_setColumnAttribute&#40;'var3','format','yymmdd10&#46;'&#41;;[/code:6e493]
作者: shiyiming    时间: 2005-1-7 09:47
标题: 呵呵
<!-- s:D --><img src="{SMILIES_PATH}/icon_biggrin.gif" alt=":D" title="Very Happy" /><!-- s:D --> 本来不是自愿的去学af的,是因为用sas做一个数据仓库的项目别的工具不会用只能用af来展现界面阿。不过说实话,在漫漫的学习过程中,每学会用一个控件就觉得特别有成就感,就更想继续学下去,好像就变成自愿主动地的去喜欢它了, <!-- s:lol: --><img src="{SMILIES_PATH}/icon_lol.gif" alt=":lol:" title="Laughing" /><!-- s:lol: --> ,能得到这么多的帮助更是出乎意料的喜悦,这里先谢谢各位师兄了;代码还有待小妹继续钻研,有了结果在向各位师兄讨教!
作者: shiyiming    时间: 2005-1-7 10:39
标题: to shenjuju
原来是位小师妹啊,好好,如果需要可以登门指导哦,呵呵呵,开玩笑啦!
能得到willon至尊的指点,你真是幸运啊,他可是AF中国排名前3的哦,而且至今单身哦。

我也是因为项目而被迫学AF的。
看样子你学的是SAS6的AF,如果要用还是SAS8以上的AF好。至少比较符合高级语言的使用习惯,不那么土。
作者: shiyiming    时间: 2005-1-7 11:34
标题: :)
<!-- s:lol: --><img src="{SMILIES_PATH}/icon_lol.gif" alt=":lol:" title="Laughing" /><!-- s:lol: --> 第一次因为是师妹而受到优待啊,我们学校的师兄都是让我帮他们找资料的时候才想起我 <!-- s:cry: --><img src="{SMILIES_PATH}/icon_cry.gif" alt=":cry:" title="Crying or Very sad" /><!-- s:cry: --> 这里可是受宠若惊了阿!!!
    我们开发用的是sas 8.2的正版,但是由于联机文档比较零散,而所能搜集到比较完整的资料都是6版的,所以经常使用很土的方法去解决问题了。
    说实话我从11月20日才正式开始接触af项目崔得特别紧,要求年前结束最多推迟到明年4月,我想多花些时间自喜得看资料都没时间,只能需要用什么就去啃什么,不过我已经下定决心在项目结束后仔细研究,毕业论文我准备自己实现一个小的仓库主题的设计,以后还要请各位师兄大力支持啊!!
作者: shiyiming    时间: 2005-1-7 13:19
标题: to to shenjuju
<!-- s:shock: --><img src="{SMILIES_PATH}/icon_eek.gif" alt=":shock:" title="Shocked" /><!-- s:shock: --> 11月20日才接触AF,看来小师妹功力深厚啊!
能在如此短的时间内掌握到这样,已经是资质超强啦!

以后有什么问题本站能帮忙的,尽管上来问。
记得要逮住willon师兄哦。 <!-- s:lol: --><img src="{SMILIES_PATH}/icon_lol.gif" alt=":lol:" title="Laughing" /><!-- s:lol: -->
作者: shiyiming    时间: 2005-1-7 15:52
标题: 学习的历程
多谢shiyiming师兄!
   我感觉自己挺笨的啊,willon师兄的代码我到现在还没琢磨明白呢 <!-- s:( --><img src="{SMILIES_PATH}/icon_sad.gif" alt=":(" title="Sad" /><!-- s:( --> 。不过不会放弃倒是真的。想到刚开始学习af的时候真的是很痛苦的日子。11月20日中午12点下火车到北京太极公司,下午1点30准时上班直接面对一本6版的sas基础教程(只有30多页写af的内容)和一个sas系统;于是从11月21起日到12月21日每天8:30到12:00,13:30到18:00,18:30到22:00持续了一整个月的从无到有的af界面展示研究;其实也根本谈不上研究,只是把已经做好的后台数据至少能够展示到前台来,另外就是要作出一个看上去应该是一个完整的应用系统的模样来。
    到现在,我做出来的全部东西就只有一个登陆的身份验证界面,两个按照一定的条件查询数据集的数据的界面,还有另外一个同学一起做的两个用eis展示mddb数据的界面,合并到一起形成了一个小的数据仓库界面展示系统。虽然整个系统是可以连贯的运行了,但是大大小小的漏洞被项目组的老师批评了无数次了。直到2005年1月2号收到smarti zhuo 的一封信,我才摆脱了无头苍蝇乱求助的状态,找到这个论坛,得到诸位师兄们的很多帮助,实在是感慨万分啊! <!-- s:cry: --><img src="{SMILIES_PATH}/icon_cry.gif" alt=":cry:" title="Crying or Very sad" /><!-- s:cry: -->  <!-- s:cry: --><img src="{SMILIES_PATH}/icon_cry.gif" alt=":cry:" title="Crying or Very sad" /><!-- s:cry: -->
作者: shiyiming    时间: 2005-1-9 01:03
标题: HiHi
shi兄,你太夸奖我了,你是高手,我还有点嫩!




欢迎光临 SAS中文论坛 (http://mysas.net/forum/) Powered by Discuz! X3.2