Richtextitem в Dialogbox'e...

Тема в разделе "Lotus - Программирование", создана пользователем fedotxxl, 16 мар 2009.

  1. fedotxxl

    fedotxxl Well-Known Member

    Регистрация:
    9 ноя 2005
    Сообщения:
    614
    Симпатии:
    0
    Можно ли получить содержимое RTI поля, если оно было заполнено в dialogBox'e? задача минимум - получить вложения
     
  2. Akupaka

    Akupaka А че я?.. О.о

    Регистрация:
    4 окт 2007
    Сообщения:
    3.373
    Симпатии:
    2
    ну, в любом случае твой диалог работает с NotesDocument'ом, либо с текущим, либо с указанным.
    т.е. задача сводится к копированию вложений из одного документа в другой.
    недавно похожее было
    http://codeby.net/forum/threads/29013.html
    думаю, что тебе тоже подойдет, если в диалоге другой документ, а если текущий, то тогда особо и мучиться не надо - на форме документа повесить RT-поле с тем же именем, что и на форме диалога и вуаля...
    если, кнешна, я правильно понял суть :)
     
  3. Omh

    Omh Lotus team
    Lotus team

    Регистрация:
    4 июл 2007
    Сообщения:
    2.210
    Симпатии:
    0
    Код (Text):
    Sub Queryclose(Source As Notesuidocument, Continue As Variant)
    On Error Goto Errh

    If Not Source.DialogBoxCanceled Then If Source.EditMode Then Call Source.Refresh(True)

    Exit Sub
    Errh:
    Call ErrHandler
    Exit Sub
    End Sub
    Ну и тут тебе понадобится RichText Lite - классная штука :)
     
  4. ArtieBlack

    ArtieBlack Гость

    Тема "Пропадают аттачи в Rt-поле при отображении формы через Dialogbox".

    Здравствуйте.

    Ув. гуру, занимаюсь программированием в Лотусе меньше месяца, поэтому нужна ваша помощь.

    Вывожу форму для добавления/обновления ответного документа во вьюхе через DialogBox.

    Вешаю на вьюху такой
    <div class="sp-wrap"><div class="sp-head-wrap"><div class="sp-head folded clickable">код</div></div><div class="sp-body"><div class="sp-content">
    Код (LotusScript):
    Sub Queryopendocument(Source As Notesuiview, Continue As Variant)
    Dim ws As New NotesUIWorkspace
    Dim db As NotesDatabase
    Dim doc, doc2 As NotesDocument
    Dim uidoc As NotesUIDocument
    Dim docs As NotesDocumentCollection

    Set docs = source.Documents
    Set doc = docs.GetFirstDocument

    If (ws.DialogBox("fioForm", True, True, False, False, False, False, "Изменить", doc, True, False)) Then
    Call doc.Save(True, False,True)
    End If

    ws.ViewRefresh
    Continue = False
    End Sub
    При повторном открытии формы, в моем поле Rich Text Lite (специально созданном для добавлении аттачей), файлы пропадают. При открытии формы без DialogBox, все приаттаченные файлы отображаются за горизонтальной линией внизу формы. В чем может быть дело?
     
  5. turumbay

    Регистрация:
    13 мар 2009
    Сообщения:
    625
    Симпатии:
    2
    Причин может быть множество, но чаще всего это происходит из-за рассинхрона backend-а и frontend-a.
    Зачем в коде объявлен uidoc , doc2? Там что-то еще делается? Попробуйте на закрытии диалога сделать uidoc.Refresh( true )
    А вообще - локализуйте проблему, исключите влияние внешних факторов:
    создайте пустую базу с одной формой. На форму одно RT-лайт поле. Создайте один документ по форме. И в дефолтную вьюху вставьте свой код. Проблема воспроизводится?
     
  6. Akupaka

    Akupaka А че я?.. О.о

    Регистрация:
    4 окт 2007
    Сообщения:
    3.373
    Симпатии:
    2
    см код в теме выше, там рефреш через уи вызывается
     
Загрузка...

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