| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 947 人关注过本帖
标题:求教:VFP的函数调用,形参究竟有没有“默认参数值”的概念?
取消只看楼主 加入收藏
cssnet
Rank: 5Rank: 5
等 级:职业侠客
威 望:5
帖 子:351
专家分:335
注 册:2013-10-4
结帖率:100%
收藏
 问题点数:0 回复次数:3 
求教:VFP的函数调用,形参究竟有没有“默认参数值”的概念?
刚才读VFP系统自带的“类管理器”(xsource - browser)的源码,读到一句函数调用,产生了这个疑惑。
xsource存放在VFP安装目录下的"Tools\xsource"内,“类管理器”在xsource的子目录“browser”内,或见附件:
browser.rar (388.35 KB)

browser.SCX表单中,“查看代码”按钮cmdExport.Click()代码是:
RETURN thisform.ExportClass(.T.)

而thisform.ExportClass方法代码是:
LPARAMETERS tcAlias,tcExportToFile
LOCAL lvResult
this.vResult=.T.
DO brwExportView IN browser WITH (this),(tcAlias),(tcExportToFile)
...

毕竟是微软提供的代码,而非自己写的,我找了半天,始终未查到形参tcExportToFile是什么东东?
初以为是全局变量,又不太可能。看名字,猜可能是“输出至.prg或.txt时指定的默认文件名”吧。
可,这ExportClass方法的LPARAMETERS指定了2个形参,也没法像VB那样,指定第2个形参的默认值:
lPARAMETERS tcAlias,tcExportToFile = "viewcode.prg"
然而调用此方法时,却只传递了第1个参数.T.,第2个参数忽略掉了。
那么,在VFP中,第2个形参未被显式赋值,则其默认参数值为tcExportToFile = .f.,对吗?
在第4行甚至还用到了这个被省略掉的参数值,再直接拿它去调用另一子程序brwExportView()

现在问题来啦,VFP能否像VB那样,显式地、主动地更改一个函数形参的“默认参数值”?

图片附件: 游客没有浏览图片的权限,请 登录注册



[此贴子已经被作者于2022-11-22 18:36编辑过]

搜索更多相关主题的帖子: VFP 形参 默认 调用 参数 
2022-11-22 12:34
cssnet
Rank: 5Rank: 5
等 级:职业侠客
威 望:5
帖 子:351
专家分:335
注 册:2013-10-4
收藏
得分:0 
顶楼的最后一句话,有一定的误导性,不太厚道,呵呵呵呵。
其实我非常肯定:
vfp的形式参数,并没有类似其他语言那种可自定义“默认参数值”的语法。
具体出处我记不得,毕竟vfp已是十几年前玩过的东西了。
xsource的开源代码,则甚至更加古老,它是vfp 3.0年代的活化石代码,无时代意义。
故而,今天再看时,就几乎没办法习惯了。
本帖唯一可能有点儿用的结论是:
在调用函数时,若实参个数少于形参个数,则右边省略的实参,一律 =.F.。
也可不太严格地理解为:自右往左,缺失的形参默认值 =.F.
2022-11-22 23:39
cssnet
Rank: 5Rank: 5
等 级:职业侠客
威 望:5
帖 子:351
专家分:335
注 册:2013-10-4
收藏
得分:0 
以下是引用sam_jiang在2022-11-26 22:42:11的发言:

****parametertest.prg***
***一个简单的默认参数设置代码***
LPARAMETERS tcpara1


sam可能误会我意思啦。

我说的是,在vfp中无法类似vb等语言那样,非常优雅地、简洁地、一句话搞定地,给你例子中的tcpara1形参,设置一个预设值。比如,当别人以非空实参parametertest("tom")来调用时,tcpara1="tom";而当别人无实参调用parametertest(),则tcpara1="sam”,自动取自定义的预设值,而非预设值一律只能得到.f.。

接收参数之后,再手动用代码if....endif去判断参数是空或者非空,这确实是退而求其次的标准作法。

假如,函数有5个形参甚至更多几个,自左往右,程序调用时只传递了2个实参,剩下的3个取预设值,那么,手动if...endif就非常繁琐易错……怎么说呢,用楼主的口头禅说——很不优雅。对吧?

或,尽可能折中一下,尽可能优雅一下子——

*------------------
FUNCTION testpara(tc1, tc2, tc3)
tc1 = iif(! empty(tc1), tc1, "Tom")
tc2 = iif(! empty(tc2), tc2, "Sam")
tc3 = iif(! empty(tc3), tc3, "John")
******************
* 巴拉巴拉,以下为函数的具体实现代码
* ...
* ...
******************
? tc1, tc2, tc3
return
*------------------

testpara("apple")
testpara("apple", "banana")
testpara("apple", "banana", "William")


[此贴子已经被作者于2022-11-27 12:09编辑过]

2022-11-27 09:37
cssnet
Rank: 5Rank: 5
等 级:职业侠客
威 望:5
帖 子:351
专家分:335
注 册:2013-10-4
收藏
得分:0 
再想深一层。
LPARAMETERS无非也就相当于Local。所谓形式参数,无非也就相当于在函数头声明局部变量,其作用域为函数级的,只不过特殊了一点。
特殊的一点在于,LPARA自动接收函数调用者传来的实参值,并在函数初始化时,自动赋值给对应位置的形参变量。至于缺失实参值的,就自动为形参变量赋初始值 = .F.(其实任何变量,若不显式地赋值,其初始值皆 = .F.)。
楼主平素是有“代码洁癖”的家伙,故而一直对自动赋初始值的方式方法耿耿于怀而已。
倘若抛开“洁癖”,VB形式的函数形参默认值,其内部实现过程,也就大致对应于8#的代码了。
2022-11-27 15:00
快速回复:求教:VFP的函数调用,形参究竟有没有“默认参数值”的概念?
数据加载中...
 
   



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

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