StatusBar – rozhraní

Článek
08/11/2011

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

Na začátek

Metody

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

Na začátek

Poznámky

Je pouze jedna StatusBar objektu v IDE.

Protože tento příklad uvádí všechny úkoly v TaskList, ujistěte se, že 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é

Odkaz

EnvDTE – obor názvů

Sdílet prostřednictvím