Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Растянуть форму? / 25 сообщений из 29, страница 1 из 2
  1  все
30.06.2004, 09:58:54
    #32582493
Invisible
Invisible
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Растянуть форму?
По нажатию на кнопку мне нужно растянуть область данных формы и вложенную в нее форму до заданных размеров.
Height и Width формы (области данных) к чему относятся? Никак не могу найти.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.06.2004, 10:02:02
    #32582498
paparome
paparome
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Растянуть форму?
- У формы - Width
- У секций (заголовой, примечание, область данный) - Height
- Видимые размеры формы - InsideHeight, InsideWidth
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.06.2004, 10:05:43
    #32582508
Invisible
Invisible
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Растянуть форму?
Пишу Me.InsideHeight=13.5, а размер меняться и не думал?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.06.2004, 10:11:46
    #32582518
paparome
paparome
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Растянуть форму?
InvisibleПишу Me.InsideHeight=13.5, а размер меняться и не думал?
Что такое 13.5?
Там вроде в твипах надо и значения там уже в тысячах измеряются :)
Вы бы посмотрели чему оно равно изначально :)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.06.2004, 10:12:49
    #32582519
kedzo
kedzo
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Растянуть форму?
если форма развернута на весь экран, то сначала ей надо сделать restore, а потом изменять размер.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.06.2004, 10:13:37
    #32582520
paparome
paparome
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Растянуть форму?
А форма случаем не на весь экран развернута?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.06.2004, 10:20:09
    #32582537
Proga
Proga
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Растянуть форму?
Могу кинуть программку, которая запоминает последние установки в конструкторе.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.06.2004, 10:23:43
    #32582548
Invisible
Invisible
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Растянуть форму?
Начальное значение я посмотрел, рассчитывал на то, что при внесении данного значения видимая область уменьшится. Форма изначально была развернута, но пробовал и так и так. После внесение изменение в размеры значения H и W не меняются , вот такая ерунда.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.06.2004, 10:26:56
    #32582554
Proga
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
| Ответить | Цитировать | Написать  
30.06.2004, 10:29:35
    #32582561
paparome
paparome
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Растянуть форму?
Дык - может ты все задачу свормулируешь?

А так - вот сюда посмотри
/topic/98527&pg=-1
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.06.2004, 10:34:53
    #32582585
Invisible
Invisible
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Растянуть форму?
Угу. Ента весч подгоняет видимые размеры формы под область данных, а мне нужно саму область данных расширять. Короче говоря задача такая: когда увеличиваем разрешение, форма могёт взять всю область экрана, вот.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.06.2004, 10:41:11
    #32582606
paparome
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
| Ответить | Цитировать | Написать  
30.06.2004, 10:46:21
    #32582623
Proga
Proga
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Растянуть форму?
to paparome:
А эта формула получена практическим опытом?
AccRect.Top = (AccRect.Bottom - AccRect.Top) * 15 - 1320
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.06.2004, 10:48:06
    #32582631
paparome
paparome
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Растянуть форму?
Progato paparome:
А эта формула получена практическим опытом?
AccRect.Top = (AccRect.Bottom - AccRect.Top) * 15 - 1320
Если ты про константу 1320 , то да :)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.06.2004, 10:49:15
    #32582641
Proga
Proga
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Растянуть форму?
круто!!!
долго мучился, пока искал подходящее значение?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.06.2004, 10:53:34
    #32582653
paparome
paparome
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Растянуть форму?
Progaкруто!!!
долго мучился, пока искал подходящее значение?
минуты 2 :)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.06.2004, 11:10:30
    #32582722
Invisible
Invisible
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Растянуть форму?
Ммможет. Ведь форма занимает часть рабочего стола . Она ленточна и она развернута внутри запущеного Акса (само окно акса маленькое). Мы видим n кол-во записей, но вот мы нажимаем на развернуть окно акса и видим внизу n-ого кол-ва строк еще кучу свободного пространства. В этом случае мы нажимаем на кнопку формы и раз... мы видим больше чем n записей. А когда мы хотим ВЕРНУТЬСЯ ОБРАТНО. Мы нажимаем кнопочку, ап... и опять стало n строк. Послечего мы спокойно можем restore-ить окно Акса. И все это в пределах одного разрешения. Но позже и на разрешение сделаю.

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

Может - если, например, компоненты не влезают в новые размеры
+
Height области данных в ленточной форме это не суммарная высота всех видимых записей, а высота одной записи
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.06.2004, 12:06:30
    #32582932
Invisible
Invisible
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Растянуть форму?
Спасибо. Все получилось. Действительно на меньшее значение не хотело меняться из-за того, что вложенная форма не позволяла этого сделать. Теперь все ок! Еще раз спасибо.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.06.2004, 13:50:17
    #32583286
Invisible
Invisible
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Растянуть форму?
В довершение хочу спросить - как maximize и restore окно самого акцесса, а не формы, внутри его?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.06.2004, 14:01:51
    #32583319
paparome
paparome
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Растянуть форму?
ИМХО - только через API
Вот, примено, по поиску
http://www.sql.ru/forum/actualsearch.aspx?search=SetWindowPos&a=&ma=0&bid=4&dt=-1&s=1&so=1
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.06.2004, 14:06:39
    #32583333
ищ
ищ
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Растянуть форму?
может проще восп. готовым примером от Гетца? т,1 стр.499
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.06.2004, 14:07:22
    #32583335
paparome
paparome
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Растянуть форму?
ищможет проще восп. готовым примером от Гетца? т,1 стр.499
Может и проще, но у меня Гетца нет :(
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.06.2004, 14:27:48
    #32583402
ищ
ищ
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Растянуть форму?
(голосом Карлсона) только один торт и восем свечек?
(голосом донны Розы) какая неприятность. а я вот пристрастилась.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
  1  все
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Растянуть форму? / 25 сообщений из 29, страница 1 из 2
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 345ms
Закрыть
start [/forum/topic.php?fid=45&mobile=1&tid=1670718]:
 0ms
get settings:
 8ms
get forum list:
 23ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 45ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 55ms
get tp. blocked users:
 1ms
others: 197ms
total:  345ms
x
x
Закрыть


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