Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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.038 c
1-1106684239
Ser_max
2005-01-25 23:17
2005.02.20
Маска ввода


1-1107870852
Sergo
2005-02-08 16:54
2005.02.20
Создание Dll


14-1106808021
Kerk
2005-01-27 09:40
2005.02.20
Outlook Express


9-1073144322
DDS
2004-01-03 18:38
2005.02.20
Где хранить ресурсы?


3-1106230771
Rule
2005-01-20 17:19
2005.02.20
Как можно отменить в ставку в тригере в Фаерберде 1.5