Sdílet prostřednictvím


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
Veřejná vlastnost DTE Načtení objektu nejvyšší úrovně rozšiřitelnosti.
Veřejná vlastnost Parent Získá bezprostřední nadřízený objekt StatusBar objektu.
Veřejná vlastnost Text Nastaví nebo získá vybraného textu.

Nahoru

Metody

  Název Popis
Veřejná metoda Animate Animovaný obrázek ve zobrazí StatusBar.
Veřejná metoda Clear Vymaže veškerý text z StatusBar.
Veřejná metoda Highlight Přepíná zvýraznění textu v rámci StatusBar.
Veřejná metoda Progress Vytvoří, změní a vymaže kontrolu měřidla uvnitř StatusBar .
Veřejná metoda SetLineColumnCharacter Nastaví text sloupce a znak ukazatelů StatusBar .
Veřejná metoda SetXYWidthHeight Nastaví x, y, šířka a výška souřadnice ukazatele v StatusBar.
Veřejná metoda ShowTextUpdates Určuje, zda StatusBar zobrazí text aktualizace.

Nahoru

Poznámky

Je pouze jedna StatusBar objektu v IDE.

Protož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

Viz také

Referenční dokumentace

EnvDTE – obor názvů