powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Растянуть форму?
29 сообщений из 29, показаны все 2 страниц
Растянуть форму?
    #32582493
Invisible
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
По нажатию на кнопку мне нужно растянуть область данных формы и вложенную в нее форму до заданных размеров.
Height и Width формы (области данных) к чему относятся? Никак не могу найти.
...
Рейтинг: 0 / 0
Растянуть форму?
    #32582498
Фотография paparome
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
- У формы - Width
- У секций (заголовой, примечание, область данный) - Height
- Видимые размеры формы - InsideHeight, InsideWidth
...
Рейтинг: 0 / 0
Растянуть форму?
    #32582508
Invisible
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Пишу Me.InsideHeight=13.5, а размер меняться и не думал?
...
Рейтинг: 0 / 0
Растянуть форму?
    #32582518
Фотография paparome
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
InvisibleПишу Me.InsideHeight=13.5, а размер меняться и не думал?
Что такое 13.5?
Там вроде в твипах надо и значения там уже в тысячах измеряются :)
Вы бы посмотрели чему оно равно изначально :)
...
Рейтинг: 0 / 0
Растянуть форму?
    #32582519
Фотография kedzo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
если форма развернута на весь экран, то сначала ей надо сделать restore, а потом изменять размер.
...
Рейтинг: 0 / 0
Растянуть форму?
    #32582520
Фотография paparome
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А форма случаем не на весь экран развернута?
...
Рейтинг: 0 / 0
Растянуть форму?
    #32582537
Proga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Могу кинуть программку, которая запоминает последние установки в конструкторе.
...
Рейтинг: 0 / 0
Растянуть форму?
    #32582548
Invisible
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Начальное значение я посмотрел, рассчитывал на то, что при внесении данного значения видимая область уменьшится. Форма изначально была развернута, но пробовал и так и так. После внесение изменение в размеры значения H и W не меняются , вот такая ерунда.
...
Рейтинг: 0 / 0
Растянуть форму?
    #32582554
Proga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Держи родной и пользуйся

Public Sub DlgResize(Frm As Form)
On Error GoTo Err_1
Frm.InsideWidth = Frm.Width
Frm.InsideHeight = Frm.Section(0).Height
DoCmd.Restore
Exit_1:
Exit Sub
Err_1:
E_MsgBox Err.Description
Resume Exit_1
End Sub

Вызываешь её так

Private Sub Form_Open(Cancel As Integer)
DlgResize Me
End Sub
...
Рейтинг: 0 / 0
Растянуть форму?
    #32582561
Фотография paparome
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Дык - может ты все задачу свормулируешь?

А так - вот сюда посмотри
/topic/98527&pg=-1
...
Рейтинг: 0 / 0
Растянуть форму?
    #32582585
Invisible
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Угу. Ента весч подгоняет видимые размеры формы под область данных, а мне нужно саму область данных расширять. Короче говоря задача такая: когда увеличиваем разрешение, форма могёт взять всю область экрана, вот.
...
Рейтинг: 0 / 0
Растянуть форму?
    #32582606
Фотография paparome
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
Public Declare Function GetClientRect Lib "user32" (ByVal hwnd As Long, lpRect As Rect) As Long

Public Type Rect
    Left As Long
    Top As Long
    Right As Long
    Bottom As Long
End Type

Public Sub MyFormReSize()
Dim AccRect as Rect
    Call GetClientRect(Application.hWndAccessApp, AccRect)
    AccRect.Top = (AccRect.Bottom - AccRect.Top) *  15  -  1320 
    DoCmd.Restore
    DoCmd.MoveSize ,  0 , , AccRect.Top
End Sub
?
...
Рейтинг: 0 / 0
Растянуть форму?
    #32582623
Proga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
to paparome:
А эта формула получена практическим опытом?
AccRect.Top = (AccRect.Bottom - AccRect.Top) * 15 - 1320
...
Рейтинг: 0 / 0
Растянуть форму?
    #32582631
Фотография paparome
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Progato paparome:
А эта формула получена практическим опытом?
AccRect.Top = (AccRect.Bottom - AccRect.Top) * 15 - 1320
Если ты про константу 1320 , то да :)
...
Рейтинг: 0 / 0
Растянуть форму?
    #32582641
