StatusBar, interface
Représente la Barre d'état dans l'environnement de développement intégré (IDE) Visual Studio.
Espace de noms : EnvDTE
Assembly : EnvDTE (dans EnvDTE.dll)
Syntaxe
'Déclaration
<GuidAttribute("C34301A1-3EF1-41D8-932A-FEA4A8A8CE0C")> _
Public Interface StatusBar
[GuidAttribute("C34301A1-3EF1-41D8-932A-FEA4A8A8CE0C")]
public interface StatusBar
[GuidAttribute(L"C34301A1-3EF1-41D8-932A-FEA4A8A8CE0C")]
public interface class StatusBar
[<GuidAttribute("C34301A1-3EF1-41D8-932A-FEA4A8A8CE0C")>]
type StatusBar = interface end
public interface StatusBar
Le type StatusBar expose les membres suivants.
Propriétés
Nom | Description | |
---|---|---|
DTE | Obtient l'objet d'extensibilité de niveau supérieur. | |
Parent | Obtient l'objet parent immédiat d'un objet StatusBar. | |
Text | Définit ou obtient le texte sélectionné. |
Début
Méthodes
Nom | Description | |
---|---|---|
Animate | Affiche une image animée dans la StatusBar. | |
Clear | Efface tout le texte de la StatusBar. | |
Highlight | Active et désactive la mise en surbrillance du texte dans la StatusBar. | |
Progress | Crée, modifie ou supprime la barre de progression dans la StatusBar. | |
SetLineColumnCharacter | Définit les indicateurs de la colonne de texte et des caractères dans la StatusBar. | |
SetXYWidthHeight | Définit les indicateurs de coordonnées x, y ainsi que les coordonnées de largeur et de hauteur dans la StatusBar. | |
ShowTextUpdates | Détermine si la StatusBar affiche les mises à jour de texte. |
Début
Notes
Il n'y a qu'un seul objet StatusBar dans l'environnement de développement intégré.
L'exemple suivant répertorie toutes les tâches courantes figurant dans la TaskList. Vous devez donc vous assurer que plusieurs tâches figurent dans votre liste de tâches avant d'exécuter le code.
Exemples
Sub StatusBarExample()
' Create object references and initialize variables.
Dim SBar As StatusBar
Dim TList As TaskList
Dim TItems As TaskItems
Dim TI As TaskItem
Dim count As Long
Dim i As Long
SBar = DTE.StatusBar
' Get references to Task List.
TList = DTE.Windows().Item(Constants.vsWindowKindTaskList).Object
TItems = TList.TaskItems
i = 1
count = TItems.Count
' Loop through Task List items, updating progress bar for each item.
For Each TI In TItems
SBar.Progress(True, TI.Description, i, count)
SBar.SetLineColumnCharacter(i, count, 0)
i = i + 1
MsgBox("Task: " & i - 1 & vbCr & "Description: " & TI.Description & vbCr & "Next task item...")
Next
' All done, so get rid of the bar.
SBar.Progress(False)
End Sub