Visual FoxPro 论坛教学

白日梦

主讲人：白日梦
使用软件系统：Windows XP Professional SP1 + M$ Visual FoxPro 8.0

前言
跟据论坛日前的同盟会召号，论坛里已有11位代表人物，猎狐英雄好汉，
1. enry98 - VFP8
2. GoodMorning
3. itgenius - VFP6
4. johe07
5. JR86
6. max5007
7. miao1978
8. weisely
9. Wisdom - VFP9
10. tstan135
详情请看 http://chinese.cari.com.my/myfor ... =239287&fpage=6
这雪山飞狐英雄帖是想招集狐狸精(Visual FoxPro)使用者技术分享及网络教学，
询众要求在此开始着手编辑狐狸精中文版网络教学大纲。

据我所知，VFP没有被重视纳入本地资讯教学课程里，很多本地编程员对它模糊不清。
我属于早期的 xBase (dBase III plus, FOX Base,Clipper) 编程师，由于 OS 版本相容性问题及末用者(End User)对 Windows GUI 界面的普及而淘汰了上述的电脑语言，我开始转型使用 Windows 兼容的电脑语言，当时有几个选择 CA-Visual Object 1.0,Borland-dBase V for Windows,Microsoft-Visual FoxPro 3.0。我朋友也是前生意合伙人建议我向 VFP 发展，他果然眼光独到，看这股发展趋势证明我们没选错未来方向。
（注：在 Windows 3.11 / 95 时代里 Borland-Delphi 还未问世）

[ Last edited by 白日梦 on 21-3-2005 at 10:06 AM ]

白日梦

1.  工欲善其事、必先利其器
1.1 介绍 VFP
1.2 VFP 的发展史
1.3 安装指南
1.4 了解工作界面
1.5 设定环境
1.6 工具箱的使用

2.  程序开发指南
2.1 Hello! World.
2.2 建立执行档案 *.EXE
2.3 建立分布档案 *.ISM

【未完待续。。。】


[ Last edited by 白日梦 on 21-3-2005 at 09:54 AM ]

白日梦

公积金 的函数
Kumpulan Wang Simpanan Pekerja (KWSP)
Employee Provision Fund (EPF)

1. 
   
2. Clear
   
3. For Salary = 0 to 5000 step 20
   
4.   ? Salary, KWSP(Salary,12), KWSP(Salary,11), KWSP(Salary,9)
   
5. Next
   
6. For Salary = 5000 to 20000 step 100
   
7.   ? Salary, KWSP(Salary,12), KWSP(Salary,11), KWSP(Salary,9)
   
8. Next
   
9. 
   
10. 
    
11. Function KWSP(Upah, Syer)
    
12. Caruman = 0
    
13. Syer = Syer / 100
    
14. Do Case
    
15. Case Upah > 10 And Upah <= 5000
    
16.   If Upah%20 # 0
    
17.     Upah = Upah + 20 - (Upah % 20)
    
18.   EndIf
    
19.   Caruman = Upah * Syer
    
20.   nRound = 1 - (Caruman - Int(Caruman))
    
21.   Caruman = Int(Caruman + Iif(nRound=1,0,nRound))
    
22. Case Upah > 5000
    
23.   If Upah%100 # 0
    
24.     Upah = Upah + 100 - (Upah % 100)
    
25.   EndIf
    
26.   Caruman = Int(Upah * Syer)
    
27. EndCase
    
28. Return Caruman
    

复制代码

一般上做法是建一个新表格，再输入资料。使用函数的优点是由于中央处理器计算比硬碟读取的速度较快。在此原创分享高级优化编程技巧，绝对没有转帖，因为这函数只适合大马薪水制度用。


[ Last edited by 白日梦 on 3-3-2005 at 10:37 AM ]

题外话：我想请问白日梦你，CLIPPER除了支持DBASE外，也支持FOXPRO的数据库吗？
CLIPPER支持的DBASE是VERSION几的呀？
UBS使用FOXPRO的DBF，你可以说说他们是用什么语言写的？难道就是VISUAL FOXPRO？
渴望你的指教。谢谢。

白日梦

Clipper 支援 dBase III plus 和 dBase IV 的 *.DBF 数据库，但不支援它的索引库。
dBase 是 *.NDX，
Clipper 是 *.NTX，
Visual FoxPro 是 *.CDX
Clipper 完全不能开 VFP 的数据库，反之 VFP 可以将它 convert 进来。

