StatusBar – rozhraní
Představuje Stavový řádek v Visual Studio integrované vývojové prostředí (IDE).
Obor názvů: EnvDTE
Sestavení: EnvDTE (v EnvDTE.dll)
Syntaxe
'Deklarace
<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
Typ StatusBar zveřejňuje následující členy.
Vlastnosti
Název | Popis | |
---|---|---|
DTE | Získá objekt nejvyšší úrovně rozšiřitelnosti. | |
Parent | Bezprostřední nadřízený objekt získá StatusBar objektu. | |
Text | Nastaví nebo získá vybraný text. |
Nahoru
Metody
Název | Popis | |
---|---|---|
Animate | Zobrazí animovaný obrázek v StatusBar. | |
Clear | Vymaže veškerý text z StatusBar. | |
Highlight | Přepíná zvýraznění textu v rámci StatusBar. | |
Progress | Vytváří, upravuje a odstraní prvek měřidla uvnitř StatusBar . | |
SetLineColumnCharacter | Nastaví text ukazatele sloupec a znak StatusBar . | |
SetXYWidthHeight | Nastaví x, y, šířka a výška souřadnice ukazatele v StatusBar. | |
ShowTextUpdates | Určuje, zda StatusBar aktualizace text se zobrazí. |
Nahoru
Poznámky
Existuje pouze jeden StatusBar objektu v rozhraní IDE.
Vzhledem k tomu, že v tomto příkladu jsou uvedeny všechny úkoly, které jsou nyní v TaskList, přesvědčte se, zda obsahuje některé úkoly před spuštěním kódu.
Příklady
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