Не Сворачиваются Категории Во Встроенном Виде

Тема в разделе "Lotus - Программирование", создана пользователем deeeman, 7 мар 2012.

  1. deeeman

    deeeman Well-Known Member

    Регистрация:
    4 дек 2007
    Сообщения:
    382
    Симпатии:
    0
    Привет!

    есть форма, на ней закладки, при переходе к нужной закладке на ней есть встроенный вид.
    он отображается раскрытый. Т е все категории раскрыты по умолчанию.
    галочка стоит в виде "Colllapse ...."

    как победить?
     
  2. nvyush

    nvyush Lotus team
    Lotus team

    Регистрация:
    22 апр 2009
    Сообщения:
    2.317
    Симпатии:
    0
    М.б. поможет @Command( [ViewCollapseAll] ) в PostOpen представления?
     
  3. Medevic

    Medevic Что это ? :)
    Lotus team

    Регистрация:
    10 дек 2004
    Сообщения:
    3.346
    Симпатии:
    2
    Это фича такая.
     
  4. morpheus

    morpheus скриптописец

    Регистрация:
    7 авг 2006
    Сообщения:
    3.927
    Симпатии:
    0
    deeeman
    если будут свёрнуты категории - то во встроенном виде ничего не отобразиться
     
  5. ToxaRat

    ToxaRat Чёрный маг
    Lotus team

    Регистрация:
    6 ноя 2007
    Сообщения:
    3.046
    Симпатии:
    18
    в клиенте 8.5 уже всё нормульно
     
  6. deeeman

    deeeman Well-Known Member

    Регистрация:
    4 дек 2007
    Сообщения:
    382
    Симпатии:
    0
    такая команда во встроенном виде дает ошибку: "Команда не поддерживается"

    как раз 8.5 клиент. но категории развернуты((
    как победить?
     
  7. susinmn

    susinmn Well-Known Member

    Регистрация:
    16 окт 2007
    Сообщения:
    530
    Симпатии:
    8
    1. Во view вторая закладка *Collapse all when database is first opend*
    2. Во вью на Postopen через Win API: для клиентов 8.x.x нажимать *Shift-*, для клиентов <8, зная кол-во категорий, сворачивать категории по отдельности, курсор на категорию и нажимать *-*
     
  8. deeeman

    deeeman Well-Known Member

    Регистрация:
    4 дек 2007
    Сообщения:
    382
    Симпатии:
    0

    и как же нажать программно жать эту чудо кнопку *Shift-*?
    подскажите плиз. очень надо
     
  9. susinmn

    susinmn Well-Known Member

    Регистрация:
    16 окт 2007
    Сообщения:
    530
    Симпатии:
    8
    Во view в (Declarations)
    Код (Text):
    Declare Sub keybd_event Lib "user32.dll" (Byval bVk As Integer, Byval bScan As Integer, Byval dwflags As Long, Byval dwextrainfo As Long)
    в Postopen
    Код (Text):
    Sub Postopen(Source As Notesuiview)
    On Error Resume Next
    Dim s As New NotesSession
    If s.NotesBuildVersion>266 Then
    'keybd_event 120, 0, 0, 0 'нажатие F9, если нужно обновить view
    'keybd_event 120, 0, 2, 0 'отжатие F9, если нужно обновить view

    keybd_event 16, 0, 0, 0 'нажатие Shift
    keybd_event 109, 0, 0, 0 'нажатие "минус"
    keybd_event 16, 0, 2, 0 'отжатие Shift
    keybd_event 109, 0, 2, 0 'отжатие "минус"
    End If
    End Sub
     
  10. deeeman

    deeeman Well-Known Member

    Регистрация:
    4 дек 2007
    Сообщения:
    382
    Симпатии:
    0
    susinmn

    если открывать просто вид, из оутлайна то он сворачивается.
    если открывать форму с закладками на которой расположен встроенный вид, то он не сворачивается... ((

    есть еще способы?
     
Загрузка...

Поделиться этой страницей