Как убрать полосу прокрутки в форме?

[Maria]

Проблема такая. Когда открывается какой-то документ на весь экран, сразу устанавливается горизонтальная полоса прокрутки, несмотря на то, что вся информация на экране видна. Отступ от края формы по умолчанию 2.54cm. Если этот отступ убирать, то при открытии документа полоса прокрутки есть, а часть информации с левого края не видна (те самые 2.54cm). Как сделать чтобы если делаешь отступ нулевым, то вся информация видна была сразу и не было полосы прокрутки?

 

[Kee_Keekkenen]

значит в дизайне формы остался мусор..

 

[Guest]

Неа, я сейчас тоже посмотрел, нет никакого мусора, а полоса прокрутки есть и левый край не видно

 

[Sandr]

Таблицы есть?

 

[Maria]

есть.
На форме есть поля RichText, в них программно занесены таблицы

 

[Maria]

товарищи, так что, никто не знает как с этим бороться?

 

[Medevic]

Картинку можно?

 

[Maria]

Картинка в аттаче.

На форме есть 2 секции, удаленные от края формы на 2.5 см. В первой секции обычное поле, во второй - поле RichText с таблицей, добавленной программно. При открытии формы часть таблицы уползает к самому краю формы и виден скроллинг. Как сделать, чтобы либо элементы формы сразу были видна с краю, а не с отступом в 2.5 см, либо чтобы таблица, вставленная в поле, тоже была с отступом.

 

[root]

Добавил программно таблицу нет никакого скроллинга.

	Dim ws As New NotesUIWorkspace 
Dim uidoc As NotesUIDocument 
Dim rAttachment As NotesRichTextItem 
Set uidoc = ws.CurrentDocument 
uidoc.Save 
Set rAttachment= uidoc.Document.GetFirstItem("RT") 
Call rAttachment.AppendTable(2,2)
Call uidoc.Document.Save(True,True) 
uidoc.Document.SaveOptions = "0"
uidoc.Close 
Set uidoc= ws.EditDocument(False,uidoc.Document )

 

[Maria]

Ура!
Я нашла свою ошибку. Я просто создавала таблицу со стилем

 Call rt.AppendTable(3,3,,RULER_ONE_INCH*0.2,styles)

и не обратила внимания на 0.2

поставила другое число - все ок!
Спасибо root за наводку)