点击或拖拽改变大小

Functions.AIns 方法 (__FoxArray, UInt32, UInt32)

X#
将元素插入到一维数组中，或将行或列插入到二维数组中。

命名空间：  XSharp.VFP
程序集：  XSharp.VFP (在 XSharp.VFP.dll 中) 版本：2.22 GA
语法
复制
 FUNCTION AIns(
	ArrayName AS FOXARRAY,
	nElementNumber AS DWORD,
	 nInsertType AS DWORD
) AS DWORD
查看代码

参数

ArrayName
类型：__FoxArray
指定插入元素的数组的名称。
nElementNumber
类型：UInt32
指定新元素、行或列在数组中的插入位置。
要插入一维数组中的元素，包括 ArrayName 和元素编号 nElementNumber，插入位置在元素 nElementNumber 之前。
要插入二维数组中的行，包括 ArrayName 和行编号 nElementNumber，插入位置在行 nElementNumber 之前。
有关通过下标引用数组元素的更多信息，请参见DIMENSION命令。

2
插入二维数组中的列。插入位置在指定的列编号 nElementNumber 之前。
nInsertType
类型：UInt32

返回值

类型：UInt32
数值型
备注
插入元素、行或列到数组中不改变数组的大小；相反，尾随元素、行或列会向数组的末尾移动，并且数组中的最后一个元素、行或列会从数组中被删除。
新插入的元素、行或列会被初始化为假(.F。)。
如果成功插入了元素、行或列，AINS( ) 返回 1。
示例
X#
复制
 1CLOSE DATABASES
 2OPEN DATABASE (HOME(2) + 'Data\testdata')
 3USE customer // 打开客户表
 4
 5SELECT company FROM customer
 6        WHERE country = 'Germany' ;
 7        INTO ARRAY gaCompanies
 8
 9gnCount = _TALLY
10gcName = 'Seven Seas Imports'
11CLEAR
12
13DISPLAY MEMORY LIKE gaCompanies
14
15IF ASCAN(gaCompanies, gcName) = 0 // 搜索公司
16    *** 公司未找到-添加它 ***
17    DIMENSION gaCompanies[gnCount+1,1]
18    = AINS(gaCompanies, gnCount-1)
19    gaCompanies[gnCount-1] = gcName
20ENDIF
21
22DISPLAY MEMORY LIKE gaCompanies
参见