Buscar por:
Código function SubData(DataEmprestimo: TDataTime) : Integer; begin result := Date - DataEmprestimo; end;
function SubData(DataEmprestimo: TDataTime) : Integer; begin result := Date - DataEmprestimo; end;
Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009