StatusBar – rozhraní

Článek
05/16/2015

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

Viz také

Referenční dokumentace

EnvDTE – obor názvů

Share via