Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Form_Resize и подчиненная форма / 3 сообщений из 3, страница 1 из 1
11.08.2003, 15:02
    #32232947
mahoune
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Form_Resize и подчиненная форма
Задача проста, но поиском получил не много.

Как проще и качественней организовать изменение размеров подчиненной формы вместе с размерами основной, расположив ее "приклеенной" к нижней части. Как это реализовано в Delphi для контролов?

В форуме всегда ответом служила ссылка на 1 том Гетца, коим я, к своему невежеству, до сих пор не обзавелся.

Пробовал использовать
Код: plaintext
1.
2.
3.
4.
5.
6.
Private Sub Form_Resize()
 SUB_FRM.Left =  1 
 SUB_FRM.Width = Me.Form.InsideWidth
 SUB_FRM.Height = Me.Form.InsideHeight -  2000 
 SUB_FRM.Top = Me.Form.InsideHeight - SUB_FRM.Height
End Sub

Иногда возникает ошибка:
Run-time error '2100':
Элемент управления или подчиненная форма не могут быть расположены в указанном месте.

Более того подчиненная форма размещается не в край. А то получается шире то уходит влево за область окна...

В конце-клнцов. Не подгонять же значения...
...
Рейтинг: 0 / 0
11.08.2003, 15:32
    #32232996
АлексейЕ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Form_Resize и подчиненная форма
http://hiprog.com/access/article.asp?idd=186
Если мне не изменяет память, то этот сплитер использует класс из 1-го тома Гетца, отвечающий за размеры форм и контролов при изменении разм ...
В общем, это то, куда тебя посылают.
...
Рейтинг: 0 / 0
11.08.2003, 15:46
    #32233015
mahoune
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Form_Resize и подчиненная форма
Что б меня всегда так посылали!
...
Рейтинг: 0 / 0
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Form_Resize и подчиненная форма / 3 сообщений из 3, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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