Clipper 和 dBase 不是 100% Compatible。
一个是 Compiler，另一个是 Interpreter。
Clipper Summer '87 可以执行 dBase 大部分指令， Clipper 5 > 则大大超出 dBase 的功能，例如支援初期型的物件面向编程 OOP。

UBS 8或以下版本是采用 Visual FoxPro 开发。我没看过第九的版本不知道是用什么了。
-----------------------------------------------------------------------------
于 21/3/2005 回复：
今天看到同事安装测试版的 UBS 9.0。
UBS 9.0 是采用 VFP 8.0 开发的，我看它的安装档案就知道了。

[ Last edited by 白日梦 on 21-3-2005 at 11:22 AM ]

白日梦 于 3-3-2005 01:59 PM  说 :
Clipper 支援 dBase III plus 和 dBase IV 的 *.DBF 数据库，但不支援它的索引库。
dBase 是 *.NDX，
Clipper 是 *.NTX，
Visual FoxPro 是 *.CDX
Clipper 完全不能开 VFP 的数据库，反之 VFP 可以将它 conve ...

真的很谢谢你，这些资料对我来说很重要，除去了我不少疑惑。

白日梦

Visual FoxPro 在大马已不算是新的电脑语言。但是应用普及程度还不及 VB / VC / Pascal / Delphi / Cobol, etc，主要原因是因为它没有被大马纳入教学课程。上个星期我很高兴得知位于沙巴州亚庇的 INTI College 开始有这个课程了。

1992年，当我是编程界新手时，我由一位从外国深造留学生同事听闻它的大名，他在修学时已应用着 FoxPro 2.6 for DOS，那时 dBase III plus 是没有本身的 compiler，要靠 Clipper summer '87 来 compile （集成执行软件）了之后才转移给顾客的电脑。对于 FoxPro 有本身的 compiler 很是惊讶！可惜的是他没有抄回大马来。几个月之后我们终于找它的前身 FoxBase 2.0，对于它的速度比 dBase III plus 快，简直为之雀跃！

1995年，我终于真正的把 VFP3.0 拿在手中了，同时托朋友在西马买到它的书回来研究。这时我是一间电脑店的股东之一，负责开发软件，就这样开始用它编写了一个库存系统。VFP 2.6 还不是微软的产品，VFP 2.6 for Windows已被微软收购为旗下产品之一。

1999年我开始大量地把前身由 Clipper 开发的软件转型升级去 VFP6。计有人事管理系统、库存系统、资产管理系统等。VFP6对于 Clipper 的资料库都能转型后开启。意味着由议事编程方式 Procedural 转型物件面向性编程 OOP。视窗式应用软件的时代开始普及化了。

这时，本地软件 UBS 会计系统也跟着时代的步划由 for DOS 变成了 for Window 了。（注：作者不曾工作在 UBS 机构里）

2001年就计划商用软件工程，商用会计系统。这时候我对 Class 、ActiveX 再深入研究。发觉它更强大的功能。直到 2004 年就研究到 M$ Chart Control (SP6.0) 的 ActiveX 控件。

VFP6 是属于 Visual Studio 里其中一项产品，也可以单独购买。VFP7 就脱离了 Visual Studio 的包装了。最新版本 VFP9 是于 2005 年发市。

[ Last edited by 白日梦 on 21-3-2005 at 02:03 PM ]

白日梦

线上 VFP 的发展史的文章
它的前身是 FoxBase
http://www.emsps.com/oldtools/msfoxv.htm （有图）
http://www.foxprohistory.org

现在（2005年3月）最新版本是 VFP 9.0


[ Last edited by 白日梦 on 21-3-2005 at 11:18 AM ]

max5007

请问白老大，VFP９已经可以设计出像WINXP的INTERFACE吗？

白日梦

max5007，
VFP 8 就已经能应用 XP Theme 了。

白日梦

系统需求：
执行系统：微软视窗 2000 补丁 Service Pack 3 或更新的版本
          微软视窗 XP 或更新的版本
          微软视窗 Server 2003 或更新的版本
