Delphi - validar una fecha de vencimiento

necesito validar una fecha de vencimiento cada 14 dias y que me valla cubriendo el campo de la tabla en forma automatica cuando solicite una salida el cliente, si ya pasaron los 14 dias que en la nueva salida me ponga el numero 2 para multiplicar el valor por el vencimiento.... espero se entienda
gracias