连编VFP可执行文件

来源:百度知道 编辑:UC知道 时间:2024/05/30 01:13:38
因为管理信息课程要上交一个用VF做的小型系统~~本菜鸟很痛苦的总算基本完成.可在连编时候出大问题了!
连编成应用程序,可以运行.但运行后的窗口上边还是有跟VFP系统里一样的工具拦~~想去掉..不知道怎么弄??
就试着连编成可执行文件..连编说是成功了..可是一运行..主窗口出现一秒马上自动关闭了..
各位高手...帮帮忙拉..后天急着上交的~~

一般编写一个主程序,内容如下:
set talk off
set status bar off
set safety off
set delete on
close all
clear
*
*设定默认路径
mlh=rat("\",sys(16))
lj=substr(SYS(16),1,mlh-1)
set default to &lj
*设定搜索路径
sslj1=lj+"\data"
sslj2=lj+"\picture"
set path to &sslj1;&sslj2
*
_screen.caption="xxxxxxxx管理系统" &&设置系统窗口的标题说明
_screen.maxbutton=.f.
_screen.closable=.f.
_screen.windowstate=2
_screen.picture="back1.jpg" &&设置系统主窗口的图片
*
deactivate window "常用"
*
do form 输口令表单
*
read events &&启动事件循环
*
set sysmenu to default &&恢复统菜单
with _screen
.picture="" &&恢复系统主窗口的图片
.caption="Microsoft Visual FoxPro" &&恢复系统窗口的标题说明
.maxbutton=.t.
.minbutton=.t.
.closable=.t.
endwith
*
show window "常用"
*
set status bar on