Interface StatusBar
Representa Barra de Status no ambiente de desenvolvimento integrado Visual Studio (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 | |
---|---|---|
DTE | Obtém o objeto de nível superior de extensibilidade. | |
Parent | Obtém o objeto pai imediato de um objeto de StatusBar . | |
Text | Os conjuntos ou obtêm o texto selecionado. |
Superior
Métodos
Nome | Descrição | |
---|---|---|
Animate | Exibe uma imagem animado em StatusBar. | |
Clear | Limpa qualquer texto de StatusBar. | |
Highlight | Ativa /desativar realce de texto dentro de StatusBar. | |
Progress | Criar, modificar, e limpa o controle de métricas dentro de StatusBar . | |
SetLineColumnCharacter | Define os indicadores de coluna e de caracteres de texto em StatusBar . | |
SetXYWidthHeight | Define o x, y o, a largura, e os indicadores de coordenadas da altura em StatusBar. | |
ShowTextUpdates | Determina se StatusBar mostra atualizações de texto. |
Superior
Comentários
Há apenas um objeto de StatusBar no IDE.
Como este exemplo lista todas as tarefas atualmente em TaskList, certifique-se de que 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