Форум программистов, компьютерный форум, киберфорум
Наши страницы
Lotus Notes/Domino: Программирование
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/144: Рейтинг темы: голосов - 144, средняя оценка - 4.60
Romom66
0 / 0 / 0
Регистрация: 30.03.2008
Сообщений: 21
1

Rich Text

15.04.2008, 17:27. Просмотров 26009. Ответов 18
Метки нет (Все метки)

Подскажите как определить сколько уже строк в поле типа Rich Text?
0
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
15.04.2008, 17:27
Ответы с готовыми решениями:

Rich Text
А как из одного поля с форматом RichText при помощи формул скопировать в другое поле RichText текст...

Preview и Rich Text
Доброго времени суток всем! Много всего написано про Превью, однако мне так и не удалось...

Копировать Rich Text
Есть-ли возможность скопировать через @-формулы значение поля типа "Rich text" из одного документа...

Копирование в Rich Text
Дорый день! Нужно копировать с одного документа в другой аттачи. Из ричтекста в ричтекст. Тут...

Rich Text Lite
Есть карточки юзеров с их фотками, которые хранятся в поле Rich Text Lite, только Photos Как мне...

18
otyxomdyr (sryz)
0 / 0 / 0
Регистрация: 13.03.2008
Сообщений: 234
15.04.2008, 18:06 2
Бери текст, бей на массив с разделителем переноса строки (Char(13)), смотри сколько в массиве значений + 1.
0
Yokov
0 / 0 / 0
Регистрация: 08.02.2007
Сообщений: 206
16.04.2008, 10:53 3
Alexander (Criz), как быть, если в поле хранится более 64K текста?
Лучше использовать NotesRichTextNavigator. Вот пример:

Код
Dim body As NotesRichTextItem
Dim navigator As NotesRichTextNavigator
Dim paragraphCount As Long
... set body
Set navigator = body.CreateNavigator()
If navigator.FindFirstElement(RTELEM_TYPE_TEXTPARAGRAPH) Then
paragraphCount = 1
While navigator.FindNextElement(RTELEM_TYPE_TEXTPARAGRAPH)
paragraphCount = paragraphCount + 1
Wend
Else
paragraphCount = 0
End If
Но этот способ можно использовать с оговоркой, что в каждом параграфе содержится только одна строка, то есть перевод строки осуществлялся вызовом метода notesRichTextItem.AddNewLine(1, True), а не notesRichTextItem.AddNewLine(1, False).
0
Somdr
0 / 0 / 0
Регистрация: 19.07.2007
Сообщений: 1,098
16.04.2008, 10:56 4
Yakov
Не вижу проблемы ограничания в посте Alexander (Criz)... вычисления де не в поле производится будут...
0
16.04.2008, 10:56
Yokov
0 / 0 / 0
Регистрация: 08.02.2007
Сообщений: 206
16.04.2008, 11:05 5
Sandr
Точно. Ступил.

Хм. А тогда, а как будет в поле более 16K строк! :D
0
Romom66
0 / 0 / 0
Регистрация: 30.03.2008
Сообщений: 21
16.04.2008, 12:58 6
Цитата Сообщение от Alexander (Criz)
Бери текст, бей на массив с разделителем переноса строки (Char(13)), смотри сколько в массиве значений + 1.
типа такого что ли : @Word(test1;@Char(13);1)
Попробовал - дает какую то ерунду
0
Somdr
0 / 0 / 0
Регистрация: 19.07.2007
Сообщений: 1,098
16.04.2008, 13:03 7
Roman66
@Elements(@Explode(test1;@Char(13)))
0
Omh
0 / 0 / 1
Регистрация: 30.06.2007
Сообщений: 2,153
16.04.2008, 13:04 8
Roman66
Скорее что-то вроде


Код
Dim Item As NotesItem
Set Item = Doc.GetFirstItem("RTItemName")

Dim Tmp As String
Tmp = Item.Text

Dim rows As Long
rows = Ubound(Split(Tmp, Chr(13))) + 1
Можно Chr(10) попробовать, я не помню, что там точно...
0
Romom66
0 / 0 / 0
Регистрация: 30.03.2008
Сообщений: 21
16.04.2008, 13:27 9
Цитата Сообщение от Sandr
Roman66
@Elements(@Explode(test1;@Char(13)))
Результат тот же - не то!

