apple_8180(十豆三) 的专栏

*--遍历算法是递归算法的一个具体应用实例，在程式设计中也是比较常用的算法之一*这里介绍几个常用的应用实例来简单接触下遍历算法的基础应用：*--1、遍历文件dqml=C: &&需扫描的盘符UseCreate Cursor mylsdbf (wjmc c(120),wjcd N(10),wjrq d,wjshj c(10),wjsx c(6))xGS=1xCD=0Append Blan

有两种 DLL 文件，一种是用 Declare 声明然后调用，这种文件 Copy 了就能用，但不能用智能提示，只能用专门的工具查看里面有什么东西，这种 Dll 一般是用 C 编写的。另外一种是 COM 方式的 Dll ,用 Createobjectex() 或 Createobject() 调用，对象名的两部分组成，也不能直接看出，需要开发者提供，下面就可以用智能提示了。文件要注册（reg

*!*     作者：十豆三*!*     日期：2012-11-05*!*  vfp版本：vfp9.0(SP2 7423)*!* 操作系统：Windows XP(SP3)*!*     功能：鼠标拖动(移动、拖曳)控件方法一：*!*控件的MouseDown事件Lparameters nButton, nShift, nXCoord, nYCoord&&系统代码If

*!*     作者：十豆三*!*     日期：2011-11-15*!*  vfp版本：vfp9.0(SP2 7423)*!* 操作系统：Windows XP(SP3)*!* ANSI：*!*     ANSI字符串我们最熟悉，英文占一个字节，汉字2个字节，以一个\0结尾，常用于txt文本文件*!* Unicode：*!*     Unicode字符串每个字符(汉字

*-- vfp8.0、9.0*--保存1、将图片文件用 Filetostr()转成字符A。2、再用 Strconv("字符A",13)将字符A转成base64编码数据的字符B。3、将字符B保存到SQL Server的Text类型字段或者Access的备注字段。*--还原或显示1、用 Strconv("字符B",14)将base64编码数据还原成未编码的数据字符A。2、用

*!*     作者：十豆三*!*     日期：2011-12-03*!*  vfp版本：vfp9.0(SP2 7423)*!* 操作系统：Windows XP(SP3)*-- 前提：表单具有滚动条，即表单 ScrollBars 属性为 2 或 3*-- 为了测试，在表单添加了多种控件*-- 主要代码在自定义方法 mymousewheel、setmousewheel

ClearldDate=Date()ldDateB={^2004/02/29}ldDateE={^2005/02/28} *--月天数?"月天数",32-Day(ldDate-Day(ldDate)+32) *--月初日期?"月初日期",ldDate-Day(ldDate)+1?"月初日期",Date(Year(ldDate),Month(ldDate)

*!* vfp9.0通过WebBrowser控件获取QQ新闻标题及链接*!*  -------------------------------------------*!*     作者：十豆三*!*     日期：2011-09-17*!*  vfp版本：vfp9.0*!* 控件名称： Microsoft Web Browser(Microsoft Internet Cont

 本示例并没有应用GDI+  Public oform1oform1=Newobject("form1")oform1.ShowReturn Define Class form1 As Form Top = 1Left = 1Height = 500Width = 700ScrollBars = 0DoCreate = .T.ShowTips = .F.Picture = ""

  向表单拖放文件,文件路径及名称显示到列表框中 *------------------------------------------ By:dkfdtf 之前用API实现过，不过这个更简单，利于VFP本身的功能即可。 　 如：在一个表单上加一个List列表框控件 1. 设置此列表框的 OLEDropMode=1 2. 在列表框的 OLEDragOver 事件中写代码： Lparameters

通过在表单或表单内的控件上按下鼠标左键来移动窗口 *（而不是通过在标题栏上按下鼠标左键来移动窗口） *----------------------------------------------- *表单的Init事件代码： Declare Long ReleaseCapture In "user32" Declare Long SendMessageA In "user32" Long HWnd

*--文本文件的编码格式手动查看方法：*--用记事本打开文本后，点击菜单上的“另存为”，编码格式在出现的对话框下方。*--那用VFP如何取得文本文件的编码格式呢，如下：lcFileName=C:/A.txt    &&文本文件名lcStr=Filetostr(lcFileName)lcStrType=Createbinary(Substr(lcStr,1,2))Do Case    Case

因为不建议用汉化版，所以推荐用方法1。方法1、用UltraEdit32修改VFP9CHS.DLL，将字体“Arial”改为“宋体”。   找到下面这一段：    MS Sans Serif.Ar ial.灿砰.Couri er New.Arial.?l? r ?o?S?V?b?N.?W? €???.LPARAMETE   RS p1, p2, p3, p 4, p5, p6, p7, p 8

相关帖子：相关帖子：http://bbs.csdn.net/topics/390255831根据不同分辨率自行调整大小、位置可以用 vfp9.0 的 anchor属性，如果不是 vfp9.0，就需要自己写代码实现左边的树和右边的的容器中间可以左右拖动（分隔条），用 vfp 代码即可。下面是例子代码，将以下代码粘帖到一个prg中后运行，然后左右拖动分隔条，也可最大化或手动改变表单大小