Compartilhar via


Interface StatusBar

Representa o Barra de Status na Visual Studio o ambiente de desenvolvimento integrado (IDE).

Namespace:  EnvDTE
Assembly:  EnvDTE (em EnvDTE.dll)

Sintaxe

'Declaração
<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

O tipo StatusBar expõe os membros a seguir.

Propriedades

  Nome Descrição
Propriedade pública DTE Obtém o objeto de extensibilidade de nível superior.
Propriedade pública Parent Obtém o objeto pai imediato de um StatusBar objeto.
Propriedade pública Text Define ou obtém o texto selecionado.

Superior

Métodos

  Nome Descrição
Método público Animate Exibe uma figura animada na StatusBar.
Método público Clear Apaga todo o texto da StatusBar.
Método público Highlight Ativa/desativa o realce do texto dentro do StatusBar.
Método público Progress Cria, modifica e limpa o controle de medição dentro do StatusBar .
Método público SetLineColumnCharacter Define o texto indicadores de coluna e o caractere de StatusBar .
Método público SetXYWidthHeight Define o x, y, largura e indicadores de altura coordenada na StatusBar.
Método público ShowTextUpdates Determina se a StatusBar mostra atualizações de texto.

Superior

Comentários

Existe apenas um StatusBar o objeto no IDE.

Porque este exemplo lista todas as tarefas na momento o TaskList, verifique se ele contém algumas tarefas antes de executar o código.

Exemplos

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

Consulte também

Referência

Namespace EnvDTE