Partager via


Language.Collection, propriété

Obtient la collection contenant l'objet qui prend en charge cette propriété ou qui est contenu dans cette construction de code.

Espace de noms :  EnvDTE
Assembly :  EnvDTE (dans EnvDTE.dll)

Syntaxe

'Déclaration
ReadOnly Property Collection As Languages
Languages Collection { get; }
property Languages^ Collection {
    Languages^ get ();
}
abstract Collection : Languages with get
function get Collection () : Languages

Valeur de propriété

Type : EnvDTE.Languages
Collection Languages.

Exemples

L'exemple suivant illustre l'utilisation de la propriété Collection.

Pour tester cette propriété :

  1. Définissez un point d'arrêt dans votre application cible.

  2. Exécutez l'application cible en mode débogage.

  3. Lorsque l'application s'arrête sur le point d'arrêt, exécutez le complément.

public static void Collection(DTE dte)
{
    // Setup debug Output window.
    Window w = (Window)dte.Windows.Item(EnvDTE.Constants.vsWindowKindOutput);
    w.Visible = true;
    OutputWindow ow = (OutputWindow)w.Object;
    OutputWindowPane owp = ow.OutputWindowPanes.Add("Collection Property Test");
    owp.Activate();

    EnvDTE.Language language = dte.Debugger.Languages.Item(1);
    owp.OutputString("Number of items in the language collection is " + 
                     language.Collection.Count + ": ");
    foreach(EnvDTE.Language lang in language.Collection)
        owp.OutputString(lang.Name + "  ");
    owp.OutputString("\nEdition of the environment: " + language.DTE.Edition);
    owp.OutputString("\nThe name of the current program: " + 
                     language.Parent.CurrentProgram.Name);
}
Shared Sub Collection(ByRef dte As EnvDTE.DTE)
    Dim language As EnvDTE.Language = dte.Debugger.Languages.Item(1)
    Dim str As String = vbCrLf
    str = "There are " + language.Collection.Count.ToString()
    str += " items in the language collection: "
    For Each lang As EnvDTE.Language In language.Collection
        str += lang.Name + "  "
    Next
    str += vbCrLf + vbCrLf + "Edition of the environment: " + _
           language.DTE.Edition
    str += vbCrLf + vbCrLf + "The name of the current program: " + _
           language.Parent.CurrentProgram.Name
    MessageBox.Show(str, "Language Test - Collection Property")
End Sub

Sécurité .NET Framework

Voir aussi

Référence

Language Interface

EnvDTE, espace de noms

Autres ressources

Comment : compiler et exécuter les exemples de code du modèle objet Automation