|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
15.03.2009, 17:19 | #1 |
Пользователь
Регистрация: 26.02.2009
Сообщений: 58
|
Определение разрешения экрана
Господа, пожалуйста наставьте на путь истинный!
Рабочая программа используется на компах в офисе с разными мониторами. Задумал програмное определение разрешения монитора и "подгонку" под его размеры основной страницы книги. В одной книжке нашел примерно следующее Код:
Где ошибся? |
15.03.2009, 18:55 | #2 | |
Старожил
Регистрация: 12.05.2007
Сообщений: 2,339
|
Цитата:
Код:
|
|
15.03.2009, 19:19 | #3 |
Пользователь
Регистрация: 26.02.2009
Сообщений: 58
|
Понятно, но не совсем то.
Valerij, вы знаете, какого размера(маштаба) должны быть листы и представленным кодом, после открытия книги, приводите маштаб листов к константе. У меня несколько другая задача: Определив программно размерность используемого монитора, подогнать маштаб ПЕРВОЙ страницы книги под максимальное заполнение экрана монитора. Маленький скин с видом первого листа прилагаю. |
15.03.2009, 19:40 | #4 |
Старожил
Регистрация: 12.05.2007
Сообщений: 2,339
|
У меня 4 -монитора, 17' прямоугольник, 19' квадрат, 19' прямоугольник и 15'. На любом мониторе, моя книга открывается с полным заполнением экрана, которое я задал в макросе
|
15.03.2009, 19:59 | #5 |
Пользователь
Регистрация: 26.02.2009
Сообщений: 58
|
Решено!
Спасибо, Valerij !
В итоге составлен следующий код: Код:
|
15.03.2009, 23:05 | #6 |
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,858
|
В Вашем случае всё делается проще:
Код:
Код:
|
16.03.2009, 00:20 | #7 |
Пользователь
Регистрация: 26.02.2009
Сообщений: 58
|
Интересно, ну просто для собственного развития, почему всетаки первый код ошибку выдавал?
(вдруг пригодится, если освоить) |
16.03.2009, 00:25 | #8 | |
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,858
|
Цитата:
Код:
|
|
16.03.2009, 02:40 | #9 |
Пользователь
Регистрация: 26.02.2009
Сообщений: 58
|
Для того чтобы код сработал при открытии необходимо:
Код:
Код:
Моя благодарность EducatedFool за разъяснения! |
16.03.2009, 22:49 | #10 |
Старожил
Регистрация: 12.05.2007
Сообщений: 2,339
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Проблема с установкой разрешения экрана | andrei111_05 | Компьютерное железо | 4 | 26.03.2009 00:03 |
разрешения общего доступа и ntfs разрешения | Zerone | Свободное общение | 4 | 16.02.2009 17:05 |
Смена разрешения экрана | san72 | Помощь студентам | 3 | 05.06.2008 12:38 |
Определение разрешения монитора(ов) | lamonana | Общие вопросы Delphi | 2 | 09.03.2008 18:56 |
как сделать так что при изменении разрешения экрана программа работала... | Victor[famas] | Общие вопросы Delphi | 7 | 13.02.2008 12:48 |