VFP如何编译

一、在本机编译、运行exe文件的做法：

⑴在项目中选中一个表单或prg文件，目的是作为主文件（启动文件）

⑵点击菜单"项目",选"设置主文件",选中的文件就为主文件

⑶在项目窗口中选"连编",连编窗口选"连编可执行文件"，选择路径和输入你要生成的exe文件的名字，连编就生成了可执行文件。

二、 你自己用vfp作一个发布安装盘，刻成光盘，送给用户：。

用vfp作一个发布安装盘，步骤：

1 将要发布的文件（.exe,...)复制到一个文件夹中（假设为d:\xxx）

2 运行 vfp6,工具-〉向导-〉安装,在发布树在哪个目录对话框中，选择d:\xxx，下一步

3在步骤2，中如果你在程序中，没有用到控件，单击 下一步即可，否则选定您用到的第三方控件

4在 步骤3磁盘映像 中 选择网络安装，并选个一个要生成的目录（如d:\MySetup）下一步

5 在 步骤4安装选项 的 安装对话标题 中输入标题 如：建筑设备管理系统 版权信息 下一步

6 安装目录、程序组（最好也写：如：建筑设备管理系统）下一步

7 下一步

8 完成

9 退出vfp60

10 到 D:\mysetup\netsetup 下，将文件刻录到光盘（或拷贝U盘）到客户机上，setup即可。

你那应该是一个简单的排序，原理很简单，无论你输入怎么样的字符串，都按特定的顺序输出，方法如下：

1、检测整个字符串的长度，并将 其保存在一个变量中

2、逐次取出子串，并与其他子串比较大小

3、顺次输出结果

例子如下：

L=len(alltrim(thisform.text1.value))

dime A(L)

for I=1 to L

A(I)=SubStr(alltrim(thisform.text1.value),I,1)

endfor

for J=1 to L-1

for m=J to L

if A(J)>A(m)

T=A(J)

A(J)=A(m)

A(m)=T

endif

endfor

endfor

for K=1 to L

thisform.text2.value=thisform.text2.value+A(K)

endfor

---