test1=Флюорография легких (17.06.2007) (0,06)
Флюорография легких (15.04.2008) (0,06)
Флюорография легких (15.04.2006) (0,06)
0
Somdr
0 / 0 / 0
Регистрация: 19.07.2007
Сообщений: 1,098
16.04.2008, 13:30 10
Roman66
сори

@Elements(@Explode(test1;@NewLine))
0
Romom66
0 / 0 / 0
Регистрация: 30.03.2008
Сообщений: 21
16.04.2008, 15:05 11
Цитата Сообщение от Sandr
Roman66
сори

@Elements(@Explode(test1;@NewLine))
эта формула не подходит . текст строки test1=Флюорография легких (17.06.2007) (0,06)
Флюорография легких (15.04.2008) (0,06)
0
Omh
0 / 0 / 1
Регистрация: 30.06.2007
Сообщений: 2,153
16.04.2008, 15:09 12
Roman66
LotusScriptовую процедуру попробовать не хочешь?
Нафига собаки при работе с ричтекстом?
0
Romom66
0 / 0 / 0
Регистрация: 30.03.2008
Сообщений: 21
16.04.2008, 15:19 13
Цитата Сообщение от Omh
Roman66
LotusScriptовую процедуру попробовать не хочешь?
Нафига собаки при работе с ричтекстом?
Есть форма с заполненным полем test1 - Тип данных: Форматируемый текст .
На этой форма есть кнопка по которой открывается форма для печати где значения полей этой формы я должен вытащить из test1.
Вот этого я и не могу сделать. У меня не получается. А печатная форма она в лотусевой базе не сохраняется и все поля в ней вычисляемые почти.
0
Yokov
0 / 0 / 0
Регистрация: 08.02.2007
Сообщений: 206
16.04.2008, 15:36 14
Roman66
Какой результат?
Пока документ не сохранен, поле типа Rich Text не обновится.



Цитата Сообщение от Roman66
А печатная форма она в лотусевой базе не сохраняется и все поля в ней вычисляемые почти.
На QueryOpen печатной формы сделайте что нужно. Или в коде кнопки создания печатной формы.
0
Somdr
0 / 0 / 0
Регистрация: 19.07.2007
Сообщений: 1,098
16.04.2008, 15:41 15
а кроме текста там еще что-то есть?
Порпобуйте перед разбивкой на масив сделать @Abstract
0
Romom66
0 / 0 / 0
Регистрация: 30.03.2008
Сообщений: 21
16.04.2008, 16:04 16
Да это поле формируется так: ссылка на документ + Флюорография легких (17.06.2007) (0,06)
ссылка на документ + Флюорография легких (15.04.2008) (0,06) и т.д.
0
Somdr
0 / 0 / 0
Регистрация: 19.07.2007
Сообщений: 1,098
16.04.2008, 16:10 17
Roman66
дык абстракт применить обязательно надо!
0
Romom66
0 / 0 / 0
Регистрация: 30.03.2008
Сообщений: 21
16.04.2008, 16:33 18
Цитата Сообщение от Sandr
Roman66
дык абстракт применить обязательно надо!
не пользовался никогда
Подскажи плиз!

@Abstract([TextOnly];15360;"";"test1") написал так вроде работает эта формула как надо
0
Somdr
0 / 0 / 0
Регистрация: 19.07.2007
Сообщений: 1,098
17.04.2008, 10:33 19
Roman66
сойдет.. а если работает все, то вообще замечательно :(
0
17.04.2008, 10:33
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
17.04.2008, 10:33

Rich Text поля
Добрый день! Подскажите, как внести изменеия в поле: есть Richtext поле, мне необходимо в начале...

полем "rich Text", помогоите
Нужно сделать форму в которой есть поля которые могут редактировать все, а есть поля для одних...

Добавление Таблицы Rich Text
Здравствуйте, лотусисты! Создаю программно таблицу в rich text. Две проблемы: 1. Не могу поместить...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
19
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.