Bablosoft

Баг интерфейса BAS при нестандартном масштабе

Поддержка

  • NikolasN

    Скрипт на BAS засыпает при выключении экрана

    Поддержка
    0 Votes
    14 Posts
    1325 Views
    NikolasN

    Может кому-то будет полезно вот код который делает бинд , юзая софты AutoHotkey и nircmd.exe на кнопках: F7 \F8\F9
    при нажатии на которых будет:
    Заставлять комп заснуть (режим "Сон"), либо снизить яркость до 0% , либо вернёт яркость до 100% , при этом (на кнопках F8\F9) открывается\закрывается на весь экран заранее сохранённый файл png черной картинки:

    ; Путь к лог-файлу (используем стандартную папку Documents) logFile := A_MyDocuments "\AutoHotkeyLog.txt" ; Полный путь к nircmd.exe в папке Downloads nirCmdPath := "C:\Users\Admin\Downloads\nircmd-x64\nircmd.exe" ; Полный путь к картинке, которую нужно открыть imagePath := "C:\Users\Admin\Downloads\black_screen.png" ; Код для F7: запуска режима сна на компьютере при этом процессы тоже засыпают F7:: Sleep 100 SendMessage, 0x112, 0xF170, 2,, Program Manager FileAppend, %A_Now%: F7 - Экран выключен`n, %logFile% return ; Код для F8: снижение яркости экрана до нуля и открытие картинки F8:: if FileExist(nirCmdPath) ; Проверяем, существует ли nircmd.exe { ; Устанавливаем яркость на 0 Run, %nirCmdPath% setbrightness 0 FileAppend, %A_Now%: F8 - Яркость снижена до нуля`n, %logFile% } else { FileAppend, %A_Now%: F8 - nircmd.exe не найден!`n, %logFile% MsgBox, 16, Ошибка, NirCmd не найден в папке Downloads. return } if FileExist(imagePath) ; Проверяем, существует ли картинка { ; Открываем картинку с помощью стандартного просмотрщика Windows Run, %imagePath% Sleep 500 ; Ждем полсекунды, чтобы приложение загрузилось Send, {F11} ; Включаем полноэкранный режим FileAppend, %A_Now%: F8 - Картинка открыта в полноэкранном режиме`n, %logFile% } else { FileAppend, %A_Now%: F8 - Картинка не найдена!`n, %logFile% MsgBox, 16, Ошибка, Картинка не найдена по пути: %imagePath%. } return ; Код для F9: повышение яркости экрана до максимума и закрытие картинки F9:: if FileExist(nirCmdPath) ; Проверяем, существует ли nircmd.exe { Run, %nirCmdPath% setbrightness 100 FileAppend, %A_Now%: F9 - Яркость увеличена до максимума`n, %logFile% } else { FileAppend, %A_Now%: F9 - nircmd.exe не найден!`n, %logFile% MsgBox, 16, Ошибка, NirCmd не найден в папке Downloads. } ; Закрываем картинку (закрывает активное окно) Sleep 500 ; Ждем, чтобы яркость обновилась Send, !{F4} ; Отправляем Alt+F4 для закрытия активного окна FileAppend, %A_Now%: F9 - Картинка закрыта`n, %logFile% return
  • warenukW

    Постоянно зависает BAS

    Поддержка
    0 Votes
    24 Posts
    3612 Views
    ?

    @kuzkuz не могу подсказать, в чем может быть причина. Попробуйте логировать действия, хотя бы можно будет понять, в каком месте зависает - https://community.bablosoft.com/post/100673

  • P

    Падает BAS

    Поддержка
    0 Votes
    6 Posts
    1443 Views
    W

    @pahomka said in Падает BAS:

    @Fox удалил модуль. Тоже самое. Теперь ещё раньше падает, на 100 строк лога раньше. Запустил проект на 22.9.0 debug version - тоже упало.

    Парень переходи на другие проги, тут ловить нефиг.

  • QwarosQ

    Баг гуя

    Поддержка
    0 Votes
    11 Posts
    2114 Views
    QwarosQ

    @forall said in Баг гуя:

    https://community.bablosoft.com/topic/3041/падение-bas-при-перетаскивании-ресурсов/5
    Подобное было

    ТАм написано исправил )

  • W

    Перезапуск потока при условии

    Поддержка
    0 Votes
    3 Posts
    1285 Views
    W

    Спасибо, работает)