Compartir a través de


Solution2.Properties (Propiedad)

Obtiene una colección de todas las propiedades pertenecientes al objeto Solution2.

Espacio de nombres:  EnvDTE80
Ensamblado:  EnvDTE80 (en EnvDTE80.dll)

Sintaxis

'Declaración
ReadOnly Property Properties As Properties
    Get
Properties Properties { get; }
property Properties^ Properties {
    Properties^ get ();
}
abstract Properties : Properties
function get Properties () : Properties

Valor de propiedad

Tipo: EnvDTE.Properties
Colección de Properties.

Implementaciones

_Solution.Properties

Comentarios

Algunas propiedades se exponen como propiedades de automatización en _Solution o desde objetos que se obtienen por medio de la solución, como el objeto SolutionBuild para las dependencias de compilación.

Ejemplos

Para obtener información sobre cómo ejecutar este código de complemento, vea Cómo: Compilar y ejecutar los ejemplos de código del modelo de objetos de automatización.

En el siguiente ejemplo se muestran todas las propiedades de una solución abierta.

Public Sub OnConnection(ByVal application As Object, _
 ByVal connectMode As ext_ConnectMode, ByVal addInInst As Object, _
 ByRef custom As Array) Implements IDTExtensibility2.OnConnection
    _applicationObject = CType(application, DTE2)
    _addInInstance = CType(addInInst, AddIn)
    PropertiesExample(_applicationObject)
End Sub

Sub PropertiesExample(ByVal dte As DTE2)
    ' This add-in lists all the properties for a solution.
    ' Open a solution in Visual Studio before 
    ' running this example.
    Try
        Dim soln As Solution2 = CType _
        (_applicationObject.Solution, Solution2)
        Dim solnName As String = _
        System.IO.Path.GetFileNameWithoutExtension(soln.FullName)
        Dim props As Properties = soln.Properties
        Dim prop As [Property]
        Dim msg As String = _
        solnName & " has the following properties:" & vbCrLf & vbCrLf
        For Each prop In props
            msg &= prop.Name & " = "
           Try
                msg &= prop.Value.ToString() & vbCrLf
           Catch
                msg &= "(Nothing)" & vbCrLf
            End Try
        Next
        MsgBox(msg)
    Catch ex As System.Exception
        MsgBox(ex.ToString)
    End Try
End Sub
using System.Windows.Forms;
public void OnConnection(object application,
 Extensibility.ext_ConnectMode connectMode, object addInInst,
 ref System.Array custom)
{
    _applicationObject = (DTE2)application;
    _addInInstance = (AddIn)addInInst;
    // Pass the applicationObject member variable to the code example.
    ProjectExample((DTE2)_applicationObject);
}

public void ProjectExample(DTE2 dte)
{
    // This add-in displays the properties in a solution. 
    // Open a solution in 
    // Visual Studio before running this example.
    try
    {
        Solution2 soln = (Solution2)_applicationObject.Solution;
        string solnName = 
System.IO.Path.GetFileNameWithoutExtension(soln.FullName);
        Properties props = soln.Properties;
        string msg = solnName + " has the following properties:\n\n";
        foreach (Property prop in props)
        {
            msg += prop.Name + " = ";
            try
            {
                msg += prop.Value.ToString() + "\n";
            }
            catch
            {
                msg += "(Nothing)\n";
            }
        }
        MessageBox.Show(msg);
    }
    catch(SystemException ex)
    {
        MessageBox.Show("ERROR: " + ex);
    }
}

Seguridad de .NET Framework

Vea también

Referencia

Solution2 Interfaz

Properties (Sobrecarga)

EnvDTE80 (Espacio de nombres)

Otros recursos

Cómo: Compilar y ejecutar los ejemplos de código del modelo de objetos de automatización