Rotina para data no contas a receber

Delphi

20/02/2003

Caro(s) Amigo(s),


Estou tendo muito problema com um cliente es especial, pois uma usuária, está alterando a data do windows para o sistema aceitar ela dar baixa em prestações, colocando assim esse recebimento para a data anterior.



Ficarei muito agradecido, se alguem puder mandar alguma rotina.



desde já, agradeço,


Wiltefran Silva,
Programador - Meggasoft Informatica
Balsas-MA


Maranhao

Maranhao

Curtidas 0

Respostas

Anonymous

Anonymous

20/02/2003

cara, se eu fosse vc eu comparava a data do windows com a data de um arquivo.
exemplo : o system.ini é modificado sempre q o PC liga, ou seja, ele tem a data atual.

entao antes de fazer a baixa vc confere se a data do windows esta igual a data do arquivo system.ini assim:

Begin
DataArq:= FileDateToDateTime(FileAge(´system.ini´));
if DataArq > now() then
showmessage(´dfdsfdsfd´ );
application.terminate;
End;

cara, algo desse tipo. entendeu ?
qualquer coisa: ricardo@ultralevebrasil.com


GOSTEI 0
POSTAR