Начальная страница
Поиск по базе
Операционная система
Настройка приложения
Взаимодействия приложений
Файлы и директории
Строки и символы
Математика
Базы данных
Интернет и сеть
Мультимедиа
Аппаратная часть
VCL
Другие разделы [0]
Количество записей в базе - 537
Сегодня добавлено – 0
|
Управление ОС
Добавить код в данный раздел
Возвращает handle Процесса из оперативки по имени exe файла
function GetProcessByEXE(exename:string):thandle;
Прислал: Alf
( 8 апреля 2008 г. )
Количество просмотров: 578
Отключение Windows File Protection для одного файла
procedure WFPKill(FN:string);
Прислал: Alf
( 8 апреля 2008 г. )
Количество просмотров: 510
Блокировка Диспетчера Задач в Win NT/2000/XP (Ctrl+Alt+Del)
procedure DisableTaskMgr(Disable:Boolean);
Прислал: Голубь Павел
(Kirovograd)
( 14 октября 2003 г. )
Количество просмотров: 4340
Коректное завершение работы любой версии Windows
function GetWinVersion: String;
Прислал: Danillo
( 16 марта 2003 г. )
Количество просмотров: 3523
Прячется от трех клавиш
procedure TForm1.Button1Click(Sender: TObject);
Прислал: Mirage
(Mirag)
( 15 ноября 2002 г. )
Количество просмотров: 3568
Переход в Спящий режим (WinNT)
Procedure NTSleep;
Прислал: DeMoN-777
(Санкт-Петербург)
( 21 сентября 2002 г. )
Количество просмотров: 2913
Показ и скрытие TaskBara
procedure ShowTaskBar(t: boolean);
Прислал: Gua
(Simferopol)
( 23 июля 2002 г. )
Количество просмотров: 2762
Замена обоев на рабочем столе
procedure ChangeWallpaper(Path: String);
Прислал: Gua
(Simferopol)
( 18 июля 2002 г. )
Количество просмотров: 2773
Замена обоев на рабочем столе
procedure ChangeWallpaper(Path:PWideChar);
Прислал: Gua
(Simferopol)
( 18 июля 2002 г. )
Количество просмотров: 2443
Power off (Убивает процессы)
procedure Shutdown2;
Прислал: DeMoN-777
(Санкт-Петербург)
( 21 июня 2002 г. )
Количество просмотров: 3268
Перезагрузка в WinNT (Убивает процессы)
procedure reboot2;
Прислал: DeMoN-777
(Санкт-Петербург)
( 21 июня 2002 г. )
Количество просмотров: 2586
Перезагрузка в WinNT (не убивает процессы)
procedure reboot;
Прислал: DeMoN-777
(Санкт-Петербург)
( 21 июня 2002 г. )
Количество просмотров: 2466
Переход в ждущий режим под WinNT
Procedure NTSleep;
Прислал: DeMoN-777
(Санкт-Петербург)
( 21 июня 2002 г. )
Количество просмотров: 2323
Power off (не убивает процессы)
procedure ExitWinNT(AShutdown: Boolean);
Прислал: DeMoN-777
(Санкт-Петербург)
( 21 июня 2002 г. )
Количество просмотров: 2437
Инсталляция/удаление сервисов под НТ.
function CreateNTService(ExecutablePath,ServiceName: String):boolean; function DeleteNTService(ServiceName: String):boolean;
Прислал: Alex Kantchev
( 19 июня 2002 г. )
Количество просмотров: 4650
Частичная блокировка/разблокировка функций клавиатуры и мышки.
unit mklu
Прислал: VID
(Махачкала)
( 3 июня 2002 г. )
Количество просмотров: 3913
Блокировка/Разблокировка системы.
unit locksys
Прислал: VID
(Махачкала)
( 26 мая 2002 г. )
Количество просмотров: 4019
Переключение раскладки клавиатуры для приложения
function ChangeLayout(LANG: Integer): Boolean;
Прислал: Dimka Maslov
(Санкт-Петербург)
( 21 мая 2002 г. )
Количество просмотров: 3065
Завершение работы WinNT/2000
procedure Shutdown
Прислал: Дмитрий Баранов
(Москва)
( 07 мая 2002 г. )
Количество просмотров: 3145
Завершение процесса
Function KillProcess(pid:integer):boolean;
Прислал: Gua
(Simferopol)
( 05 мая 2002 г. )
Количество просмотров: 3309
Изменение разрешения экрана
procedure ChangeDisplayResolution(x, y : word);
Прислал: Ajax
( 27 апреля 2002 г. )
|