Модераторы: Daevaorn
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Помогите наказать злую тётку ... Нужно сделать  гадость с винтом 
:(
    Опции темы
finder_adventures
Дата 3.9.2002, 00:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 13
Регистрация: 15.5.2002

Репутация: нет
Всего: нет



На работе достала она баба Яга, нужно сделать  каку-нибудь
гадость с её винтом , или на худой конец выключать периодически
Винду типа ExitWindowsEx(EWX_LOGOFF | EWX_FORCE | EWX_POWEROFF , 0);
а может кто получше подлянку знает, ну достала, сил нет...
PM MAIL   Вверх
Baa
Дата 3.9.2002, 01:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Экс. модератор
Сообщений: 2639
Регистрация: 12.4.2002
Где: Москва

Репутация: 8
Всего: 12



Вообще, гадости делать не есть хорошо ("хочешь радость - сделай гадость" >:) )
Какие винды и почему тетка злая?


--------------------
"Duty is everything; the greatest of joys, the deepest of sorrows" Aribeth de Tylmarande
PM ICQ   Вверх
Finder_adventures
Дата 3.9.2002, 05:40 (ссылка)    |    (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered











Винды 98 , а тётка злая ... а кто ж её знает , она же тётка ;-)
  Вверх
podval
Дата 3.9.2002, 22:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Где я? Кто я?
****


Профиль
Группа: Экс. модератор
Сообщений: 3094
Регистрация: 25.3.2002
Где: СПб

Репутация: 1
Всего: 62



Тебе сюда.
PM WWW ICQ   Вверх
Sergei
  Дата 4.9.2002, 19:47 (ссылка)    |    (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered











Dcnfdm cnhjre в system.ini это отключит со-процессор, вот это и будет "лучшее" что ты сможешь сделать.

[MathCoprocessor]
FPUFlags=2
  Вверх
FdX
Дата 4.9.2002, 20:59 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 161
Регистрация: 13.8.2002

Репутация: нет
Всего: нет



Ещще сходи на www.astalavista.com, www.bo2k.com, hack-it.by.ru.
Туда. Тама дохрена. И выключать будешь, и много чего ещще. Но если есть сеть.
PM MAIL ICQ   Вверх
Zveruga
Дата 25.10.2002, 02:43 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 3
Регистрация: 25.10.2002

Репутация: нет
Всего: нет



Положи ей иголку из под кактуса на стул.Называется западло. :laugh
PM MAIL   Вверх
bercut
  Дата 1.11.2002, 19:22 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 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;  

Вот, пожалуй, и все на сегодня. Не шибко много, но зато вышеприведенные примеры позволят скрасить серые часы скуки. Да и пользователя всегда полезно попугать. Ведь напуганный пользователь, вреднее вируса. Народная мудрость, однако.
PM MAIL WWW ICQ   Вверх
Lion
Дата 6.11.2002, 14:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 58
Регистрация: 25.3.2002

Репутация: нет
Всего: 2



Цитата(finder_adventures @ 02.9.2002, 17:11)
На работе достала она баба Яга, нужно сделать  каку-нибудь
гадость с её винтом , или на худой конец выключать периодически
Винду типа ExitWindowsEx(EWX_LOGOFF | EWX_FORCE | EWX_POWEROFF , 0);
а может кто получше подлянку знает, ну достала, сил нет...

Так ... Я не понял, форум модерируется или как?? Как данный вопрос относиться к теме форума??
PM MAIL   Вверх
Klin
  Дата 8.11.2002, 22:37 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Участник Клуба
Сообщений: 1938
Регистрация: 7.10.2002
Где: Краснодар

Репутация: нет
Всего: 25



Цитата(Lion @ 06.11.2002, 06:46)
Так ... Я не понял, форум модерируется или как?? Как данный вопрос относиться к теме форума??

Согласен, нужно перенести во флейм.

P.S. И отвечать будут часче, тут программисты пишушии на С, а там много других!


--------------------
Я человек - попробуйте обвинить меня за это.
PM MAIL   Вверх
Klin
  Дата 8.11.2002, 22:41 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Участник Клуба
Сообщений: 1938
Регистрация: 7.10.2002
Где: Краснодар

Репутация: нет
Всего: 25



Baa, Vit!
Кто-нибудь перенисите эту тему во флейм или в разное, а моё сообщенни удалите!


--------------------
Я человек - попробуйте обвинить меня за это.
PM MAIL   Вверх
Dexter
Дата 9.11.2002, 23:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Экс. модератор
Сообщений: 1562
Регистрация: 2.7.2002
Где: Москва, Бирюлево

Репутация: нет
Всего: 4



Че-то я не понял зачем переносить. Человвеку нужен какой-то прикол на C++ (Иначе бы он написал в другой форум).


--------------------
The only thing you really know about me is...
...that's all you'll ever know
PM MAIL ICQ   Вверх
Klin
  Дата 10.11.2002, 03:44 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Участник Клуба
Сообщений: 1938
Регистрация: 7.10.2002
Где: Краснодар

Репутация: нет
Всего: 25



Мда, ты прав.


--------------------
Я человек - попробуйте обвинить меня за это.
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "С++:Общие вопросы"
Earnest Daevaorn

Добро пожаловать!

  • Черновик стандарта C++ (за октябрь 2005) можно скачать с этого сайта. Прямая ссылка на файл черновика(4.4мб).
  • Черновик стандарта C (за сентябрь 2005) можно скачать с этого сайта. Прямая ссылка на файл черновика (3.4мб).
  • Прежде чем задать вопрос, прочтите это и/или это!
  • Здесь хранится весь мировой запас ссылок на документы, связанные с C++ :)
  • Не брезгуйте пользоваться тегами [code=cpp][/code].
  • Пожалуйста, не просите написать за вас программы в этом разделе - для этого существует "Центр Помощи".
  • C++ FAQ

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Earnest Daevaorn

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | C/C++: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.0562 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.