Внимание!!! В Конструкторах есть собственная функция "Trial", подробнее: http://forum.segnetics.com/showthread.php?t=514
Вот готовый макрос, подходящий под определение "Trial". Т.е. вы пишите программу, проводите пуско-наладочные работы, и когда всё работает, у заказчика резко пропадает интерес быстро и беспроблемно перевести на ваш счёт деньги.
Для быстрого и надёжного решения таких проблем очень пригодится предлагаемый макрос.
Если выход макроса в единице - значит период "бесплатной" работы для клиента окончился, можно что-то в программе заблокировать.
Изначально отсчитывает месяц.
Продлить на месяц можно, нажав на клавиатуре контроллера последовательно следующие клавиши: "влево-вправо-вверх-вверх-вверх-вниз-вниз-вниз-вправо-влево".
Количество продлений неограничено.
Когда клиент заплатит деньги, можно отключить блокировку навсегда, нажав на клавиатуре контроллера последовательно следующие клавиши: "влево-влево-вверх-вверх-вверх-вниз-вниз-вниз-вправо-вправо".
"Бесплатный период", "Код продления" и "Код отключения" можно сменить внутри макроса.
PS. 18 ноября 2008 макрос обновлён! Раньше был рассчитан на "щелчок питанием" после продления срока, теперь этого не требуется.