aVCXclasses( ) 函式
將有關一個類庫中類的信息放在一個數組中。
語法
AVCXCLASSES(ArrayName, cLibraryName)
返回值類型
數值型
參數
ArrayName
指定數組的名稱,在該數組中存放類的信息。如果所指定的數組不存在,Visual FoxPro會自動創建該數組。如果該數組存在,但是大小不足以容納類名和基類,則 VisualFoxPro 自動增加該數組的大小。如果該數組比所需的要大,則 Visual FoxPro 會截短該數組。
數組為類庫中的每個類包含一行,而且每行包含 11 列,其中包含有關該類的信息。下表列出了每列中的類信息。
列 類信息 .vcx 欄位名
1 類名。 OBJNAME
2 該類的基類。 BASECLASS
3 該類的父類名。 CLASS
4 父類庫的相對路徑和檔案名稱。 CLASSLOC
5 一個自定義類圖示點陣圖的相對路徑和檔案名稱。 RESERVED4
6 一個自定義項目管理器或類瀏覽器的類圖示的相對路徑和檔案名稱。 RESERVED5
7 類的 ScaleMode 設定,像素。 RESERVED6
8 類的說明。 RESERVED7
9 類的 #INCLUDE 檔案的相對路徑和檔案名稱。 RESERVED8
10 類的用戶定義信息。 USER
11 如果該類是 OLEPUBLIC,則為邏輯“真” (.T.),否則為邏輯“假” (.F.)。 RESERVED2
cLibraryName
指定類庫的名稱,AVCXCLASSES() 將類信息放在 ArrayName 指定的數組中。cLibraryName 可以包含該類庫的路徑。如果所指定的類庫不存在,會造成一個 錯誤。
說明
AVCXCLASSES() 返回數組的行數(即類庫中的類數)。
avcxclasses( ) 函式示例
下面的示例用 avcxclasses() 創建並充填了一個名為燼classes 的數組,它的名稱和基類位於buttons 類庫中。display memory 在主 visual foxpro 視窗中列出了數組的內容。
activate screen
clear
? avcxclasses(aclasses, '\vfp\samples\classes\buttons.vcx')
*** 顯示 5
for ncolcount = 1 to alen(aclasses,2) && 在列中循環
? aclasses(1, ncolcount) && 第1類的每一列
next
*** 顯示如下
* cmdcancel
* CommandButton
* cmdok
* buttons.vcx
* cancel.bmp
* cancel.bmp
* pixels
* release form or form set
*
*
* .f.