DbServer.OrderIsUnique 方法 (__Usual, String) | |
返回给定 order 的唯一标志状态。
命名空间:
XSharp.VO.SDK
程序集:
XSharp.VORDDClasses (在 XSharp.VORDDClasses.dll 中) 版本:2.22 GA
语法 VIRTUAL METHOD OrderIsUnique(
uOrder AS USUAL,
cTarget AS STRING
) AS LONG
public virtual int OrderIsUnique(
__Usual uOrder,
[DefaultParameterValueAttribute("", 0)] string cTarget
)
查看代码参数
- uOrder
- 类型:__Usual
order 的名称或表示其在 order 列表中的位置的数字。使用 order 名称是首选方法,因为使用多个 order 文件时,位置可能难以确定。
如果省略或为 NIL,则假定为控制 order。
指定无效值将引发运行时错误。
- cTarget
- 类型:String
索引文件的名称,包括可选的驱动器和目录(不应指定扩展名)。
使用此参数和 uOrder 消除当不同索引文件中有两个或多个同名 order 时的歧义。
如果当前进程未打开 cTarget,则会引发运行时错误。
返回值
类型:
Int32
指定 order 的唯一标志状态作为逻辑值。
示例
此示例显示使用各种 order 的 DBServer:OrderIsUnique() 的返回值:
1oDBCust := Customer{}
2oDBCust:CreateOrder("Last", "Customer", "oDBCust:LastName",, TRUE)
3oDBCust:CreateOrder("First", "Customer", "oDBCust:FirstName")
4oDBCust:CreateIndex("j:\test\tmp\age", "oDBCust:Age",, TRUE)
5oDBCust:SetOrder("Last")
6? oDBCust:OrderIsUnique()
7? oDBCust:OrderIsUnique("First")
8? oDBCust:OrderIsUnique("Age")
参见