处理器：Pentium-class （AMD Duron / AMD Athlon也没问题）
记忆体需求量：最少 64 MB， 建议 128 MB 或更多的
硬碟需求量：165 MB 给一般安装法，20 MB 给系统测试
有光碟读取器：CD-ROM 或 DVD-ROM
有显示器：Super VGA 800x600 或更精密以 256 色
有滑鼠

安装步骤
1。 把安装光碟放进读取器，自动打开 Setup Start Page
2。 按 Prerequisites，按 Install Now！ 然后 Update Now！
3。 重启电脑后，按 Done
4。 接着，按 Visual FoxPro
5。 按 ⊙ Accept EULA，输入产品密码，之后按 Continue，Install Now！
6。 直到完毕后，按 Done，Exit （这时已可使用 VFP了）
7。 假如分布软件工程，就得安装 InstallShield Express Limited Edition

[ Last edited by 白日梦 on 21-3-2005 at 11:19 AM ]

max5007

谢谢了。。白老大。。我还没买VFP９，等我买了以后一定会学的。。计划在这WEEKEND买。。。然后开这帖一步一步学＾＾

白日梦

我在中国微软官方网站找到
http://www.microsoft.com/china/MSDN/library/default.mspx
在左边的frame里选出
[+]开发语言和工具，
[+]FoxPro，
[.]利用 Visual FoxPro 7.0 在 Visual Studio .NET 中使用 ASP.NET

astral

之前试过... 比较实际的是做web services...
记得之前有找到类似VFP 语法的wrapper,可惜只是部分的资料库用函数...

白日梦

这就是 VFP8 的工作界面，

它的控件就是 _screen，透过编程可以修改它的属性如主题/Icon/字体等等，例如：
_screen.icon = "MyIcon.ICO",
_screen.caption = "Hello ! My Application"
_screen.BackColor = Rgb(128,128,128) && 灰色

主菜单 main menu 就是 _SysMenu，透过编程可以更换主菜单 Set SysMenu To Menu1，把它还原 Set SysMenu To Default。
子菜单有 File,Edit,View,Tool,Program,Window,Help ，当 Modify File/Code 才有 Format，
当 Modify Menu 则有 Menu。

菜单下面一排有图案的就是 ToolBar，它叫做 Standard Toolbar
它的编辑程式时用，编辑 Database 的 Database Designer， Form 的有 Form Designer, Form Controls， Report 的有 Report Designer, Report Controls，还有美化时使用的 Layout, Color Palette 等等。
你可以 View menu - Toolbars 呼叫它们全部出来。

中间有 3 个窗口，指令窗口 Command Window, 任务管理 Task Pane Manager, 属性窗口 Properties Window。
指令窗口主要功能是马上执行 interpret 指令。示范
? "Hello! World."

任务管理是 VFP 版本 8 的新功能，你可以在 VFP 的安装路径里找到 TaskPane.APP
如果你正在上网，你可以透过它联系一些 VFP 的资讯网站。
它的 Filer 有强力搜寻内容的功能，闷得发荒可以找 MineSweeper 解闷。

属性窗口的功能是修改 _screen 及表格的属性，如上面所述般。

最下面就是 Status Bar，图中的 Off 掉了，主要是提供系统目前状况及贴士 Tips。

[ Last edited by 白日梦 on 21-3-2005 at 11:20 AM ]

june_starnight

VFP 8.0 和 VFP 9.0
如果公司要买需要多少钱？

flashang

shop.microsoft.com

白日梦

june_starnight 于 19-6-2005 03:17 AM  说 :
VFP 8.0 和 VFP 9.0
如果公司要买需要多少钱？

VFP 9.0 Full Pack - RM2240
我刚买到的 VFP 9.0 Upgrade Version RM1,320

VFP 9.0 license 是 per user 不是 per machine，即公司里有 2 个使用者就得买 2 套。
虽然 1 个使用者但你可以安装及使用在多部电脑，即你可以同时安装在你的 workstation 及 notebook。

白日梦

第一课 VFP的界面及工作环境
第二课 数据库和表㈠
第三课 数据库和表
第四课 建立VFP应用程序
第五课 VFP的程序设计基础（1）
第六课 VFP的程序设计基础（2）
第七课 建立自己的表单（1）
第八课 建立自己的表单（2）
第九课 报表设计（1）
第十课 报表设计（2）
第十一课 设计并使用自定义的类
第十二课 程序调试

白日梦

VFP初级课程目录
VFP中级教程目录
VFP高级教程目录