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 获取一个 ProjectItems 集合,该集合包含支持此属性的 ProjectItem 对象。
公共属性 ConfigurationManager 获取此 ProjectItem 的 ConfigurationManager 对象。
公共属性 ContainingProject 获取项目承载ProjectItem。
公共属性 Document 获取Document与该项目,如果存在一个关联。
公共属性 DTE 获取顶级扩展性对象。
公共属性 Extender 获取所请求Extender是否可用于此对象。
公共属性 ExtenderCATID 获取对象的扩展程序类别 ID (CATID)。
公共属性 ExtenderNames 获取对象的可用扩展程序的列表。
公共属性 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 命名空间

其他资源

控制项目和解决方案