X# Runtime and VO SDK Reference
X# Runtime and SDK Reference
XSharp.VFP
Functions 类
Functions 方法
AClass 方法
ADatabases 方法
ADBObjects 方法
AddBs 方法
AddProperty 方法
ADel 方法
ADLLS 方法
ADOCKSTATE 方法
AElement 方法
AERROR 方法
AEVENTS 方法
AFONT 方法
AGETCLASS 方法
AGetFileVersion 方法
AIns 方法
AINSTANCE 方法
ALANGUAGE 方法
ALen 方法
ALines 方法
AllTrim 方法
AMembers 方法
AMOUSEOBJ 方法
ANetResources 方法
APrinters 方法
APROCINFO 方法
ASELOBJ 方法
ASessions 方法
ASize 方法
ASqlHandles 方法
AStackInfo 方法
ASubScript 方法
At 方法
At_C 方法
ATagInfo 方法
AtC 方法
AtCC 方法
AUsed 方法
AVCXCLASSES 方法
BagCount 方法
BAR 方法
BARCOUNT 方法
BARPROMPT 方法
BINDEVENT 方法
BinToc 方法
BitAnd 方法
BitClear 方法
BitLShift 方法
BitNot 方法
BitOr 方法
BitRShift 方法
BitSet 方法
BitTest 方法
BitXor 方法
Candidate 方法
CapsLock 方法
Cdx 方法
Ceiling 方法
ChrTran 方法
ChrTranC 方法
COMARRAY 方法
COMCLASSINFO 方法
CompObj 方法
COMPROP 方法
COMRETURNERROR 方法
CpConvert 方法
CpCurrent 方法
CpDbf 方法
CREATEBINARY 方法
CreateObject 方法
CreateObjectEx 方法
CreateOffline 方法
CToBin 方法
CToT 方法
CursorGetProp 方法
CursorSetProp 方法
CursorToXML 方法
CurVal 方法
DbAlias 方法
DbAppDelimFox 方法
DbAppendFromArray 方法
DbAppFox 方法
Dbc 方法
DbCopyDelimFox 方法
DbCopyFox 方法
DbCopyStructFox 方法
DbCopyToArray 方法
DbCopyXStructFox 方法
DbGetProp 方法
DbSeekFox 方法
DbSetProp 方法
DbSortFox 方法
DbUseAreaFox 方法
DbUsed 方法
DDEAbortTrans 方法
DDEAdvise 方法
DDEEnabled 方法
DDEExecute 方法
DDEInitiate 方法
DDELastError 方法
DDEPoke 方法
DDERequest 方法
DDESetOption 方法
DDESetService 方法
DDESetTopic 方法
DDETerminate 方法
DefaultExt 方法
Descending 方法
Difference 方法
DisplayPath 方法
DMY 方法
DriveType 方法
DropOffLine 方法
DToT 方法
EDITSOURCE 方法
ERROR 方法
EVENTHANDLER 方法
EVL 方法
Field 方法
FileToStr 方法
Filter 方法
FKLABEL 方法
FKMAX 方法
FldCount 方法
FldList 方法
FontMetric 方法
For 方法
ForceExt 方法
ForcePath 方法
FullPath 方法
FV 方法
GetAutoIncValue 方法
GETBAR 方法
GetColor 方法
GetCp 方法
GetCursorAdapter 方法
GetDir 方法
GetFile 方法
GetFldState 方法
GetFont 方法
GETINTERFACE 方法
GetNextModified 方法
GetObject 方法
GETPAD 方法
GETPEM 方法
GetPict 方法
GetPrinter 方法
GetResultSet 方法
GetWordCount 方法
GetWordNum 方法
GoMonth 方法
HOME 方法
Hour 方法
ICase 方法
Id 方法
IdxCollate 方法
ImeStatus 方法
InDbc 方法
IndexSeek 方法
INKEY 方法
InputBox 方法
InsMode 方法
IsBlank 方法
IsColor 方法
IsExclusive 方法
IsFlocked 方法
ISLEADBYTE 方法
IsMemoFetched 方法
IsMouse 方法
IsNull 方法
IsPen 方法
IsReadOnly 方法
IsRlocked 方法
IsTransactable 方法
JustDrive 方法
JustExt 方法
JustFName 方法
JustPath 方法
JustStem 方法
Key 方法
KeyMatch 方法
LASTKEY 方法
LeftC 方法
LenC 方法
LikeC 方法
LineNo 方法
LoadPicture 方法
LocFile 方法
Lock 方法
Lookup 方法
LTrim 方法
MakeTransactable 方法
Mdx 方法
MDY 方法
MEMORY 方法
MENU 方法
MESSAGE 方法
MessageBox 方法
Minute 方法
MkDir 方法
MRKBAR 方法
MRKPAD 方法
MROW 方法
MToN 方法
MWINDOW 方法
Ndx 方法
NewObject 方法
Normalize 方法
NToM 方法
NumLock 方法
NVL 方法
OBJTOCLIENT 方法
OldVal 方法
ON 方法
Order 方法
PAD 方法
PADPROMPT 方法
PARAMETERS 方法
Payment 方法
PCol 方法
PEMSTATUS 方法
POPUP 方法
Primary 方法
PRINTSTATUS 方法
PRMBAR 方法
PRMPAD 方法
Program 方法
PROMPT 方法
PRow 方法
PrtInfo 方法
PutFile 方法
PV 方法
Quarter 方法
RaiseEvent 方法
RAt 方法
RAtC 方法
RDLEVEL 方法
READKEY 方法
Refresh 方法
RegisterFoxMemVarSupport 方法
Relation 方法
RemoveProperty 方法
Requery 方法
RgbScheme 方法
RightC 方法
RTrim 方法
SavePicture 方法
Scheme 方法
SCOLS 方法
Sec 方法
Seek 方法
SetFldState 方法
SetFoxCollation 方法
SetResultSet 方法
SetTextFile 方法
SetTextMerge 方法
SetTextMergeDelimiters 方法
ShowFoxArray 方法
Sign 方法
SKPBAR 方法
SKPPAD 方法
SqlCancel 方法
SqlColumns 方法
SqlCommit 方法
SqlConnect 方法
SqlDisconnect 方法
SqlExec 方法
SqlGetProp 方法
SqlIdleDisconnect 方法
SqlMoreResults 方法
SqlParameters 方法
SqlPrepare 方法
SqlRollBack 方法
SqlSetFactory 方法
SqlSetProp 方法
SqlStringConnect 方法
SqlTables 方法
SROWS 方法
Str 方法
StrConv 方法
StrExtract 方法
StrToFile 方法
StuffC 方法
SubStrC 方法
Sys 方法
SysMetric 方法
TableRevert 方法
TableUpdate 方法
Tag 方法
TagCount 方法
TagNo 方法
Target 方法
TextMerge 方法
Transform 方法
Trim 方法
TToC 方法
TToD 方法
TxnLevel 方法
TxtWidth 方法
UNBINDEVENTS 方法
Unique 方法
UPDATED 方法
VARREAD 方法
VarType 方法
WBORDER 方法
WCHILD 方法
WCOLS 方法
WDOCKABLE 方法
Week 方法
WEXIST 方法
WFONT 方法
WLAST 方法
WLCOL 方法
WLROW 方法
WMAXIMUM 方法
WMINIMUM 方法
WONTOP 方法
WOUTPUT 方法
WPARENT 方法
WREAD 方法
WROWS 方法
WTITLE 方法
WVISIBLE 方法
XmlToCursor 方法
XmlUpdatefram 方法
点击或拖拽改变大小

