![](https://img-blog.csdnimg.cn/20201014180756757.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
VFP
文章平均质量分 52
weixin_41999297
这个作者很懒,什么都没留下…
展开
-
X# XSharp 基于 xBase 语言的开源编程语言
X#(发音为XSharp),一门基于xBase语言的开源编程语言,加入了.NET家族,成为一门新的.NET语言。未来你可以在最新版的VisualStudio2017中安装和使用这门编程语言。X#是支持了多种xBase方言,你可以把它的核心部分看成是带xBase语法的C#。同时支持的xBase方言有VO/Vulcan、FoxPro、dBase、Xbase++和Harbour。XSharp基于xBase语言的开源编程语言。...原创 2022-07-27 11:20:51 · 213 阅读 · 0 评论 -
【无标题】VFP如何判断网格(GRID)中的一个列是否在可视状态下
VFP grid 判断列是否在可视状态下原创 2022-07-03 11:18:53 · 137 阅读 · 0 评论 -
VFP OBJTOCLIENT( ) 函数 返回对象的位置
返回一个控件或对象相对于表单的位置或尺寸原创 2022-06-17 21:07:23 · 129 阅读 · 0 评论 -
VFP调用API实现代码模拟鼠标.键盘动作
VFP调用API实现代码模拟鼠标.键盘动作原创 2022-06-17 20:01:57 · 607 阅读 · 0 评论 -
揭密VFP报表监听器的秘密,自定义报表模块成为可能
VFP报表原创 2022-03-23 12:25:41 · 203 阅读 · 0 评论 -
VFP 把表导出 CSV (Copy To )
COPY TO FileName [DATABASE DatabaseName [NAME LongTableName]][FIELDS FieldList | FIELDS LIKE Skeleton | FIELDS EXCEPT Skeleton][Scope] [FOR lExpression1] [WHILE lExpression2][ [WITH] CDX ] | [ [WIT...原创 2020-04-11 09:51:36 · 1941 阅读 · 0 评论 -
VFP 的 mousedown、mouseup、click事件之间的关系及执行顺序
mousedown、mouseup、click事件之间的关系及执行顺序三个事件的触发时机mousedown当鼠标指针移动到元素上方,并按下鼠标按键(左、右键均可)时,会发生 mousedown 事件。与 click 事件不同,mousedown 事件仅需要按键被按下,而不需要松开即可发生。mouseup当在元素上松开鼠标按键(左、右键均可)时,会发生 mouseup 事件。与 cli...原创 2020-04-02 23:17:37 · 940 阅读 · 0 评论 -
VFP 常用 OCX 控件 注册
VFP 常用 OCX 控件MSCOMCtl.ocx 包括: ImageCombo、ImageList、ListView、ProgressBar、Slider、StatusBar、TabStrip、Toolbar 和 TreeView 控件( 注意:在 7.0 及以前的版本中该文件的名字是 Comctl32.ocx )comctl32.ocx comctl32.dll MSCOMCTL.OCX...原创 2020-03-31 10:39:56 · 1413 阅读 · 0 评论 -
VFP Newobject() 、Createobject()、AddObject 方法语法和参数传递
Local llerror Local lcfrmdqcolorbox Local oerr As Exception lcfrmdqcolorbox = "frmdqcolorbox"+Sys(2015) *RELEASE &lcfrmdqcolorbox Public &lcfrmdqcolorbox Try &lcfrmdqcolorbox = ...原创 2020-03-30 10:09:40 · 1570 阅读 · 0 评论 -
VFP 把GETCOLOR()反回的颜色号 分解为 GRB色号的算法。GETCOLOR()、RGB()
*lnColor 颜色号local lnColorLOCAL lnR,lnG,lnB,lcrvaluelnColor = 0lnColor = GETCOLOR(lnColor)lnR=BITAND(tnColor, 255)lnG=BitRShift(BitLShift(tnColor, 16), 24)lnB=BitRShift(tnColor, 16)lcrvalue =...原创 2020-03-28 21:50:18 · 506 阅读 · 0 评论 -
VFP 过程和函数参数传递,如何传递数组给过程
在过程和函数中定义参数PROCEDURE myProcedure LPARAMETERS Par1, Par2, Par3, ... * 插入过程代码。ENDPROC参数传递分两种:1、值传递* 值传递,调用过程,括号括住变量为值传递DO myProcedure WITH (var1), (var2), ...*值传递,调用函数myFunction(var1, v...原创 2020-03-28 15:55:01 · 1631 阅读 · 0 评论 -
VFP grid 表格数据复制入粘贴板 _vfp.DataToClip() _cliptext
直接上代码****************************************************** 当是网格时,复制网格的数据进粘贴板* 2020-3-28 修改Set Textmerge OnSuspendDo Case This.linedit Return Case Empty(This.RecordSource) Return .F. C...原创 2020-03-28 08:11:44 · 783 阅读 · 0 评论 -
VFP thisform.LockScreen
当大量写屏时,为了防止屏幕闪跳和提高运行速度,需要对表单进行屏幕锁定。锁定表单屏幕的一级程序:*锁定屏幕LOCAL llLockScreenllLockScreen = thisform.LockScreenIF thisform.LockScreen = .f. thisform.LockScreen = .t.ENDIF* 中间的代码*恢算环境IF thisfor...原创 2020-03-05 22:00:01 · 440 阅读 · 1 评论 -
VFP wait wind 信息显示在文本框的下方 OBJTOCLIENT( ) 函数
* 建立时间: 2020-2-14* 最后修改时间:* 说明: wait wind 信息显示在文本框的下方* 方法名称: this.show_message() * 方法参数说明:tcmessage C 型 需要显示的信息* 返回值类型:* 返回值说明:* 调用的方法:this.Valid() LPARAMETERS tcmessageIF VARTYPE(tcm......原创 2020-02-18 15:42:52 · 900 阅读 · 0 评论 -
VFP GRID Bug,VFP新的错误,在表缓冲下, 网格(GRID)控件新增的最后一行数据实际没有存入表中。
VFP新的错误,在表缓冲下, 网格(GRID)控件新加的最后一行记录实际不能存入表中。在保存前运行 goto 可以避免错误的发生在保存前转一下goto recno()...原创 2020-02-18 14:38:47 · 328 阅读 · 0 评论 -
VFP 返回清除半角符号的字符串
* 建立时间: 2020-02-16* 最后修改时间:* 说明:对文本清除半角符号的方法,使用了strtran()20200216* 方法参数说明:tcchar 要替换的字符串* 返回值类型:返回字符串* 返回值说明:* 调用的方法:LPARAMETERS tcstringLOCAL lcrv && 返回传化后的值lcrv = ""IF VARTYPE(t...原创 2020-02-17 10:25:24 · 249 阅读 · 0 评论 -
VFP 键盘和鼠标输入
键盘和鼠标输入使用 可以AMOUSEOBJ( ) 函数创建一个包含有关鼠标指针位置以及鼠标指针下对象的信息的数组。CAPSLOCK( ) 函数返回当前 CAPS LOCK 键模式或设置 CAPS LOCK 键模式为 On 或 Off。CHRSAW( ) 函数确定一个字符是否出现在键盘缓冲区中。CLEAR MACROS 命令从内存中释放指定项目或项目。CLEAR TYPEAHEA...原创 2020-02-13 20:23:23 · 1257 阅读 · 0 评论 -
VFP 常用文本函数
1、去空格函数 ATTL()2、取左与取右函数 LEFT( ) RIGHT( )3、取中间 SUBSTR( )4、REPLICATE( ) 重复字符?REPLICATE( " ",10) && 返回10个空格的字符串5、STRTRAN( ) 有文本替换函数 tcstring = STRTRAN(tcstring,lctable03,lcalias03) ...原创 2020-02-13 16:24:36 · 2686 阅读 · 0 评论 -
VFP BINDEVENT( ) 函数
VFP BINDEVENT( ) 函数提供当一个事件发生时执行用户代码(一个对象的方法)的能力。下面语法的第一种形式,可以使用 BINDEVENT( ) 从 Visual FoxPro 本身对象到其它 Visual FoxPro对象来绑定事件、属性或方法。BINDEVENT(oEventSource, cEvent, oEventHandler, cDelegate [, nFlags]...原创 2020-02-13 16:10:22 · 1167 阅读 · 0 评论 -
VFP 数据复制入粘贴板 _vfp.DataToClip() _cliptext
1、把网格数据源表的数据复制到粘贴板_vfp.DataToClip(logrid.RecordSource,,3)2、把文本复制至剪贴板_cliptext= “要复制到剪贴板字符串”原创 2020-02-13 16:08:43 · 1883 阅读 · 0 评论 -
VFP 文件路径相关命令与函数
一、设置命令&& Set Default To 指定默认磁盘和目录。&& Set Path To 指定文件搜索路径。Set Default To d:\vfp\mrp2Set Path To d:\vfp\vfp9二、函数Curdir( ) 与Sys(2003) 返回结果相同? "Set(DFAULT)返回起动的盘符:"? Set("DEFAUL...原创 2020-02-12 15:43:32 · 3520 阅读 · 0 评论 -
VFP对象命名约定
Prefix 对象 示例chk复选框(CheckBox)chkReadOnlycol集合(Collection)colFormObjectscbo组合框(ComboBox)cboEnglishcmd命令按钮(CommandButton)cmdCancelcmg命令按钮组(CommandGroup)cmgChoicescnt容器(Container)cntMove...原创 2020-02-12 11:56:08 · 291 阅读 · 0 评论 -
VFP使用 Listbox
PROCEDURE prdForm_Cmg .Top=fncT(125) .Left=fncL(007) .Width=.Parent.Width-fncW(015) .Height=.Parent.Height-.Top-fncH(010) .BackColor=.Parent.BackColor .BorderStyle=0 .ButtonCount=64 .SetAll([H...原创 2020-02-12 10:48:51 · 718 阅读 · 0 评论 -
VFP 条件函数 IIF() 与 ICASE()
VFP 的两个条件函数:local lnretulnretu = iif(.t.,1,2) && lnretu 返回值为1lnretu = iif(.f.,1,2) && lnretu 返回值为2local lniilnii = 3lnretu = icase(lnii =1,1,lnii = 2, 2,lnii = 3 , 3 , 0 ) &am...原创 2020-02-11 21:17:02 · 1170 阅读 · 0 评论 -
VFP检测SQL Server的五个实例代码
** 需要指出的是,无论下面哪种方式的代码,都需要打开本机的网络共享,否则找不到SQL服务器** 例一 **************************************************** Use MyFll.Fll(下载MyFll)Set Library To MyFlllcLocalName = Left(Sys(0),At("#",Sys(0))-2)lcLoc...原创 2020-02-11 09:39:39 · 380 阅读 · 0 评论 -
VFP 二维数组声明和ALEN() ASCAN() AFIELD() ADEL()函数
1、ALEN() 返回数组内元素的个数,或二维数组的行数或列数local lnalen,lnrow,lncol,lncellselect (employee) && 职员表的工作区lnalen = afield( lafield) && 返回表的字段数组 lafield 和字段的个数lnalenlnrow = ALEN(lafield,1) &am...原创 2019-07-31 09:25:50 · 2115 阅读 · 0 评论 -
VFP GRID 关于列号属性的笔记
GRID 网格列的处理属性GRID 列与行属性ActiveColumn 属性 返回包含活动单元的 Grid 控件中的整数列号。设计时不可用;运行时只读RelativeColumn 属性Grid 控件可视部分的活动列列号 ,由左数的列数 。设计时不可用,运行时只读。Columns[nCol] 属性 列对象数组。 nCol 列生时的列号。未移动列时 nCol=ActiveColumn ...原创 2019-07-14 09:38:59 · 1614 阅读 · 0 评论 -
VFP 字符串转数组
VFP 字符串转数组代码:alines(数组名,字符串, 1, 分隔符)原创 2019-07-09 17:07:01 · 903 阅读 · 0 评论