Любой язык - Снять птичку/галочку Общие -> Правка -> Выделение мышью (Отключить выделение мышью)

Аватара пользователя
SharkyEXE

Любой язык - Снять птичку/галочку Общие -> Правка -> Выделение мышью (Отключить выделение мышью)

Сообщение SharkyEXE »

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



Операционная система: 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






Скрытый текст

[spoiler]Код:
[/spoiler]

Код: Выделить всё

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

В процессе использования одного и того-же exe файла QuickEdit_While_Wend_v2.0.50727.exe на разных:

- версиях 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 или нет антивируса

и самое главное - не зависло, установлена или нет некая версия .Net Framework, чтобы НЕ было предложения установить некую версию .Net Framework - так сказать, смешно, ради 1-2-3 Килобайтного файла на разном количестве



Код:

Код: Выделить всё

- версиях Windows (7, 10, 11)
- права администратора или права пользователя
- х86 или х64
- антивирус доктор веб 13 или нет антивируса

если увижу ошибку - сразу устанавливать некую версию .Net Framework



Спасибо.
Аватара пользователя
Sham

Re: Любой язык - Снять птичку/галочку Общие -> Правка -> Выделение мышью (Отключить выделение мышью)

Сообщение Sham »

quick mode что-ли отключить в консоли?

Вот простая сишечка отключает. Компилируйте в mingw.



Код:

Код: Выделить всё

#include 
#include 
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;
}

Файл 169326
Аватара пользователя
Serguei Kouzmine

Re: Любой язык - Снять птичку/галочку Общие -> Правка -> Выделение мышью (Отключить выделение мышью)

Сообщение Serguei Kouzmine »

Sham, здравствуйте.



Пожалуйста, будьте так любезны, хочется науки, знаний, если возможно, будьте так, любезны, научите, немного, а как из Вашего кода сделать чем проще, тем лучше - без наворотов в виде графических интерфейсов, GUI интерфейса и прочего ненужного, чем меньше размер на выхлопе ехе файла, тем лучше, без уси-пуси, сюси-нюси?



Спасибо.
Аватара пользователя
SharkyEXE

Re: Любой язык - Снять птичку/галочку Общие -> Правка -> Выделение мышью (Отключить выделение мышью)

Сообщение SharkyEXE »

Sham, здравствуйте.



Пожалуйста, будьте так любезны, хочется науки, знаний, если возможно, будьте так, любезны, научите, немного, а как из Вашего кода сделать чем проще, тем лучше - без наворотов в виде графических интерфейсов, GUI интерфейса и прочего ненужного, чем меньше размер на выхлопе ехе файла, тем лучше, без уси-пуси, сюси-нюси?



Спасибо.
Аватара пользователя
SharkyEXE

Re: Любой язык - Снять птичку/галочку Общие -> Правка -> Выделение мышью (Отключить выделение мышью)

Сообщение SharkyEXE »

Sham, здравствуйте



Пишется, лично у меня





Скрытый текст

[spoiler]Страница не найдена. Если вы уверены, что использовали правильную ссылку, свяжитесь с администрацией[/spoiler]


Если это возможно, будьте так, любезны, прикрепите Яндекс.Диск, Майл Облако или любой другой файлообменник
Аватара пользователя
SharkyEXE

Re: Любой язык - Снять птичку/галочку Общие -> Правка -> Выделение мышью (Отключить выделение мышью)

Сообщение SharkyEXE »

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

Re: Любой язык - Снять птичку/галочку Общие -> Правка -> Выделение мышью (Отключить выделение мышью)

Сообщение SharkyEXE »

Sham, здравствуйте



Спасибо Вам, для коллекции, для истории, для моего архива, загашника



Работает идеально



Видео прилагаю



https://disk.yandex.ru/i/L3FhMLMzAX4RiQ




Спасибо.
Ответить

Вернуться в «Скриптовые языки администрирования Windows»