Functions.AddProperty 方法

X#
在运行时向对象添加新属性。
您可以使用 AddProperty() 向 X# 对象添加属性和属性值，包括从 X# 类、COM 类和 SCATTER...NAME 命令创建的对象。

命名空间：  XSharp.VFP
程序集：  XSharp.VFP (在 XSharp.VFP.dll 中) 版本：2.22 GA
语法
复制
 FUNCTION AddProperty(
	oObjectName AS Object,
	cPropertyName AS STRING,
	 eNewValue AS USUAL
) AS LOGIC
查看代码

参数

oObjectName
类型：Object
指定要向其添加属性的对象名称。
如果 oObjectName 不是有效的对象，X# 会生成相应的消息。
cPropertyName
类型：String
指定要添加到对象的新属性的名称。
如果您指定的属性名称不存在，该属性将被创建并添加。
eNewValue
类型：__Usual
指定要为新属性设置的值。
如果您省略 eNewValue，并且该属性存在，X# 将保持该属性的值不变。
如果您省略 eNewValue，并且该属性是新增的，X# 将该新属性的值设置为 False (.F.)。

返回值

类型：Boolean
逻辑型。下表描述了 AddProperty( ) 的返回值，以及尝试为对象添加已存在的属性时的行为。
返回值描述
True (.T.) 当 AddProperty( )成功添加属性时:
当新属性是一个数组属性，并且数组已经存在时， AddProperty() 会根据 cPropertyName 指定的维度重新定义数组。 如果您指定了 eNewValue 的值，所有数组元素将被设置为该值。 如果您省略了 eNewValue，所有数组元素将被设置为 False (.F.)。

