puerto mercante

[goomba91]

saludos, estoy realizando un programa con delphi 7 sobre un puerto en el cual amarran una serie de barcos que transportan una cantidad x de kilos de pescado, si la cantidad de kilos era superior a 500 debia darlos como validos, hasta aqui bien, el problema me surge cuando:
1) se me pregunta cuantos barcos han sido "validos" entre dos fechas.
2) me piden el numero de tripulantes que se han visto invalidados durante esas 2 fechas

hice un registro t_barco para almacenar los datos que incluia lo siguiente

nombre: string
tiempo: t_fecha
(t_fecha =record
dia: 1..31
mes: 1..12
ano: 1900..2100)*si hay una forma mas simple tipo dd/mm/aaaa lo agradezco*
tripulantes: integer
kilos: real
valido: boolean

todos los datos se introducen por pantalla