villy писал(а) 08. Июня 2006 :: 10:36:

Прошу прощения за ламерство а как эту панельку отображать/убирать по нажатию комбинации клавиш?

Скриптик в аттаче позволяет включать/выключать любую панель. У меня ToggleUsefulPanel() повешено на Ctrl-` - оч удобно (мне).  В Шорткаты.vbs есть ещё кучка переключателей на разные панели, из наиболее употребительных ToggleSyntaxHelper() (у меня на Alt-F1) и ToggleOutPutWindow()  (Ctrl-Z)

Код

' Пример скрипта, демонстрирующий добавленное свойство PanelVisible
' Данные макросы переключают видимость различных панелей.
' В качестве имени панели используется ее заголовок.
' Также можно менять видимость обычных панелей инструментов

Sub TogglePanel(PanelName)
	Windows.PanelVisible(PanelName)=Not Windows.PanelVisible(PanelName)
End Sub

Sub ToggleSyntaxHelper()
	TogglePanel "Синтакс-Помощник"
End Sub

Sub ToggleOutPutWindow()
	TogglePanel "Окно сообщений"
End Sub

Sub TogleSearchWindow()
	TogglePanel "Список найденных вхождений"
End Sub

Sub TogleStdToolbar()
	TogglePanel "Стандартная"
End Sub

Sub TogleToolbar0() ' Alt-0
	TogglePanel "Панель"
End Sub

Sub TogleToolbar1()	' Alt-1
	TogglePanel "Панель1"
End Sub

Sub TogleToolbar2()	' Alt-2
	TogglePanel "Панель2"
End Sub

Sub TogleToolbar3()	' Alt-3
	TogglePanel "Панель3"
End Sub

Sub TogleToolbar4()	' Alt-4
	TogglePanel "Панель4"
End Sub

Sub TogleToolbar5()	' Alt-5
	TogglePanel "Панель5"
End Sub

Sub TogleToolbar6()	' Alt-6
	TogglePanel "Панель6"
End Sub

Sub TogleToolbar7()	' Alt-7
	TogglePanel "Панель7"
End Sub

Sub TogleToolbar8()	' Alt-8
	TogglePanel "Панель8"
End Sub

Sub TogleToolbar9()	' Alt-9
	TogglePanel "Панель9"
End Sub