Ainda preciso ajuda pra executar registroo de 30 em 30 dias

Question

Estou desenvolvendo uma aplica��o pra ser executada de 30 em 30 dias. Jah consegui fazer gravar a data atual no envento onshow do form como no codigo abaixo: regbb:=tregistry.create; try regbb.rootkey...

Sabado · Answer

Prezado:Voc� est� indo pelo caminho das pedras, ou seja, se eu tiver o seu sistema a atrasar o rel�gio do meu micro continuo usando-o.Fa�a com que o seu sistema rode apenas com a presen�a de uma determinada biblioteca (DLL) que poderia estar presente no diret�rio de instala��o.Nesta DLL voc� determina o per�odo de validade do seu sistema.Utilizo este m�tido para sistemas que necessitam de manuten��o mensal. Se o cliente paga, envio o arquivo do m�s para ele, sen�o o sistema para.N�o se esque�a que a propriedade do arquivo conta muito para isso....

O4pr3ndiz · Answer

Naum se trata de liberar o sistema mensalmente, como colocou... Eh uma rotina pra fazer backup de 30 em 30 dias..  soh isto.......

Edilcimar · Answer

backup deve ser feito todo dia e n�o de 30 em 30 dias, eu coloco nos meus programas um timer e mando fazer backup a cada 4 horas, afinal de contas fazer um backup demora poucos segundos...

Dopi · Answer

[quote:46b679f637=�o4pr3ndiz�]Naum se trata de liberar o sistema mensalmente, como colocou... Eh uma rotina pra fazer backup de 30 em 30 dias..  soh isto....[/quote:46b679f637]Porque n�o usar o agendador de tarefas do Windows ?   Vc poderia programar ele para executar o seu programa de backup a cada intervalo de tempo que vc desejar......

O4pr3ndiz · Answer

meu problema eh diferente das solu�oes apresentadas, pois quero automatizar isto no programa pra 30/30 dias... nda de agendador do windows, eh uma rotina do sistema que grava no registro do windows e verifica se jah passou de 30 dias que o form show abriu...

Por favor eh soh pra me ajudar no registro com compara�ao de datas, tive uma dica mas naum funcionou..

Siam · Answer

N�o � s� comparar a data atual com a do registro ?[code:1:6f30a6d830]if (Now - Reg.ReadDateTime(�Data�)) >= 30 then  ...[/code:1:6f30a6d830]...