|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
28.07.2009, 03:22 | #1 |
Форумчанин
Регистрация: 19.06.2009
Сообщений: 163
|
Автоматическое изменение размера формы в соответствии с размером экрана
Есть UserForm, размером 400x400. Возможно ли реализовать следующий запрос:
чтобы макрос подгонял размер формы, при ее открытии, под размер экрана. Например: размер экрана 800x600, форма принимает размер чуть меньше - 600x400. Экран - 1024x768, а форма - 824x568. Экран - 1280x800, форма - 1080x600 Т.е. получается на 200 единиц каждый параметр меньше. |
28.07.2009, 05:01 | #2 |
Старожил
Регистрация: 05.12.2007
Сообщений: 4,180
|
Определить разрешение экрана можно при помощи WinAPI-функции. Например:
Код:
Однако, если Вам нужно развернуть форму на весь экран (не зависимо от разрешения), то лучше воспользоваться другими API-функциями: Код:
Чем шире угол зрения, тем он тупее.
|
28.07.2009, 11:36 | #3 |
Форумчанин
Регистрация: 19.06.2009
Сообщений: 163
|
Спасибо за ответ. Только я не могу разобраться со вторым кодом. Как и куда вписать его если у меня уже есть своя форма?
|
28.07.2009, 11:52 | #4 |
Старожил
Регистрация: 05.12.2007
Сообщений: 4,180
|
Строка кода
Код:
Чем шире угол зрения, тем он тупее.
|
28.07.2009, 12:24 | #5 |
Форумчанин
Регистрация: 19.06.2009
Сообщений: 163
|
Спасибо, большое!
|
28.07.2009, 13:01 | #6 |
Форумчанин
Регистрация: 13.03.2009
Сообщений: 253
|
Вопрос, по размеру экрана. Можно ли при открытии книги.xls делать размер экрана всегда 1280х1024?
|
28.07.2009, 13:22 | #7 |
Старожил
Регистрация: 05.12.2007
Сообщений: 4,180
|
Это не так просто. Посмотрите один из возможных вариантов во вложении.
Чем шире угол зрения, тем он тупее.
|
28.07.2009, 15:26 | #8 |
Форумчанин
Регистрация: 13.03.2009
Сообщений: 253
|
Очень круто! А можно еще дописать, чтобы после изменения размеров экрана, окно Excel разворачивалось во весь экран?
|
28.07.2009, 16:08 | #9 |
Форумчанин
Регистрация: 17.07.2009
Сообщений: 519
|
Application.DisplayFullScreen = True
|
28.07.2009, 16:34 | #10 |
Форумчанин
Регистрация: 13.03.2009
Сообщений: 253
|
Aent, спасибо. Работает)
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Изменение размера формы по размеру екрана | Simon..14 | Общие вопросы C/C++ | 7 | 09.06.2009 20:57 |
Как запретить Изменение размера формы | girz | Общие вопросы Delphi | 5 | 31.05.2009 10:29 |
Изменение разрешения экрана | Alex Cones | Мультимедиа в Delphi | 2 | 16.04.2009 19:34 |
автоматическое изменение падежа слова | B00lean | Microsoft Office Word | 5 | 20.03.2009 00:43 |
Автоматическое изменение количества строк в таблице | THE_ENGINEER | Microsoft Office Excel | 7 | 19.10.2008 21:28 |