Помогите с Notesrichtextitem

12.04.2010, 14:47. **Показов** 18281. **Ответов** 10

Студворк — интернет-сервис помощи студентам

Уважаемые помогите разобраться в чем проблема:
Вопрос вот в чем, на форме есть поле ViewListPredobr - RichText

по открытию диалога выбираю документы и при нажатии Ok хочу получить следующее

Документ -> ссылка
Документ -> ссылка
.............................
Документ -> ссылка

Вот код Action

Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
Sub Click(Source As Button)
Dim session As New NotesSession
Dim workspace As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Dim collection As NotesDocumentCollection
Dim rtitem As NotesRichTextItem
Dim doc As NotesDocument
 
Set uidoc = workspace.CurrentDocument
 
Set collection = workspace.PickListCollection( _
PICKLIST_CUSTOM, _
True, _
session.CurrentDatabase.Server, _
session.CurrentDatabase.FilePath, _
"PovtorObr", _
"Обращения заявителя - "&uidoc.Document.GetItemValue ("JobPlace")(0), _
"Пожалуйста выберите предыдущие обращения:",_
uidoc.Document.GetItemValue ("JobPlace")(0))
If collection.Count = 0 Then
Messagebox "Действоие отменено пользователем" ,, _
"Сообщение"
Else
Set doc = collection.GetFirstDocument()
Set rtitem = New NotesRichTextItem( uidoc.Document, "ViewListPredobr" )
While Not(doc Is Nothyng)
Call rtitem.AddNewline(1)
Call rtitem.AppendText( "Документ ->")
Call rtitem.AppendDocLink( doc,"" )
Set doc = collection.GetNextDocument(doc)
Wend
End If
End Sub

@omykotymx · 12.04.2010, 14:54

Если по-простому, то РТитем на лету в УИ не делается. Надо сохранить и переоткрыть документ.

@mvyush · 12.04.2010, 14:55

nik3528
По-моему, после Wend не хватает UIdoc.document.save true, true

12.04.2010, 14:55

А пробовали сохранять и переоткрывать документ? Если не ошибаюсь, то изменения в полях RichTextItem, отображаются только после сохранения и переоткрытия дока.

12.04.2010, 15:04

А чем можно заменит RichText чтобы получить такой результат?

@mvyush · 12.04.2010, 15:05

Сообщение от nik3528

А чем можно заменит RichText чтобы получить такой результат?

Ничем

Но можно глянуть сюда:
Обновление Rtfield

@hosm · 12.04.2010, 16:17

переоткрывайте...
ну, или можно с натяжкой заменить на вычисляемый pass-thru html, где есть html-ссылка на документ через аналог notesUrl в обычном текстовом поле, если размер не перевалит за 32К :D

@Omh · 12.04.2010, 16:27

Обалдеть! На форуме новая женщина: Nalula!

Это оффтопик, а по теме - сохранение + переоткрытие документа решит проблему.

12.04.2010, 16:45

Непонятно то, что даже при добавлении строчки

Code
1
uidoc.document.save true,true

и переоткрытия документа поле пустое
а в debug Source items - поле занчение в VAlue есть - :D

@Omh · 12.04.2010, 16:51

Надо бекграунд док сохранять, ты же туда добавляешь.
Что-то типа

Code
1
2
3
4
5
Call Doc.Save(True, False)
Call Doc.ReplaceItemValue("SaveOptions", "0")
Call uidoc.Close
Тут Перевыбираешь документ из базы, например, из view
Call ws.EditDocument(True, Doc)

И код давали парой постов выше

@hosm · 12.04.2010, 17:15

nvy, извини, не заметила, что ты указал - повторилась ;)
я все-таки добавила замечание про форму, мы как-то общались)

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11680&d=1772460536 Одним из. . .	Реалии Hrethgir 01.03.2026 Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .	Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .	SDL3 для Web (WebAssembly): Сборка библиотек: SDL3, Box2D, FreeType, SDL3_ttf, SDL3_mixer и SDL3_image из исходников с помощью CMake и Emscripten 8Observer8 27.02.2026 Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами 8Observer8 20.02.2026 Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .	Конвертировать закладки radiotray-ng в m3u-плейлист damix 19.02.2026 Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .	Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI Eddy_Em 18.02.2026 Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .	Камера Toupcam IUA500KMA Eddy_Em 12.02.2026 Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .

@omykotymx 0 / 0 / 0 Регистрация: 06.04.2008 Сообщений: 151
	12.04.2010, 14:54
	Если по-простому, то РТитем на лету в УИ не делается. Надо сохранить и переоткрыть документ. 0

@mvyush 0 / 0 / 0 Регистрация: 19.04.2009 Сообщений: 2,219
	12.04.2010, 14:55
	nik3528 По-моему, после Wend не хватает UIdoc.document.save true, true 0

motuto
	12.04.2010, 14:55
	А пробовали сохранять и переоткрывать документ? Если не ошибаюсь, то изменения в полях RichTextItem, отображаются только после сохранения и переоткрытия дока.

myk3528
	12.04.2010, 15:04
	А чем можно заменит RichText чтобы получить такой результат?

@hosm 0 / 0 / 0 Регистрация: 15.05.2009 Сообщений: 1,454
	12.04.2010, 16:17
	переоткрывайте... ну, или можно с натяжкой заменить на вычисляемый pass-thru html, где есть html-ссылка на документ через аналог notesUrl в обычном текстовом поле, если размер не перевалит за 32К :D 0

@Omh 0 / 0 / 1 Регистрация: 30.06.2007 Сообщений: 2,153
	12.04.2010, 16:27
	Обалдеть! На форуме новая женщина: Nalula! Это оффтопик, а по теме - сохранение + переоткрытие документа решит проблему. 0

@hosm 0 / 0 / 0 Регистрация: 15.05.2009 Сообщений: 1,454
	12.04.2010, 17:15
	nvy, извини, не заметила, что ты указал - повторилась ;) я все-таки добавила замечание про форму, мы как-то общались) 0