Vfp 9 函数

Vfp 9 函数

Ntom(n)：数值TO 货币

GETPICT([cFileExtensions] [, cFileNameCaption] [, cOpenButtonCaption])

：返回你选择的图形文件名； cFileExtensions :文件类型：1：单一扩展名（如：Bmp），2：通配符*和?，（如：？x），3：空串 (\，显示所有的图形文件

cFileNameCaption：文本框上方显示的标题，省略 cFileNameCaption 时，将显示“文件名” cOpenButtonCaption：指定“确定(OK)”按钮的标题。

FILETOSTR(cFileName)：将一个文件的内容返回为一个字符串

返回的字符串可以很大。可用内存或硬盘的空间大小决定了是否可以将该字符串保存到一个变量、数组元素或备注字段中；Visual FoxPro 中字符字段限制为 254 个字符。

例： VFP9:

&& 表1 中“图片”是备注型字段，图片支持多种格式 BMP，JPG，GIF，TIF，PNG......

&& 保存图片到备注型字段 LOCAL cFile, cStr IF !USED('表1') USE 表1 IN 0 ENDIF

cFile = GETPICT() IF EMPTY(cFile) RETURN ENDIF

SELECT 表1

REPLACE 图片 WITH FILETOSTR (cFile) IN 表1

&& 显示图片

thisform.image1.PictureVal = 表1.图片

VFP6 的话，将会很烦，因为没有 FILETOSTR() 函数，所以要调用低级文件函数，又由于 VFP6 image 控件没 PictureVal 属性，所以只能单一支持 BMP 或 JPG 文件显示

JUSTSTEM(cFileName): 从包含完整路径和文件名中返回文件根名(扩展名前的文件名)。cFileName 最大长度是 259 字节

请参阅

ADDBS( ) 函数 JUSTDRIVE( ) 函数 DEFAULTEXT( ) 函数 JUSTEXT( ) 函数 FILE( ) 函数 JUSTFNAME( ) 函数 FORCEEXT( ) 函数 JUSTPATH( ) 函数 FORCEPATH( ) 函数

FORCEPATH(cFileName, cPath)：新路径

FORCEEXT(cFileName, cExtension)：替换原有扩展名 DEFAULTEXT(cFileName, cDefault)：添上扩展名 JUSTDRIVE(cPath)：获得cPath（完整路径名）的驱动器 JUSTEXT(cPath)：获得扩展名，cPath最大长度是259字节

JUSTFNAME(cFileName)：返回文件名，cFileName：带有或不带有路径或扩展名

ADDBS(cPath)：一个路径表达式添加一个反斜杠（如果必要，如：ADDBS( \ FILE(cFileName [, nFlags])：nFlags：0：SH文件返回假；1：文件存在就返回真。 FULLPATH(cFileName1 [, nMSDOSPath | cFileName2])：回第一个文件相对于第二个

文件的路径

SYS(2014, cFileName [, Path]): 返回一个指定文件相对于当前或指定目录的最小路径,

可以用 SET DEFAULT 来改变当前目录

DBF([cTableAlias | nWorkArea])

CDX(nIndexNumber [, nWorkArea | cTableAlias]) MDX(nIndexNumber [, nWorkArea | cTableAlias]) NDX(nIndexNumber [, nWorkArea | cTableAlias])

TAG([CDXFileName[, nTagNumber[, nWorkArea | cTableAlias]]]): 返回打开的

复合索引文件(.cdx)的标识名，或者返回打开的单项索引(.idx)文件的文件名

SYS(14, nIndexNumber [, nWorkArea | cTableAlias]): 返回一个打开的单项索引文件 .idx 的索引表达式，或者返回复合索引文件 .cdx 中索引标识的索引表达式。; nIndexNumber :索引序号（首先从单项索引文件，其次返回结构复合索引，最后返回所有打开的独立复合索引）以标识在索引中被创建的顺序来返回索引表达式

KEY([CDXFileName,] nIndexNumber [, nWorkArea | cTableAlias])