Pascal/Turbo Pascal - Ayuda con fallo por favor, me estoy volviendo loco

Filtrado por el usuario: vlg
<<>>
Filtrado por el usuario 'vlg' (Eliminar fitro)
 
Vista: