Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 17.07.2013, 17:46   #1
era1fgg
 
Регистрация: 05.03.2010
Сообщений: 5
По умолчанию Условие Запуска Программы

Доброго времени суток, как сделать простенькую защиту для программы от копирования? например поместить какой нибудь файл в папку system32 и сделать условие запуска программы только при наличии этого файла на компьютере
era1fgg вне форума Ответить с цитированием
Старый 17.07.2013, 22:16   #2
whatever
a.k.a. Skull
Форумчанин
 
Регистрация: 17.11.2009
Сообщений: 963
По умолчанию

Код:
if not fileexists('C:\windows\system32\check.smth') then exit;
Все тривиальное просто
whatever вне форума Ответить с цитированием
Старый 18.07.2013, 08:24   #3
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
например
Ты должен понимать, что эта защита легко снимается.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 18.07.2013, 14:32   #4
Xaker_Two
Пользователь
 
Регистрация: 03.02.2013
Сообщений: 73
По умолчанию

в реестр можно писать в свою папку/ключ данные
для этого в uses допиши registry далее проверка ключа
Код:
 reg := TRegistry.Create;
  reg.RootKey := HKEY_CLASSES_ROOT;
  if reg.KeyExists('gpt') = false then gpt:=0;
  if reg.KeyExists('gpt') = true then gpt:=1;
  reg.Free;
где идет проверка ключа gpt и если он есть то в переменную пишется 1 можно и подругому... а после успешной проверки твои действия
если нет ключа то 0 и действия такие
Код:
      reg := TRegistry.Create;
      reg.RootKey := HKEY_CLASSES_ROOT;
      reg.CreateKey('gpt');
      reg.CloseKey;
      reg.Free;
причом надо будет ещо ввести переменную reg типа TRegistry

или можно допустим сделать инсталятор который будет добавлять ключ определенный с значением 1, после ввода ключа продукта(или чего ещо там) писать новый ключ со значением 1 и если когото из них нет или значение 0 то выводить окошко типа введите ключ

вообще это часть кода моего вируса))

Последний раз редактировалось Xaker_Two; 18.07.2013 в 14:42.
Xaker_Two вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Время запуска программы Larboss Общие вопросы Delphi 5 06.01.2012 23:44
Кнопка запуска программы Vitalya_1993 Помощь студентам 1 14.12.2011 10:48
Ограничить количество запуска программы Tuman777 Общие вопросы Delphi 12 15.10.2011 20:27
Логирование запуска программы Dima DDM Общие вопросы Delphi 0 05.08.2011 15:48
Как создать условие запуска макроса fx59 Microsoft Office Excel 17 12.07.2011 20:48