共用方式為


ProjectItem 介面

表示專案中的項目。

命名空間:  EnvDTE
組件:  EnvDTE (在 EnvDTE.dll 中)

語法

'宣告
<GuidAttribute("0B48100A-473E-433C-AB8F-66B9739AB620")> _
Public Interface ProjectItem
[GuidAttribute("0B48100A-473E-433C-AB8F-66B9739AB620")]
public interface ProjectItem
[GuidAttribute(L"0B48100A-473E-433C-AB8F-66B9739AB620")]
public interface class ProjectItem
[<GuidAttribute("0B48100A-473E-433C-AB8F-66B9739AB620")>]
type ProjectItem =  interface end
public interface ProjectItem

ProjectItem 類型會公開下列成員。

屬性

  名稱 描述
公用屬性 Collection 取得包含支援此屬性之 ProjectItem 物件的 ProjectItems 集合。
公用屬性 ConfigurationManager 取得這個 ProjectItem 的 ConfigurationManager 物件。
公用屬性 ContainingProject 取得專案裝載ProjectItem。
公用屬性 Document 取得Document聯項目,如果有的話。
公用屬性 DTE 取得最上層的擴充性物件。
公用屬性 Extender 取得所要求之Extender是否適用於這個物件。
公用屬性 ExtenderCATID 取得物件的 Extender 分類 ID (CATID)。
公用屬性 ExtenderNames 取得物件的可用 Extender 清單。
公用屬性 FileCodeModel 取得FileCodeModel之專案項目的物件。
公用屬性 FileCount 取得與相關聯的檔案數目ProjectItem。
公用屬性 FileNames 取得與專案項目相關聯的檔案之完整路徑和名稱。
公用屬性 IsDirty 基礎架構。 僅供 Microsoft 內部使用。
公用屬性 IsOpen 取得指出專案項目是否以特定檢視類型開啟之值。
公用屬性 Kind 取得表示物件種類或類型的 GUID 字串。
公用屬性 Name 取得或設定物件的名稱。
公用屬性 Object 取得可在執行階段以名稱存取的物件。
公用屬性 ProjectItems 取得ProjectItems物件。
公用屬性 Properties 取得與這個物件有關之所有屬性的集合。
公用屬性 Saved 取得或設定值,指出物件自上一次儲存或開啟後是否仍未修改。
公用屬性 SubProject 如果專案項目是根目錄的子專案,然後在SubProject屬性會傳回Project子專案的物件。

回頁首

方法

  名稱 描述
公用方法 Delete 由其專案及儲存區移除該項目。
公用方法 ExpandView 展開的檢視[方案總管]以顯示專案項目。
公用方法 Open 開啟ProjectItem中指定的檢視。
公用方法 Remove 從集合中移除專案項目。
公用方法 Save 儲存專案或專案項目。
公用方法 SaveAs 儲存專案項目。

回頁首

範例

' Before running, create a new project or open an existing project.
Sub ListProj()
   Dim proj As Project = DTE.ActiveSolutionProjects(0)
   Dim win As Window = _
     DTE.Windows.Item(Constants.vsWindowKindCommandWindow)
   ListProjAux(proj.ProjectItems(), 0)
End Sub

Sub ListProjAux(ByVal projitems As ProjectItems, ByVal Level As Integer)
   Dim projitem As ProjectItem
   For Each projitem In projitems
      MsgBox("Project item: " & projitem.Name, Level)
      ' Recurse if the project item has sub-items...
      Dim projitems2 As ProjectItems
      projitems2 = projitem.ProjectItems
      Dim notsubcoll As Boolean = projitems2 Is Nothing
      If Not notsubcoll Then
         ListProjAux(projitems2, Level + 1)
      End If
   Next
End Sub

請參閱

參考

EnvDTE 命名空間

其他資源

控制專案與方案