Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Не определяется Me.ScrollBars / 3 сообщений из 3, страница 1 из 1
13.09.2004, 14:45:45
    #32692025
toly_m
toly_m
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Не определяется Me.ScrollBars
Привет всем!

Есть подчиненная форма табличного режима, занимающая половину основной формы, при 2-3 записях в ней много места остается некрасивым серым цветом, хотелось бы уменьшать высоту подчиненной формы в зависимости от числа ее записей, что и получилось более-менее. Но т.к. в подчиненной форме меняется число столбцов (т.к. подключаются разные таблицы) в некоторых случаях появляется гориз. полоса прокрутки, и после изменения высоты требуется проверить, появилась ли гориз. полоса, и если да, то еще чуть-чуть увеличить высоту подчиненной. После подсчета числа записей подчиненной и уменьшения ее высоты пробовал проверить наличие гориз. полосы проркутки так:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
lngRowHeight=Forms!frmEdit!subData.Form.Controls( 0 ).Height
lngRowCount = DCount("id", "tbl_row")

If Forms!frmEdit!subData.Form.ScrollBars =  1  Then
      MsgBox "Есть гориз. полоса!"
      lngSubHeight = (lngRowCount +  2 ) * lngRowHeight
      Forms!frmEdit!subData.Height = lngSubHeight
End If

Но ход программы не заходит в условие проверки (не выводится MsgBox),
также не помогло ни Forms!frmEdit!subData.Requery ни Forms!frmEdit!subData.Repaint.

Итак, после открытия подчиненной формы как можно из VBA узнать, есть ли в ней горизонтальная полоса проркутки?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.09.2004, 14:56:10
    #32692038
Serge Gavrilov
Serge Gavrilov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Не определяется Me.ScrollBars
Дык, а чему равно Forms!frmEdit!subData.Form.ScrollBars?
Проверили бы, может 3?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.09.2004, 15:26:24
    #32692100
toly_m
toly_m
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Не определяется Me.ScrollBars
Serge Gavrilov может 3?

Точно, этот случай упустил из внимания :)
Спасибо!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Не определяется Me.ScrollBars / 3 сообщений из 3, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 306ms
Закрыть
start [/forum/topic.php?fid=45&mobile=1&tid=1671817]:
 0ms
get settings:
 8ms
get forum list:
 9ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 30ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 28ms
get tp. blocked users:
 1ms
others: 216ms
total:  306ms
x
x
Закрыть


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