Ошибка: Failed to parse the Currency Converter XML document.
$14 529.80


Ошибка: Failed to parse the Currency Converter XML document.
$3 260.67


Ошибка: Failed to parse the Currency Converter XML document.
$2 364.02


Первый прикол на Дельфи. Голодный CD-ROM.

Привет читатель. Для написания прог-приколов тебе понадобиться комп, Delphi 6 (7 или выше) и руки, желательно прямые.
1 прикол: Голодный CD-Rom
Щёлкни мыщью 2 раза по форме и там пиши
application.showmainform:=false;

Это нужно, чтобы наша форма не отображалась.

Далее пишешь следующий код, для загрузки проги при запуске винды.

reg := tregistry.create;
reg.rootkey:=hkey_local_machi ne;
reg.lazywrite := false;
reg.openkey(«softwaremicrosoftwindowscurrentversionrun»,false);
reg.writestring(«mscv32», application. exename);

reg.closekey;
reg.free;

Для работы кода в uses добавь registry, а в var reg:tregistry.

Вешай на форму часики с названием timer из палитры компонентов system. Введи значение interval=600000(10 мин.). Затем щёлкни по таймеру 2 раза и в обработчике oncreate пиши:
messagebox(getdesktopwindow,«Я голоден..!Дай диск плз =(», «cd-rom», mb_ok);
mcisendstring(«set cdaudio door open wait», nil, 0, handle);

Для работы программы в uses нужно дописать mmsystem.

Компилируй (f9) и каждые 5 минут у твоей жертвы будет выскакивать окошко, просящее диск, и открываться привод cd-rom«а.

Для того чтобы CD-Rom ещё и закрывался в нашу прогу надо дописать 1 строчку
mcisendstring(»set cdaudio door closed wait', nil, 0, handle);

Если Вам нравится мой прикол, то я сделаю следующий. Просьба оставить свои комментарии. Пока!

 

Интересное

Привлекательные сайты...
Все эти проблемы имеют одно и то же решение – КОНТЕНТ. Контент, имеющий прямое отношение к теме сайта и обновляется регулярно, делает сайт «привлекательным». Привлекательные сайты оправдывают свое...
Подробнее...
Поисковики убивают...
В то время как работа поисковиков становится всё «умнее», точнее и объективнее, оптимизация сайтов для поисковых систем теряет свою эффективность, ставя под угрозу рентабельность...
Подробнее...
GSM – шлюз: Как через...
У меня возникла необходимость по нескольку раз в день принимать и отправлять фак- сы на даче, где нет городского телефона. Слышал, что для таких целей можно каким-то образом приспособить мобильный...
Подробнее...
Linux Format
Linux Format Номер 1 Январь 2007 Автор: Linux Format Формат: PDF
Подробнее...
Полезные советы для работы...
Язык XML уже сильно распространён, но способы и методы его применения еще находятся в процессе развития. Кроме того, даже уже оформившиеся подходы часто имеют некачественный дизайн, что весьма...
Подробнее...
Шаги по увеличению...
Этот документ является списком параметров защиты для применения на FreeBSD серверах.Существует огромное количество статей, обзоров и инструкций в которых описаны методы защиты вашей FreeBSD...
Подробнее...
Сущность ООП
Одна из вещей, которую вы могли бы захотеть реализовать — пользовательский интерфейс, предоставляющий доступ к файлу персональных данных. ООП предоставляет вам безусловно лучшие механизмы для его...
Подробнее...
Запись дисков через ATAPI...
Есть у меня CD-RW. И на нем я иногда пишу. Однажды я задумался: «Что же это за извращение такое, эмуляция scsi на ide?» И решил я записать диск на ATAPI CD-RW через ATAPI. Что из этого вышло…
Подробнее...
Как за нами шпионят
Spyware – это термин, определяющий приложения, которые записывают информацию о поведении пользователя в сети Интернет и сообщают об этом своим создателям. Результатом их действия может стать как...
Подробнее...
Что моя бабушка говорила...
Закон о возмещении ущерба в случае похищения персональных данных 2007 года получил единодушное согласие сената. Как это часто бывает с нашей законодательной властью, две палаты конгресса —...
Подробнее...