|
|
|
|
| Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » Любой язык - Снять птичку/галочку Общие -> Правка -> Выделение мышью (Отключить выделение мышью) |
|
|||||
|
|
Любой язык - Снять птичку/галочку Общие -> Правка -> Выделение мышью (Отключить выделение мышью)
|
|
Ветеран Сообщения: 900 |
Здравствуйте
Операционная система: Microsoft Windows 7 Professional Service Pack 1 x64 Russian Что делает код ниже Анимация https://disk.yandex.ru/i/n4hXyzdMX8oxuw Видео https://disk.yandex.ru/i/-etD5nUxRGIxlg Есть код в интернете https://winsourcecode.blogspot.com/2...uick-edit.html Скрытый текст
Код:
 QuickEdit.exe Turns on or off Quick Edit mode in the console.
This uses the inbuilt compilers in Windows 10 - there are three VB.NET compilers and three C# compilers - just copy each text file into the same folder and double click the batch file to make the program.
REM QuickEdit.bat
REM This file compiles QuickEdit.vb to QuickEdit.exe
REM QuickEdit.exe turns on or off Quick Edit mode in the command prompt.
REM To Use
Rem QuickEdit [on|off]
REM Without parameters reports on the state of Quick Edit mode.
"C:\Windows\Microsoft.NET\Framework\v4.0.30319\vbc.exe" /target:exe /out:"%~dp0\QuickEdit.exe" "%~dp0\QuickEdit.vb"
pause
'QuickEditOff.vb
Imports System
Imports System.IO
Imports System.Runtime.InteropServices
Imports Microsoft.Win32
Public Module MyApplication
Public Declare Function GetStdHandle Lib "kernel32" Alias "GetStdHandle" (ByVal nStdHandle As Long) As Long
Public Declare Function GetConsoleMode Lib "kernel32" (ByVal hConsoleHandle As IntPtr, ByRef lpMode As Integer) As Integer
Public Declare Function SetConsoleMode Lib "kernel32" (ByVal hConsoleHandle As Long, ByVal dwMode As Integer) As Integer
Public Const STD_ERROR_HANDLE = -12&
Public Const STD_INPUT_HANDLE = -10&
Public Const STD_OUTPUT_HANDLE = -11&
'Input
Public Const ENABLE_EXTENDED_FLAGS = &h0080
Public Const ENABLE_ECHO_INPUT = &h0004
Public Const ENABLE_INSERT_MODE = &h0020
Public Const ENABLE_LINE_INPUT = &h0002
Public Const ENABLE_MOUSE_INPUT = &h0010
Public Const ENABLE_PROCESSED_INPUT = &h0001
Public Const ENABLE_QUICK_EDIT_MODE = &h0040
Public Const ENABLE_WINDOW_INPUT = &h0008
Public Const ENABLE_VIRTUAL_TERMINAL_INPUT = &h0200
'Output
Public Const ENABLE_PROCESSED_OUTPUT = &h0001
Public Const ENABLE_WRAP_AT_EOL_OUTPUT = &h0002
Public Const ENABLE_VIRTUAL_TERMINAL_PROCESSING = &h0004
Public Const DISABLE_NEWLINE_AUTO_RETURN = &h0008
Public Const ENABLE_LVB_GRID_WORLDWIDE = &h0010
Sub Main()
Dim hIn As IntPtr
Dim Ret As Integer
Dim Mode As Integer
hIn = GetStdHandle(STD_INPUT_HANDLE)
Ret = GetConsoleMode(hIn, Mode)
If Command() = "" then
If (Mode And ENABLE_QUICK_EDIT_MODE) = ENABLE_QUICK_EDIT_MODE then
Console.writeline("Quick Edit On")
Else
Console.writeline("Quick Edit Off")
End If
ElseIf LCase(Command()) = "on"
If (Mode And ENABLE_QUICK_EDIT_MODE) = 0 then Ret = SetConsoleMode(hIn, Mode + ENABLE_QUICK_EDIT_MODE)
If Ret = 0 then Console.WriteLine(Hex(Ret) & " - " & err.lastdllerror)
ElseIf LCase(Command()) = "off"
If (Mode And ENABLE_QUICK_EDIT_MODE) = ENABLE_QUICK_EDIT_MODE then Ret = SetConsoleMode(hIn, Mode - ENABLE_QUICK_EDIT_MODE)
If Ret = 0 then Console.WriteLine(Hex(Ret) & " - " & err.lastdllerror)
End If
End Sub
End Module
Прилагаю готовый архив https://disk.yandex.ru/d/rSOhZjiwCAeH-Q В готовом архиве извлечь два файла и запустить файл QuickEdit_While_Wend.vb.bat Появятся много exe файлов одинаковой работы для использования. Разница - только под какую версию .Net Framework компилировалось Код:
v1.0.3705 v1.1.4322 v2.0.50727 v3.0 v3.5 v4.0.30319 - версиях Windows (7, 10, 11) - права администратора или права пользователя - х86 или х64 - антивирус доктор веб 13 или нет антивируса появлялись картинки ошибок https://disk.yandex.ru/i/lUhahz-8uQ86GA https://disk.yandex.ru/i/LLub1_kQKWYVCQ Пожалуйста, будьте так, любезны, возможно или нет реализовать exe файл без разницы, какой язык программирования, PureBasic, Python, C+, C++, QBasic, Delphi и прочее, чтобы, откровенно, работало на максимальном количестве Код:
- версиях Windows (7, 10, 11) - права администратора или права пользователя - х86 или х64 - антивирус доктор веб 13 или нет антивируса Код:
- версиях Windows (7, 10, 11) - права администратора или права пользователя - х86 или х64 - антивирус доктор веб 13 или нет антивируса Спасибо. |
|
|
Отправлено: 00:14, 18-11-2023 |
|
Deadooshka Сообщения: 2517
|
Профиль | Отправить PM | Цитировать quick mode что-ли отключить в консоли?
Вот простая сишечка отключает. Компилируйте в mingw. Код:
#include <stdio.h>
#include <windows.h>
int main() {
DWORD prev_mode;
HANDLE hInput = GetStdHandle(STD_INPUT_HANDLE);
GetConsoleMode(hInput, &prev_mode);
int err = SetConsoleMode(hInput, prev_mode & ENABLE_EXTENDED_FLAGS);
puts(err == 0 ? "SetConsoleMode() returned zero" : "Quick mode is disabled");
return 0;
}
|
|
Последний раз редактировалось Sham, 18-11-2023 в 12:15. Причина: аттач Отправлено: 10:38, 18-11-2023 | #2 |
|
Ветеран Сообщения: 900
|
Профиль | Отправить PM | Цитировать Sham, здравствуйте.
Пожалуйста, будьте так любезны, хочется науки, знаний, если возможно, будьте так, любезны, научите, немного, а как из Вашего кода сделать чем проще, тем лучше - без наворотов в виде графических интерфейсов, GUI интерфейса и прочего ненужного, чем меньше размер на выхлопе ехе файла, тем лучше, без уси-пуси, сюси-нюси? Спасибо. |
|
Последний раз редактировалось SharkyEXE, 18-11-2023 в 15:07. Отправлено: 11:48, 18-11-2023 | #3 |
|
Deadooshka Сообщения: 2517
|
Профиль | Отправить PM | Цитировать SharkyEXE, во вложенном выше архиве 32-битный exe
|
|
Отправлено: 12:20, 18-11-2023 | #4 |
|
Ветеран Сообщения: 900
|
Профиль | Отправить PM | Цитировать Sham, здравствуйте
Пишется, лично у меня Скрытый текст
Страница не найдена. Если вы уверены, что использовали правильную ссылку, свяжитесь с администрацией
|
|
|
Последний раз редактировалось SharkyEXE, 18-11-2023 в 15:07. Отправлено: 12:24, 18-11-2023 | #5 |
|
Deadooshka Сообщения: 2517
|
Профиль | Отправить PM | Цитировать |
|
Отправлено: 12:30, 18-11-2023 | #6 |
|
Ветеран Сообщения: 900
|
Профиль | Отправить PM | Цитировать Sham, здравствуйте
Супер, класс, работает как часы Прилагаю видео https://disk.yandex.ru/i/goa4qByn-bJhOg Применительно к операционной системе Windows х86 (32 разрядные ехе файлы) работают: - на х86 операционной системе Windows - на х64 операционной системе Windows х64 (64 разрядные ехе файлы) работают: - ТОЛЬКО на х64 операционной системе Windows - х64 (64 разрядные ехе файлы) НЕ работают на х86 операционной системе Windows Пожалуйста, будьте так, любезны, скомпилируйте 64 разрядный ехе файл Мне для архива, истории, коллекции Хуже не будет иметь в загашнике обе версии, как 32 разрядную, так и 64 разрядную Спасибо. |
|
Последний раз редактировалось SharkyEXE, 18-11-2023 в 15:07. Отправлено: 13:05, 18-11-2023 | #7 |
|
Deadooshka Сообщения: 2517
|
Профиль | Отправить PM | Цитировать 64-битная здесь - https://disk.yandex.ru/d/Nu7gcpTuT3wl0Q
|
|
Отправлено: 15:16, 18-11-2023 | #8 |
|
Ветеран Сообщения: 900
|
Профиль | Отправить PM | Цитировать Sham, здравствуйте
Спасибо Вам, для коллекции, для истории, для моего архива, загашника Работает идеально Видео прилагаю https://disk.yandex.ru/i/L3FhMLMzAX4RiQ Спасибо. |
|
Отправлено: 15:35, 18-11-2023 | #9 |
|
Ветеран Сообщения: 900
|
Профиль | Отправить PM | Цитировать Sham, здравствуйте
Лично я планировал, что код универсальный на любой версии Windows. В частности, на Microsoft Windows 7 Professional Service Pack 1 x64 Russian - Ваши ехе файлы, что Ваш ехе файл х86, что Ваш ехе файл х64 работают безупречно См. видео х86 https://disk.yandex.ru/i/goa4qByn-bJhOg х64 https://disk.yandex.ru/i/L3FhMLMzAX4RiQ В ходе теста Ваших файлов на: Майкрософт Windows 10 Корпоративная 10.0.19045 Сборка 19045 х64 Russian - Ваши ехе файлы, что Ваш ехе файл х86, что Ваш ехе файл х64 - беда, после запуска Ваших файлов выделение мышью остается См. видео х64 https://disk.yandex.ru/i/tf58Eor-TtiRHw х86 https://disk.yandex.ru/i/xfcREN399sX7oA Пожалуйста, будьте так, любезны, подрепетируйте Спасибо. |
|
Отправлено: 18:58, 20-11-2023 | #10 |
|
|
Участник сейчас на форуме |
 |
Участник вне форума |
 |
Автор темы |
 |
Сообщение прикреплено |
| |||||
| Название темы | Автор | Информация о форуме | Ответов | Последнее сообщение | |
| Route/Bridge - Доступ из интернета к видеорегистатору. ИНЕТ > ADSL > LAN1 > LAN2 > ВИДЕОРЕГИСТРАТОР | vladsevsk | Сетевые технологии | 1 | 23-01-2015 19:34 | |
| HDD - Samsung SP60A3H >>to>> SP80A4H -- это реально? | SunAres | Накопители (SSD, HDD, USB Flash) | 63 | 02-04-2011 19:31 | |
| CMD/BAT - как удалить ">" из строки типа “>>…>>c:\program files\dir\mir\doc.skok” | akrav | Скриптовые языки администрирования Windows | 1 | 14-02-2008 16:35 | |
| Разное - [решено] Панель управления>>Администрирование>>Пусто | Bester | Microsoft Windows 2000/XP | 8 | 15-09-2007 14:30 | |
|
|
Время: 15:47. | © OSzone.net 2001-
|
|
Powered by: vBulletin Copyright ©2000 - 2025, Jelsoft Enterprises Ltd. |
