![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Подскажите алгоритм 30-и дневневного использования программы... [D7, WinXP]
Makks © (2004-07-29 16:41:00)Подскажите алгоритм 30-и дневневного использования программы... Причем при перемене даты на компъютере, дни не сбиваются...
П7 (2004-07-30 11:20:00) [1]
> DK (29.07.04 17:27) [2]
Я плакал... Разместил в своём днеснике... Если хочешь, могу копирайты поставить, только скажи на кого ссылкаться...
TUser (2004-07-30 11:11:00) [2]for i:=0 to 29 do begin
t:=now;
{use program}
while DaysBetween(t,now) < 1 do
sleep(1000);
end;
Vlad Oshin (2004-07-30 10:52:00) [3]Антикрэковые мучения на Кор.Делфи
Вариант от перевода часов - смотреть дату посл. обращения к к.л. файлам
Sir John (2004-07-29 22:15:00) [4]посмотрите вот тут:
http://sourceforge.net/projects/tponguard/
свободно распространяемые компоненты onGuard от TurboPower, которые призваны делать демо программы. Демо-версии программ, созданные с помощью этих компонент могут:
- иметь ограничения по количеству стартов
- иметь ограничения по количеству дней использования (например, 4 дня с момента первого старта программы)
- иметь ограничения по времени использования (до определенной даты)
- поддерживают внутренние модификаторы кода
- имеют защиту от внешнего вторжения в код программы
Компоненты идут с исходниками. Копайтесь, смотрите. Для начала Вам этого хватит :)
----------------------------
С уважением
Sir John
NJoe (2004-07-29 18:41:00) [5]тебе на cracklab.ru :)
Анонимщик (2004-07-29 18:24:00) [6]Это все извращения. На самом деле нет такого алгоритма.
DK (2004-07-29 17:36:00) [7][4], [5]
Спасет обычный перевод даты назад
clickmaker (2004-07-29 17:30:00) [8]
> Причем при перемене даты на компъютере, дни не сбиваются
Варианты:
-При запуске проги увеличивать счетчик дней, не учитывая многократные запуски в одни сутки. Счетчик хранить в секретном месте, н-р, где-нить в недрах реестра
-Получать время с сервака (с КД, если он есть)
Алхимик (2004-07-29 17:29:00) [9]
> [2] DK (29.07.04 17:27)
Гениально.
Vasya.ru (2004-07-29 17:29:00) [10]Лепишь ключь в реестре, каждый день увеличиваешь его значение на 1, и сравниваешь с 30. Уродство конечно, но работает (честно говоря сам никогда не пробовал, да и не думал над реализацией таких алгоритмов)
DK (2004-07-29 17:27:00) [11]procedure TForm1.FormCreate(Sender: TObject);
begin
Timer1.Interval:=30 дней;
Timer1.Enabled:=true;
end;
procedure TForm1.Timer1Timer(Sender: TObject);
begin
Close;
end;
Алхимик (2004-07-29 17:22:00) [12]Как ты себе это представляешь?