如果新属性不是数组属性，但现有的属性是一个数组属性。该属性将保持为数组属性，维度相同。 如果您指定了 eNewValue 的值，所有数组元素将被设置为该值。 如果您省略 eNewValue，所有数组元素将被设置为 False(.F.)。

如果新属性不是数组属性，并且现有的属性也不是数组属性或不是只读的 X# 本地(native)属性。 如果您指定了 eNewValue 的值，现有的属性将被设置为该值。 如果您省略 eNewValue，现有的属性值将保持不变。

如果指定的属性已经是对象的成员，但被标记为 Hidden 或 Protected。 X# 将生成错误，"没有找到指定的属性名(错误1734 译者注：VFP 的错误编号)"， 并且该属性的值不会被设置为传递给 AddProperty( ) 的值。
False (.F.) 当 AddProperty( ) 未能成功添加属性时。
如果该属性是一个数组属性，并且现有的属性不是数组属性。现有的属性将保持不变。
备注
您可以使用 AddProperty( ) 为对象创建数组属性。这样做时，如果提供了 eNewValue，每个元素在数组中都将被初始化为 eNewValue 的值。 否则，每个属性在数组中的值将被设置为 False (.F.)。有关为对象创建数组属性的更多信息，请参阅示例部分。

X# 将新属性作为 Public 属性添加。您不能指定该属性为 Protected 或 Hidden。
如果现有的属性是只读的 X# 本地(native)属性，例如 BaseClass 属性，X# 将生成错误，"没有找到指定的属性名(错误1734)"。
如果属性名称无效，例如，属性名称包含空格或其他非法字符，X# 将生成错误，"不正确的属性名(错误1470)"。

对于从本地 X# 类派生的对象实例，AddProperty( ) 将尊重内置 AddProperty 方法的可见性设置。
如果 AddProperty 方法被标记为 Hidden 或 Protected，ADDPROPERTY( ) 不会创建新属性，并返回 False (.F.)。
如果 AddProperty 方法被标记为 Public(默认)，则ADDPROPERTY( ) 将创建属性，并返回 True (.T.)。
这保护了原始类设计。
备注 备注：
这不适用于使用 X# OLEPUBLIC 类创建的 COM 对象。
AddProperty( ) 不适用于 For EACH 命令的对象引用。然而，您可以使用 AddProperty 方法代替。 示例1
下面的示例向使用 SCATTER 命令创建的对象添加新属性。
X#
复制
1Use customers
2SCATTER NAME oCust
3ADDPROPERTY(oCust,"MyProperty")

示例2
下面的示例为对象 oMyForm 创建属性数组，并显示其内容：1 和 "Two"。
X#
复制
1oMyForm = CreateObject('Form')
2ADDPROPERTY(oMyForm, 'MyArray(2)', 1)
3oMyForm.MyArray(2) = "Two"
4Clear
5? oMyForm.MyArray(1)
6? oMyForm.MyArray(2)
参见