Isempty (rtitem.embeddedobjects) врет

yerke

Well-known member
28.08.2007
392
0
#1
не знаю почему
но IsEmpty (rtitem.EmbeddedObjects) врет
всегда возращает TRUE
хотя rtitem содержит EmbeddedObjects

эти EmbeddedObjects не атачи
а созданные в самом rtitem объекты
то есть те же объекты ms equation

после того как сохранить и переоткрыть этот док
то объекты ms equation воспринимаются как рисунки

дорогой Medevic
думаю тока ты ответишь на этот вопрос

почему
IsEmpty (rtitem.EmbeddedObjects) всегда возращает TRUE
 

Medevic

Что это ? :)
Lotus team
10.12.2004
3 346
1
#2
Ну это понятно почему. Ты сам пишешь, что они превращаются в картинки. Т.е. они перестают быть внедренными объектами.
Поэтому IsEmpty не врет.
Проблема в том, почему они становятся картинками.
MS Equation сама по себе глючная штука. Формулы в самом ворде частенько превращались в картинки. Так что не думаю, что это глюк лотуса.

<!--QuoteBegin-yerke+7:12:2007, 14:00 -->
<span class="vbquote">(yerke @ 7:12:2007, 14:00 )</span><!--QuoteEBegin-->дорогой Medevic
думаю тока ты ответишь на этот вопрос
[snapback]88907" rel="nofollow" target="_blank[/snapback]​
[/quote]
:)
 
R

root

#3
Для: yerke
isEmpty - возвращает true только когда обьект имеет тип вариант
 

morpheus

скриптописец
07.08.2006
3 915
1
#4
Раз у ж на то пошло... то обькт нельзя подставлять .. IsEmpty работает ТОЛЬКО с переменными... не путать обьект и переменную

Попробуйте проверять IsObject
 

yerke

Well-known member
28.08.2007
392
0
#5
EmbeddedObjects дока тоже пусто

hasEmbedded дока тоже возращает false

то есть никак нельзя решить эту проблему
а картинки в рт поле не являются объектами
 

morpheus

скриптописец
07.08.2006
3 915
1
#6
Для: yerke
а разве от документа

Код:
If doc.HasEmbedded Then
Forall o In doc.EmbeddedObjects
Messagebox( o.Name )
End Forall
Else
Ничего не покажет?
 

yerke

Well-known member
28.08.2007
392
0
#7
<!--QuoteBegin-Morpheus+7:12:2007, 17:33 -->
<span class="vbquote">(Morpheus @ 7:12:2007, 17:33 )</span><!--QuoteEBegin-->Ничего не покажет?
[snapback]88919" rel="nofollow" target="_blank[/snapback]​
[/quote]
нет
так как
doc.HasEmbedded=false
 

yerke

Well-known member
28.08.2007
392
0
#9
тогда можно ли
так проверить

получить
размер тока текста который содержится в рт
и размер рт поля в целом

если они отличаются то поле содержит иные объекты кроме текста
 

Medevic

Что это ? :)
Lotus team
10.12.2004
3 346
1
#11
Навигатором NotesRichTextNavigator еще можно попробовать. Может получится. :)
 

yerke

Well-known member
28.08.2007
392
0
#12
ну я смотрел эту тему
по моему там тоже вопрос остоется открытым
:)
 
R
#14
Для: yerke
Код:
	Dim uidoc As NotesUIDocument 
Dim ws As New NotesUIWorkspace 
Set uidoc = ws.CurrentDocument 
Dim ritem As NotesRichTextItem 
Set ritem = uidoc.Document.GetFirstItem("Un1")  
Print  Isarray( ritem.EmbeddedObjects )
 
S

Sandr

#15
Для: root

И что? Он не будет масивом.. картинка не считается объектом...
 

yerke

Well-known member
28.08.2007
392
0
#16
<!--QuoteBegin-Sandr+7:12:2007, 17:56 -->
<span class="vbquote">(Sandr @ 7:12:2007, 17:56 )</span><!--QuoteEBegin-->Кстати, над вопросом, убедится, что в РТитеме есть картинка не один лоб разбился... нет таког способа smile.gif
[snapback]88930" rel="nofollow" target="_blank[/snapback]​
[/quote]
то есть я иду по безнадежному пути
неужели нет надежды
:huh:

<!--QuoteBegin-root+7:12:2007, 17:58 -->
<span class="vbquote">(root @ 7:12:2007, 17:58 )</span><!--QuoteEBegin-->Print Isarray( ritem.EmbeddedObjects )
[snapback]88933" rel="nofollow" target="_blank[/snapback]​
[/quote]
в дебаггере
сторока
EmbeddedObjects ritem-а пусто
и я так думаю
Print Isarray( ritem.EmbeddedObjects )
напечатает мне большой FALSE
 

Omh

Lotus team
04.07.2007
2 210
1
#19
Предварительно не ссать :huh:
Через DXL можно не только проверить, есть ли в рт картинка, но и экспортнуть её.

Достал я наверно с DXL :)
 
R
#20
Для: yerke
у меня возвращает есть объект ms equation то true а если нет то false