Новости
Видео
Microsoft
Windows 10
Железо
Программы
Форум

Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  | Правила  

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » Изменить разрешение экрана - микро-версия

Ответить
Настройки темы
Изменить разрешение экрана - микро-версия

Ветеран


Сообщения: 900
Благодарности: 86

Профиль | Отправить PM | Цитировать

Изменения
Автор: SharkyEXE
Дата: 01-12-2019
Всем здравствуйте.

1) Операционная система: Microsoft Windows 7 Professional Service Pack 1 x64
2) Контроль учетных записей: ВЫКЛючен

Пожалуйста, помогите, мне нужно
1) есть скрипт для смены разрешения экрана перейти
Код: Выделить весь код
; Пример использования функции
_DisplaySetRes (1024, 768, 32, 75)

; Функция изменения видеорежима (для одного монитора)
Func _DisplaySetRes ($width, $height, $depth, $freq)
    Local $dev = DllStructCreate ("byte[32];int[10];byte[32];int[6]")
    ; Возвращаем текущее состояние устройства
    Local $ret = DLLCall ('user32.dll', 'int', 'EnumDisplaySettings', _
        'ptr' , 0, _
        'long', 0, _
        'ptr' , DllStructGetPtr ($dev) )
    If @error Then Return 0
    If $ret[0]=0 Then Return 0
    ; Правим нужные элементы структуры
    DllStructSetData ($dev, 4, $depth, 1)
    DllStructSetData ($dev, 4, $width, 2)
    DllStructSetData ($dev, 4, $height, 3)
    DllStructSetData ($dev, 4, $freq, 5)
    ; Проверяем корректность параметров
    $ret = DllCall ('user32.dll', 'int', 'ChangeDisplaySettings', _
        'ptr', DllStructGetPtr ($dev), _
        'int', 2 )
    If @error Then  Return 0
    ; Если все ОК - применяем новые параметры
    If $ret[0] =0 Then
        $ret = DllCall ('user32.dll', 'int', 'ChangeDisplaySettings', _
            'ptr', DllStructGetPtr ($dev), _
            'int', 1 )
        If @error Then  Return 0
        Return 1
    Else
        Return -1
    EndIf
EndFunc
2) имею желание использовать минимальное количество кода для смены разрешения экрана
3) пожалуйста, я очень прошу, из этого перейти сделайте минимальное количество кода, чтобы работало
4) или, может есть другое, красивое, решение для смены разрешения экрана, в одну строку

Пожалуйста, помогите

Спасибо.

Отправлено: 21:26, 01-12-2019

 

Ветеран


Сообщения: 2593
Благодарности: 247

Профиль | Отправить PM | Цитировать

а все эти проверки обязательны?
Там же в начале пример в одну строку.
Или надо, чтоб код сам имел защиту от дурака, вводящего любые левые значения?

Отправлено: 22:46, 09-12-2019 | #2



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.


Ветеран


Сообщения: 900
Благодарности: 86

Профиль | Отправить PM | Цитировать

bredych

Здравствуйте.

Пожалуйста, если можно, напишите код

Мне не нужны нкиакие проверки, ничего лишнего, чем меньше код, тем лучше, в одну строку - вообще красота

Я для себя делаю, никому больше не нужно это

Отправлено: 08:19, 10-12-2019 | #3



Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » Изменить разрешение экрана - микро-версия

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
Как изменить разрешение экрана из командной строки во время установки системы? Zibit Автоматическая установка Windows 2000/XP/2003 29 29-01-2018 23:00
Драйвер - [решено] Нельзя изменить разрешение экрана The_Immortal Microsoft Windows 2000/XP 3 29-10-2013 01:43
Драйвер - Разрешение экрана стоит 1024х768, хотя разрешение моего экрана 1280х800 milyaa666 Microsoft Windows 7 12 01-07-2013 21:28
Интерфейс - Разрешение экрана Гимнаст Microsoft Windows 7 9 11-04-2013 08:32
Разрешение экрана? katerinagraz Microsoft Windows 2000/XP 2 15-05-2006 11:02


« Предыдущая тема | Следующая тема »


 
Переход