Текущий архив: 2005.02.20;
Скачать: CL | DM;
Вниз
Ограниченние запуска программы Найти похожие ветки
← →
Алексей (2005-02-02 22:39) [0]Помогите!!!
Нужно наложить ограничение на программу по количеству запусков.
Т.Е. допустим разрешается открыть прогамму 20 раз после чего должно появится окно с предложением зарегистрироваться.
Помогите очень нужно .
← →
Alex_Petr © (2005-02-02 22:51) [1]
function TestDblStart(Mut:PAnsiChar):Boolean;
var
Hand:THandle;
begin
Hand:=CreateMutex(nil,True,PAnsiChar("Global\"+Mut));
Result:=GetLastError=ERROR_ALREADY_EXISTS;
if Result then Result:=Hand=0 else CloseHandle(Hand);
end;
// "Global\" добавляешь, если надо глобально
← →
Anatoly Podgoretsky © (2005-02-02 23:33) [2]N := N - 1;
if N <= 0 then Приглашение;
← →
diabolik © (2005-02-03 05:13) [3]Могу предложить писать количество уже произведенных запусков в свою ветку в реестре. А само количество вычислять как предложил Anatoly Podgoretsky. Можно еще хранить в dll все это вместе с функцией а в программу возвращить только результат - true false/ Так наверное даже лучше будет!
← →
Gloomer © (2005-02-03 09:04) [4]Пожалуй, лучшее место хранения - это реестр. Только ни в коем случае не стоит хранить количество запусков в открытой форме. Применяй кодирование по своему уникальному алгоритму.
Недостаток такого метода: при помощи regmon находим ключ реестра к которому обращается прога и удаляем его.
Поэтому в процессе инсталяции задаем значение ключа и если ключа в реестре нет, значит выдаем приглашение.Но и это все равно можно обойти - запоминаем значение сразу после инсталяции и затем регулярно его восстанавливаем.
← →
Proga (2005-02-03 12:31) [5]Alex_Petr, чёто не пойму - а где задаётся количество разрешаемых запусков?
← →
Alex175 (2005-02-03 14:22) [6]Надо ввобще смириться и дать использовать людям программу сколько они хотят. :)
← →
Proga (2005-02-03 17:11) [7]Нет! Самому надо такое. Ну прикиньте-пишете прогу, карячитесь над ней ночами, а потом кто-то взял и присвоил и спасибо не сказал!
← →
SaveDialog12331 (2005-02-03 21:57) [8]Напиши DLL которая запускается rundll32.exe после закрытия программы и вносит изменения в EXE :))))Тупой совет
← →
Anatoly Podgoretsky © (2005-02-03 22:30) [9]Мультик про Простоквашино - теперь ты за ним еще день будешь бегать, почему? Чтобы отдать.
← →
Печкин (2005-02-04 02:02) [10]
> [9] Anatoly Podgoretsky © (03.02.05 22:30)
> ...теперь ты за ним еще день будешь бегать, почему? Чтобы отдать.
Чтобы поддать?
Страницы: 1 вся ветка
Текущий архив: 2005.02.20;
Скачать: CL | DM;
Память: 0.49 MB
Время: 0.041 c
