
把表单showdinwos属性设置为2 然后表单 init事件下代码 _screenvisible=f _screentop=-1500 read events 表单退出的地方 clear events quit
请看我的商用软件的部分 调用关系,这是在一个命令组中的窗体调用(命令组控件再一个窗体中):
do case
case thisvalue=1 &&设定冬停有关系数
do form \txt\frmsdl31
case thisvalue=2 &&自动结算租赁费
do form \txt\frmsdl32
do form \txt\frmsdl31
do sdl32 in \abc
do form \txt\frmsdl33
case thisvalue=3 &&租赁结算的显示
do form \txt\frmsdl33
case thisvalue=4 &&假定日期计算租赁费
DO FORM \txt\frmsdl34
do form \txt\frmsdl33
case thisvalue=5 &&租赁结算的模拟显示
thisformhide
report form \txt\frxsdl35frx Environment pdsetup preview
thisformshow
case thisvalue=6 &&租赁结算的打印
thisformhide
report form \txt\frxsdl35frx Environment pdsetup to print prompt noconsole
thisformshow
case thisvalue=7 &&自动生成损坏价格
do sdl37 in \abc
do form \txt\frmsdl37
case thisvalue=8 &&损坏价格的显示
do form \txt\frmsdl37
case thisvalue=9 &&损坏价格的模拟显示
thisformhide
report form \txt\frxsdl38frx Environment pdsetup preview
thisformshow
case thisvalue=10 &&损坏价格的打印
thisformhide
report form \txt\frxsdl38frx Environment pdsetup to print prompt noconsole
thisformshow
case thisvalue=11 &&丢失价格自动生成
do sdl311 in \abc
do FORM \txt\frmsdl311scx
do sdl311_1 in \abc
do FORM \txt\frmsdl312scx
case thisvalue=12 &&丢失价格的显示
do FORM \txt\frmsdl312scx
case thisvalue=13 &&丢失价格的模拟显示
thisformhide
report form \txt\frxsdl313frx Environment pdsetup preview
thisformshow
endcase
第一个功能 通过表单的KEYPRESS来实现
if nKeyCode=13
thisformbuttonclick
第二个功能的代码是
thisformbuttonclick()
thisformheight=thisformtext1value
1、首先在表单打开状态下,点工具栏上的“感叹号”的按钮。
2、其次在表单打开状态下,点菜单栏上的表单在表单“执行表单”(Ctrl+E)。3、最后在命令窗口中输入:doform表单名。
vf可以用表单或菜单或prg文件作为主程序,一般以prg的程序文件作为主程序,不像c语言必须是main()作为主程序
功能上没有什么区别prg文件可以方便的设置环境,提供程序的入口和出口,以及清理数据库
以上就是关于怎么将一个设计好的VF表单做成脱离VF环境的应用程序全部的内容,包括:怎么将一个设计好的VF表单做成脱离VF环境的应用程序、VFP表单如果在程序中互相调用、设置一个vf程序。有一个表单文件,其中包含“高度”标签,text1文本框,以及“确定”命令按钮等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)