Proga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
круто!!!
долго мучился, пока искал подходящее значение?
...
Рейтинг: 0 / 0
Растянуть форму?
    #32582653
Фотография paparome
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Progaкруто!!!
долго мучился, пока искал подходящее значение?
минуты 2 :)
...
Рейтинг: 0 / 0
Растянуть форму?
    #32582722
Invisible
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ммможет. Ведь форма занимает часть рабочего стола . Она ленточна и она развернута внутри запущеного Акса (само окно акса маленькое). Мы видим n кол-во записей, но вот мы нажимаем на развернуть окно акса и видим внизу n-ого кол-ва строк еще кучу свободного пространства. В этом случае мы нажимаем на кнопку формы и раз... мы видим больше чем n записей. А когда мы хотим ВЕРНУТЬСЯ ОБРАТНО. Мы нажимаем кнопочку, ап... и опять стало n строк. Послечего мы спокойно можем restore-ить окно Акса. И все это в пределах одного разрешения. Но позже и на разрешение сделаю.

Я хочу взять два статических значения высоты области данных гл. формы и размеров подформы и просто менять их.
paparome, в Вашем примере не понятно как тогда восстанавливать бывшие значения размеров.
...
Рейтинг: 0 / 0
Растянуть форму?
    #32582868
Invisible
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
paparome- У формы - Width
- У секций (заголовой, примечание, область данный) - Height
Может ли по определенным причинам изменение значенией этих свойств не применяться?
...
Рейтинг: 0 / 0
Растянуть форму?
    #32582881
Фотография paparome
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
авторМожет ли по определенным причинам изменение значенией этих свойств не применяться?

Может - если, например, компоненты не влезают в новые размеры
+
Height области данных в ленточной форме это не суммарная высота всех видимых записей, а высота одной записи
...
Рейтинг: 0 / 0
Растянуть форму?
    #32582932
Invisible
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо. Все получилось. Действительно на меньшее значение не хотело меняться из-за того, что вложенная форма не позволяла этого сделать. Теперь все ок! Еще раз спасибо.
...
Рейтинг: 0 / 0
Растянуть форму?
    #32583286
Invisible
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В довершение хочу спросить - как maximize и restore окно самого акцесса, а не формы, внутри его?
...
Рейтинг: 0 / 0
Растянуть форму?
    #32583319
Фотография paparome
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ИМХО - только через API
Вот, примено, по поиску
http://www.sql.ru/forum/actualsearch.aspx?search=SetWindowPos&a=&ma=0&bid=4&dt=-1&s=1&so=1
...
Рейтинг: 0 / 0
Растянуть форму?
    #32583333
ищ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
может проще восп. готовым примером от Гетца? т,1 стр.499
...
Рейтинг: 0 / 0
Растянуть форму?
    #32583335
Фотография paparome
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ищможет проще восп. готовым примером от Гетца? т,1 стр.499
Может и проще, но у меня Гетца нет :(
...
Рейтинг: 0 / 0
Растянуть форму?
    #32583402
ищ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
(голосом Карлсона) только один торт и восем свечек?
(голосом донны Розы) какая неприятность. а я вот пристрастилась.
...
Рейтинг: 0 / 0
Растянуть форму?
    #32583513
Invisible
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А что у Гетца написано?
...
Рейтинг: 0 / 0
Растянуть форму?
    #32583761
ищ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
класс готовый. свои константы подставляешь и будет тебе щастя
...
Рейтинг: 0 / 0
Растянуть форму?
    #32584113
Invisible
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Этот класс, позволяет задавать размеры окна? А есть ли весчь, которая работает minimize/maximize окна Акцесса по принципу вкл/выкл?
...
Рейтинг: 0 / 0
Растянуть форму?
    #32758970
Дмитрий16
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
InvisibleЭтот класс, позволяет задавать размеры окна? А есть ли весчь, которая работает minimize/maximize окна Акцесса по принципу вкл/выкл?
Добавлю свои 5 копеек. :-)
Вот накопал:
http://%5D%7C>]http://]|> www.msaccess.ru/UserInterfase_Dinamic_Scr.html
...
Рейтинг: 0 / 0
29 сообщений из 29, показаны все 2 страниц
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Растянуть форму?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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