Как программно изменить елемент навигатора?

[spartanec]

Подскажите как программно изменить елемент навигатора? Например, я жму по кнопке навигатора и хочу что б после клика ее текст изменился с "Сохранить" на "Закрыть".

 

[alik86]

А Вы точно имеете ввиду "навигатор"? Или всё-таки "панель действий" или "аутлайн"?

 

[spartanec]

Именно навигатор. Вобщем мне на кнопке навигатора (или возле нее каккой то "вычисляемый текст" повесить) нужно вывести кол-во док-тов в неком виде. Вот я и спрашиваю можно ли менять Caption кнопки программно???

 

[alik86]

Э, тогда не стану Вас обманывать. Я в лотус пришёл уже после того, как были придуманы аутлайны и навигаторами не пользуюсь... :lovecodeby:
Но, насколько мне известно, в навигаторе всё, кроме разве что подсветки, статично.

 

[ToxaRat]

Examples: SetNamedElement method 

This example adds a new entry named Home under the first parent entry in the "Web site" outline and sets the entry to the "Home" page design element.
Sub Initialize
Dim session As New NotesSession
Dim db As NotesDatabase
Dim outline As NotesOutline
Dim oe As NotesOutlineEntry
Dim existingOE As NotesOutlineEntry
Set db = session.CurrentDatabase
Set outline = db.GetOutline("Web site")
Set existingOE = outline.GetFirst
Set oe = outline.CreateEntry("Home", _
existingOE, True, True)
Call oe.SetNamedElement(db, "Home", OUTLINE_CLASS_PAGE)
Call outline.AddEntry(oe)
Call outline.Save()
End Sub

 

[alik86]

Дык гэта ж для аутлайна...

 

[spartanec]

Пошерстил литературку - действительно для навигатора все статично - одно единственное событие "Click"
Спасибо, буду что-то думать

 

[Omh]

Да выпили навигратор на свалку истории, сразу станет легче дышать

 

[ToxaRat]

Да выпили навигратор на свалку истории, сразу станет легче дышать

+1

 

[spartanec]

Ок! Просто база старая (еще 4.х диз-нером писалсь), а мне чуть ее подкорректить надо было