1. Акция на весь декабрь! Получай оплату х2 за уникальные статьи, объемом от 200 слов, если в заголовке темы и теле статьи присутствует слово Python
    Скрыть объявление

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

Тема в разделе "Lotus - Программирование", создана пользователем Maria, 7 сен 2007.

Статус темы:
Закрыта.
  1. Maria

    Maria Гость

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

    Kee_Keekkenen Well-Known Member

    Регистрация:
    5 сен 2006
    Сообщения:
    616
    Симпатии:
    4
    значит в дизайне формы остался мусор..
     
  3. Гость

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

    Sandr Гость

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

    Maria Гость

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

    Maria Гость

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

    Medevic Что это ? :)
    Lotus team

    Регистрация:
    10 дек 2004
    Сообщения:
    3.346
    Симпатии:
    2
    Картинку можно? ;)
     
  8. Maria

    Maria Гость

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

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

    Вложения:

    • picture.jpg
      picture.jpg
      Размер файла:
      30,9 КБ
      Просмотров:
      69
  9. root

    root Гость

    Добавил программно таблицу нет никакого скроллинга.
    Код (Text):
        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 )
     

    Вложения:

    • scroll.JPG
      scroll.JPG
      Размер файла:
      26,1 КБ
      Просмотров:
      63
  10. Maria

    Maria Гость

    Ура!
    Я нашла свою ошибку. Я просто создавала таблицу со стилем
    Код (Text):
     Call rt.AppendTable(3,3,,RULER_ONE_INCH*0.2,styles)
    и не обратила внимания на 0.2

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

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