Fórum Controlar Alguel de Sistema #194323

11/11/2003

0

Delphi

Alguem tem uma rotina para CONTROLE DE ALUGUEL DE SISTEMAS que pudesse me passar?

Grato,

Mardônio


Mardônio

Mardônio

Responder

Posts

15/11/2003

Mardônio

???


Responder

Gostei + 0

15/11/2003

Mardônio

???


Responder

Gostei + 0

15/11/2003

Mardônio

???


Responder

Gostei + 0

16/11/2003

Dgsfilho

Você pode trocar o .exe periodicamente, se não conseguir fazer nenhuma rotina onde peça uma senha diferente a cada período.

Colocar no evento OnCreate, OnActivate ou OnShow do form.

var DataExp, DataIni : TDateTime;
begin
DataIni := Now;
DataExp := 37940; //37940 = 15/11/2003
if DataExp >= DataIni then
ShowMessage(´O prazo de validade será vencido em ´+ DateToStr(DataExp)+#13+ ´Após esse prazo entre em contato com o Desenvolvedor.´)
else
Application.Terminate;
end;

É um exemplo bem simples espero que ajude :!:


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar