| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 5089 人关注过本帖, 1 人收藏
标题:VFP编程技巧,不断增加中(千万别灌水)
只看楼主 加入收藏
tzhtang
Rank: 1
等 级:新手上路
帖 子:888
专家分:0
注 册:2004-8-30
收藏
得分:0 

应用程序中测知当前系统的运行路径

我们知道,HOME()与SYS(2004)能够传回VFP的启动磁盘目录,亦即VFP.EXE所在的磁盘目录,但实际上,所传回的并不是.EXE文件的启动磁盘目录,而是执行时期函数库.ESL所在的磁盘目录,因此,欲于.exe文件中测知.exe文件的启动磁盘目录,应用使用如下命令:

LEFT(SYS(16),RAT(“\”,SYS(16)))


2005-08-12 18:00
tzhtang
Rank: 1
等 级:新手上路
帖 子:888
专家分:0
注 册:2004-8-30
收藏
得分:0 

判断当前是否运行表单

指定表单名:

If Not Wexist("appendform")

Endif

不指定表单名:

If Vartype(_Screen.ActiveForm)='O'

?_Screen.ActiveForm.Name

Endif


2005-08-12 18:01
tzhtang
Rank: 1
等 级:新手上路
帖 子:888
专家分:0
注 册:2004-8-30
收藏
得分:0 

判断一条记录是否被修改过?

看oldval( ) 函数的帮助

注意:你的当前数据表必须是在缓冲方式下。


2005-08-12 18:02
tzhtang
Rank: 1
等 级:新手上路
帖 子:888
专家分:0
注 册:2004-8-30
收藏
得分:0 

同时设置多个对象的同一属性

用SetAll方法。例如,你决定为全部网格中的标题设置9号宋体。将以下代码放入网格的Init事件:

THIS.SETALL("FontName","Arial","Header")


2005-08-15 12:08
cxp
Rank: 1
等 级:新手上路
帖 子:14
专家分:0
注 册:2005-8-13
收藏
得分:0 
预览报表时,最大化:keyb ctrl+F10
2005-08-15 13:27
tzhtang
Rank: 1
等 级:新手上路
帖 子:888
专家分:0
注 册:2004-8-30
收藏
得分:0 
谢谢CXP,希望有更多的fox友加进经验!

2005-08-22 10:56
tzhtang
Rank: 1
等 级:新手上路
帖 子:888
专家分:0
注 册:2004-8-30
收藏
得分:0 

组合框中隐藏指定的列(借来的经验)

在组合框中,隐藏指定列的最简单方法是使用"组合框生成器"。在"组合框生成器"的"布局"选项卡上,将这些列拖到您所希望的宽度。

如果要通过编程在组合框中隐藏指定的列,请将这些列的 ColumnWidth 属性设置为 0。

在如下的程序代码中,列 1 和列 2 被隐藏,列 3 的宽度为 100 pixels:

THISFORM.ComboBox1.ColumnWidths = 0,0,100


2005-08-22 10:59
tzhtang
Rank: 1
等 级:新手上路
帖 子:888
专家分:0
注 册:2004-8-30
收藏
得分:0 

隐藏VFP标准的工具条

用HIDE WINDOW命令来隐藏工具条。工具条也可用SHOW WINDOW来显示。


2005-08-22 11:00
tzhtang
Rank: 1
等 级:新手上路
帖 子:888
专家分:0
注 册:2004-8-30
收藏
得分:0 

如何去掉表单的标题栏

1、在6.0以下的版本中设置为:

把表单的Caption属性设置为空

把表单的MaxButton属性设置为.F.

把表单的MinButton属性设置为.F.

把表单的Movable属性设置为.F.

2、在6.0以上的版本中设置为:

Titlebar = 0


2005-08-22 12:09
tzhtang
Rank: 1
等 级:新手上路
帖 子:888
专家分:0
注 册:2004-8-30
收藏
得分:0 

运行表单时不显示其中的任何对象

是因为表单的LockScreen属性设置为.T.,改为.F.就没问题了。


2005-08-22 12:42
快速回复:VFP编程技巧,不断增加中(千万别灌水)
数据加载中...
 
   



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

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