Pascal/Turbo Pascal - validacion del ingreso de una fecha

Hola mi problema es que no tengo idea como puedo llegar a hacer algo
Yo tengo definida la fecha como un registro de tres campos dd mm aa y cada uno es de tipo string [2] pero como hago en el programaprincipal para leer la fecha y para validar que el usuario la ingrese correctamente ya que debe ingresar dos diigitos por campo
por favore espero una respuesta favorable graciasssss

Debes pedir cada campo por separado con ReadLn.
Suponiendo que tu registro tiene esta definición

type
TFecha=record
Ano,mes,dia:string[2];
end;
var
Fecha: TFecha;

Deberías hacer algo así, bien sencillo:

begin
Write('Ingrese día: ');
ReadLn(Fecha.Dia);
Write('Ingrese mes: ');
ReadLn(Fecha.Mes);
Write('Ingrese Año: ');
ReadLn(Fecha.Ano);
end.

Como los tres campos son de tipo string el usuario puede ingresar lo que se le antoje teclear aunque solamente los dos primeros caracteres se almacenarán en esos campos, aunque esos dos caracteres sean letras.