Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Срок действия программы [D6, D7, WinXP]

fluxion © (2008-01-23 03:03:00)
Здравствуйте!
Подскажите как в своей программе задать срок ее действия? Может нужны спец. компоненты?

Sokol (2008-01-25 10:14:00) [1]
Удалено модератором

Virgo_Style (2008-01-24 15:39:00) [2]
AntonUSAnoV (24.01.08 12:26) [9]
Гениально)

grisme (2008-01-24 14:32:00) [3]

> Skyle © (24.01.08 12:29) [10]
> > AntonUSAnoV (24.01.08 12:26) [9] Значит действительно
> только слышал....

да нифига %-)

Skyle (2008-01-24 12:29:00) [4]

> AntonUSAnoV (24.01.08 12:26) [9]

Значит действительно только слышал....

AntonUSAnoV (2008-01-24 12:26:00) [5]

> megabyte

нет слышал, я после всего кода который предложил
> Slym ©

вставил ещё except end; но тогда этот всё запускается, но там где должно выдаваться сообщение о продлении лицензии оно не выдаётся.

megabyte (2008-01-24 12:17:00) [6]
Про блоки Try ...Except/Finally не слышал?

AntonUSAnoV (2008-01-24 12:15:00) [7]
> Slym ©

Вставил Ваш код, пишет
[Ошибка] tennis.dpr(51): EXCEPT or FINALLY expected

KSergey (2008-01-24 11:32:00) [8]
Все зависит от цены программы.
Уверен, гугль по словам "методы защиты программ от взлома" выдаст много полезных ссылок. В том числе и компоненты.

Washington (2008-01-24 11:28:00) [9]

> fluxion © (23.01.08 03:03)
Hasp HL Time. Вроде так называется :) Более менее надёжно

Slym (2008-01-23 07:43:00) [10]
fluxion © (23.01.08 5:47) [3]
перепиши ее и перекомпилируй
или она "несовсем твоя"?

fluxion (2008-01-23 05:47:00) [11]
Программа уже есть, написанная на Delphi 7.

Slym (2008-01-23 04:04:00) [12]
Все ломается... делать тяжелые навесы, пыхтеть над защитой - всеравно кому надо сломают...
например так:
program RuFonts; {$APPTYPE CONSOLE} {$DEFINE NeedReg} uses SysUtils; begin try Writeln('Program for downloading RU fonts to remote TCP-IP PCL compatible printer.'); Writeln('Creator: Slym, e-mail: slym99@mail.ru'); {$IFDEF NeedReg} Writeln('Registered up to 01.01.2008, for extension communicate with me.'); if Now>EncodeDate(2009,1,1) then raise Exception.Create('Sorry... Registration expired.'); {$ENDIF}

Германн (2008-01-23 03:20:00) [13]

> fluxion © (23.01.08 03:03)
>
> Здравствуйте!
> Подскажите как в своей программе задать срок ее действия?
> Может нужны спец. компоненты?
>

А программа уже есть? Или только "в планах".

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »