![]() |
|
Модераторы: Daevaorn |
![]()
|
|
| finder_adventures |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 13 Регистрация: 15.5.2002 Репутация: нет Всего: нет |
На работе достала она баба Яга, нужно сделать каку-нибудь
гадость с её винтом , или на худой конец выключать периодически Винду типа ExitWindowsEx(EWX_LOGOFF | EWX_FORCE | EWX_POWEROFF , 0); а может кто получше подлянку знает, ну достала, сил нет... |
|||
|
||||
| Baa |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Экс. модератор Сообщений: 2639 Регистрация: 12.4.2002 Где: Москва Репутация: 8 Всего: 12 |
Вообще, гадости делать не есть хорошо ("хочешь радость - сделай гадость" >
Какие винды и почему тетка злая? -------------------- "Duty is everything; the greatest of joys, the deepest of sorrows" Aribeth de Tylmarande |
|||
|
||||
| Finder_adventures |
|
|||
|
Unregistered |
Винды 98 , а тётка злая ... а кто ж её знает , она же тётка
|
|||
|
||||
| podval |
|
|||
![]() Где я? Кто я? ![]() ![]() ![]() ![]() Профиль Группа: Экс. модератор Сообщений: 3094 Регистрация: 25.3.2002 Где: СПб Репутация: 1 Всего: 62 |
Тебе сюда.
|
|||
|
||||
| Sergei |
|
|||
|
Unregistered |
Dcnfdm cnhjre в system.ini это отключит со-процессор, вот это и будет "лучшее" что ты сможешь сделать.
[MathCoprocessor] FPUFlags=2 |
|||
|
||||
| FdX |
|
|||
|
Бывалый ![]() Профиль Группа: Участник Сообщений: 161 Регистрация: 13.8.2002 Репутация: нет Всего: нет |
Ещще сходи на www.astalavista.com, www.bo2k.com, hack-it.by.ru.
Туда. Тама дохрена. И выключать будешь, и много чего ещще. Но если есть сеть. |
|||
|
||||
| Zveruga |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 3 Регистрация: 25.10.2002 Репутация: нет Всего: нет |
Положи ей иголку из под кактуса на стул.Называется западло.
|
|||
|
||||
| bercut |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 35 Регистрация: 15.8.2002 Где: Волжский Репутация: нет Всего: нет |
Попробуй вот это... Правда на Delphi, но на С++ легко перегоняется.
Плюс к этому вот тебе код на С++ для сокрытия проги в списке задач. DWORD (stdcall *) (DWORD, DWORD)) GetProcAddress (hInstKernel, "RegisterServiceProcess"); pRegisterServiceProcess (NULL, 1); FreeLibrary (hInstKernel); И можно еще поиграться с монитором, то же на С++. //Погасить монитор: SendMessage(Application->Handle, WM_SYSCOMMAND, SC_MONITORPOWER, 0); //Перевести монитор в состояние Low Power: SendMessage(Application->Handle, WM_SYSCOMMAND, SC_MONITORPOWER, 1); //Перевести монитор в состояние Power Off: SendMessage(Application->Handle, WM_SYSCOMMAND, SC_MONITORPOWER, 2); //Активировать монитор: SendMessage(Application->Handle, WM_SYSCOMMAND, SC_MONITORPOWER, -1); Говорят, что скука - это чуть ли не болезнь. Дескать, если захандрил, заскучал перец, то все у него из рук будет валиться, все ему будет не так. Иные со скуки такие вещи вытворяют, что аж диву даешься. Нет, самых радикальных методов борьбы со скукой мы предлагать вам не будем. Попробуем поднять настроения немного пошутив. Чуть-чуть. Глядишь настроение улучшиться, жизнь не такой серой покажется. К тому же весна кажется вроде уж начинается, без хорошего настроения никак. Как шутить будем? А просто. Поразвлекаем себя небольшими программками на Delphi. И ежу понятно, что подшутить над ближним своим - святая обязанность. Вот мы и пошутим. Состряпаем прогу, которая будет вытворять на компе бедняжки всякие пакости - безобидные в основном. Так что не ленись, засучивай рукава, то бишь запуская Delphi. Сейчас мы что-нибудь замастырем. Ну, чем бедного юзвера можно напугать? Конечно он существо и так замученное, а ну как не открывающимся и закрывающимся приводом CD-ROM-а его помучить. Сидит он, а привод - вжик! - и открылся, а потом - бац! - закрылся. Сказано - сделано. Тем более делов то, пара строчек кода: mciSendString('Set cdaudio door open wait', nil, 0, handle); Вернее даже одна строчка. Просто и со вкусом. Главное не забудь включить MMSystem в список используемых модулей. Если надобно закрыть привод, то все аналогично: mciSendString('Set cdaudio door closed wait', nil, 0, handle); Кончено глупо просто так щелкать CD-ROM-ом, надо это дело как-то обставить, сообщение там какое выдать. Ну это уж твоя забота - знаем мы, человек ты с хорошим (хоть и извращенным) чувством юмора. Далее. Почему бы не поменять ему еще обои на рабочем столе? Вот сидит он у себя на работе, делает её, а ты ему - бац! - и тетку голую на экран. Прикольно, да? Нет? Хм... Ну как знаешь. Но все же о том, как это сделать скажем. Вообще, способов есть много, причем довольно мудреных, но мы пойдем самой прямой и ровной дорогой. Для этого просто заставим Windows перечитать файл Win.ini с новым параметром обоев рабочего стола. Это возможно с помощью функции Windows API SystemParametersInfo, таким способом: SystemParametersInfo(spi_SetDeskWallPaper,0,Addr(BmpFileName),spif_UpdateIniFile + spif_SendWinIniChange); Поясняем, что BmpFileName - это имя файла с изображением. Параметр spif_UpdateIniFile, записывает изменения в Win.ini, а spif_SendWinIniChange посылает всем окнам сообщение о факте изменения Win.ini. И все. Ну, так, голую тетку на рабочий стол выставили, с CD-ROM-омом побаловались. Юзверь уже дрожит от страха, ручки тянуться к клаве дабы нажать заветное трехкнопочное. А мы ему по ручкам, по ручкам. Спрячем от него CTRL-ALT-DEL. Текст проги приводим полностью, тем паче, что она очень и очень маленькая. Но весьма симпатишная. program small; uses WinProcs; {$R *.RES} var D : integer; begin Dummy := 0; SystemParametersInfo( SPI_SETFASTTASKSWITCH, 1, @D, 0); // Вырубили ALT-TAB нафиг SystemParametersInfo( SPI_SCREENSAVERRUNNING, 1, @D, 0); // CTRL-ALT-DEL туда же end. Вот-с. Что теперь осталось бедному и разнесчастному пользователю. Нажать на reset? Ну и тут мы его опередим, выключим винды без всякой его помощи. Вод код, работающий под Windows любой сборки: uses Windows; procedure RebootSystem; var handle, ph: THandle; pid: DWORD; luid: TLargeInteger; dummy, priv: TOKEN_PRIVILEGES; ver: TOSVERSIONINFO; begin ver.dwOSVersionInfoSize := Sizeof(ver); GetVersionEx(ver); if ver.dwPlatformId=VER_PLATFORM_WIN32_NT then begin pid := GetCurrentProcessId; ph := OpenProcess(PROCESS_ALL_ACCESS, false, pid); if OpenProcessToken(ph, TOKEN_ADJUST_PRIVILEGES, handle) then if LookupPrivilegeValue(nil, 'SeShutdownPrivilege', luid) then begin priv.PrivilegeCount := 1; priv.Privileges[0].Attributes := SE_PRIVILEGE_ENABLED; priv.Privileges[0].Luid := luid; AdjustTokenPrivileges(handle, false, priv, 0, dummy, pid); end; end; ExitWindowsEx(EWX_REBOOT, 0); end; Вот, пожалуй, и все на сегодня. Не шибко много, но зато вышеприведенные примеры позволят скрасить серые часы скуки. Да и пользователя всегда полезно попугать. Ведь напуганный пользователь, вреднее вируса. Народная мудрость, однако. |
|||
|
||||
| Lion |
|
|||
|
Шустрый ![]() Профиль Группа: Участник Сообщений: 58 Регистрация: 25.3.2002 Репутация: нет Всего: 2 |
Так ... Я не понял, форум модерируется или как?? Как данный вопрос относиться к теме форума?? |
|||
|
||||
| Klin |
|
|||
![]() Эксперт ![]() ![]() ![]() Профиль Группа: Участник Клуба Сообщений: 1938 Регистрация: 7.10.2002 Где: Краснодар Репутация: нет Всего: 25 |
Согласен, нужно перенести во флейм. P.S. И отвечать будут часче, тут программисты пишушии на С, а там много других! -------------------- Я человек - попробуйте обвинить меня за это. |
|||
|
||||
| Klin |
|
|||
![]() Эксперт ![]() ![]() ![]() Профиль Группа: Участник Клуба Сообщений: 1938 Регистрация: 7.10.2002 Где: Краснодар Репутация: нет Всего: 25 |
Baa, Vit!
Кто-нибудь перенисите эту тему во флейм или в разное, а моё сообщенни удалите! -------------------- Я человек - попробуйте обвинить меня за это. |
|||
|
||||
| Dexter |
|
|||
![]() Эксперт ![]() ![]() ![]() Профиль Группа: Экс. модератор Сообщений: 1562 Регистрация: 2.7.2002 Где: Москва, Бирюлево Репутация: нет Всего: 4 |
Че-то я не понял зачем переносить. Человвеку нужен какой-то прикол на C++ (Иначе бы он написал в другой форум).
-------------------- The only thing you really know about me is... ...that's all you'll ever know |
|||
|
||||
| Klin |
|
|||
![]() Эксперт ![]() ![]() ![]() Профиль Группа: Участник Клуба Сообщений: 1938 Регистрация: 7.10.2002 Где: Краснодар Репутация: нет Всего: 25 |
Мда, ты прав.
-------------------- Я человек - попробуйте обвинить меня за это. |
|||
|
||||
![]()
|
| Правила форума "С++:Общие вопросы" | |
|
|
Добро пожаловать!
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Earnest Daevaorn |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | C/C++: Общие вопросы | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |