Гость
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / И снова про CanShrink/CanGrow / 15 сообщений из 15, страница 1 из 1
26.03.2008, 10:58
    #35214102
merlinby
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
И снова про CanShrink/CanGrow
Имеется отчет в виде таблицы (ячейки с границами). Есть строчки где данные помещаются только в 2 строки, при этом только в одном столбце, в остальных влазит в 1 строку. Получается так, что в строчке одна ячейка занимает 2 высоты, а остальные по одной. Все было бы красиво, если бы не было границ. А так ...
Пытаюсь избавится от этого путем увеличивания высоты остальных строк, но они имеют по умолчанию CanShrink = True (так надо, менять это предлагать не стоит) и в результате обратно сужаются...
Пытаюсь параллельно в коде на эти ячейки назначать CanShrink = False - не дает...
Что делать?
...
Рейтинг: 0 / 0
26.03.2008, 11:15
    #35214159
Karfaqen
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
И снова про CanShrink/CanGrow
Можно вообще убрать границы у полей, и рисовать их методом Line отчета в событии Print соответствующей секции.
...
Рейтинг: 0 / 0
26.03.2008, 11:17
    #35214171
merlinby
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
И снова про CanShrink/CanGrow
Как вариант приму, но слишком трудоемко... Должен же проще быть способ, еще есть идеи?
...
Рейтинг: 0 / 0
26.03.2008, 11:24
    #35214189
Программист-Любитель
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
И снова про CanShrink/CanGrow
Сделать сразу под расширяемым полем линию на всю ширину отчета. Границы у полей сделать бе линий.

Вертикально столбики и так обычно хорошо выделяются.

А вообще в отчетах очекнь хорошо через 1 строку бледно серым заливать.
...
Рейтинг: 0 / 0
26.03.2008, 11:34
    #35214242
merlinby
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
И снова про CanShrink/CanGrow
В каком случае свойство текстбокса canshrink доступно на изменение кроме как в режиме конструктора?
...
Рейтинг: 0 / 0
26.03.2008, 11:54
    #35214349
merlinby
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
И снова про CanShrink/CanGrow
Ну не люблю я линии рисовать!!!
Выкрутился так:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
Private Sub addEmptyStr(ByRef Con As Control, ByVal CheckLen As Long)
With Con
 If Len(Nz(.ControlSource, "")) < CheckLen And Len(Nz(.ControlSource, "")) >  0  Then
  If Right(.ControlSource,  1 ) = "'" Then
  .ControlSource = Left(.ControlSource, Len(.ControlSource) -  1 ) & Chr( 13 ) & Chr( 10 ) & " '"
  Else
  .Format = ""
  .ControlSource = "='" & Format(Right(.ControlSource, Len(.ControlSource) -  1 ), "# ### ### ###") _
    & Chr( 13 ) & Chr( 10 ) & " '"
  End If
 End If
End With
End Sub
Первая часть для текста, вторая - для чисел
У мя только на 2 строчки могут растянуться, для трех и более просто ставим For I=1 To Len()\CheckLen

Пользуйтесь, рисователи линий. ;)
...
Рейтинг: 0 / 0
26.03.2008, 12:07
    #35214393
4321
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
И снова про CanShrink/CanGrow
merlinbyПользуйтесь, рисователи линий. ;)зобанить пионера.

зы: норесуйй один разз одну рисовальнуйу ф-йу, и пользуй на все случайи жизни. Если лень - поищи тут, аль в сетке.
...
Рейтинг: 0 / 0
26.03.2008, 12:13
    #35214431
Программист-Любитель
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
И снова про CanShrink/CanGrow
Не надо рисовать рейсфедром по готовому распечатанному отчету. Мышкой перетащить из панели инсрументов. 1 секунда времени.
...
Рейтинг: 0 / 0
26.03.2008, 12:25
    #35214474
merlinby
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
И снова про CanShrink/CanGrow
Гыгы... Ну на вкус и цвет... Возможно сделаю как-нить. Но ИМХО мой подход удобнее...
...
Рейтинг: 0 / 0
27.03.2008, 10:19
    #35216648
Joss
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
И снова про CanShrink/CanGrow
Новое - это хорошо забытое старое
Смотри здесь Отчет с изменяемой высотой строк (2002 год)
...
Рейтинг: 0 / 0
Период между сообщениями больше года.
25.06.2020, 16:12
    #39973224
Rikozenit
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
И снова про CanShrink/CanGrow
Всем доброго дня!
Подскажите, пожалуйста, как можно скрыть (сжать) кнопки "Развернуть", "Скрыть" в том случае, если поле рядом с ними пустое?
Visible = False, висящее на текущей записи - не помогает, а свойства CanShrink для кнопки видимо нет(
...
Рейтинг: 0 / 0
26.06.2020, 14:23
    #39973571
Rikozenit
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
И снова про CanShrink/CanGrow
up =(
...
Рейтинг: 0 / 0
26.06.2020, 16:51
    #39973620
Панург
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
И снова про CanShrink/CanGrow
Rikozenit
up =(
а что ты хотел? Сроду никто не заморачивается с интерактивностью отчётов...
...
Рейтинг: 0 / 0
02.07.2020, 08:27
    #39975162
Rikozenit
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
И снова про CanShrink/CanGrow
Панург, почему? Благодаря скрытию/раскрытию уровней группировки можно дерево построить (посадить) ))
...
Рейтинг: 0 / 0
02.07.2020, 08:38
    #39975163
Панург
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
И снова про CanShrink/CanGrow
Rikozenit
почему?
отчёт - вывод данных на печать
...
Рейтинг: 0 / 0
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / И снова про CanShrink/CanGrow / 15 сообщений из 15, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]