Programacion condicional

[mamcx]

Empieze por mejorar como escribes el codigo. La indentación que tienes es muy rara. Si prestas atencion, por ejemplo, el BEGIN siempre se usa para iniciar un bloque y no se acompaña con nada (y es raro ver "then begin", es mas idiomatico "then ENTER begin").

Usa un formateador de codigo y veras como la diferencia.

A proposito, chequea la guia oficial de como se escribe pascal:

http://edn.embarcadero.com/article/10280

En vez de inventar tu propio estilo, apegate al estilo que se usa de forma general por la comunidad y el codigo que trae delphi. Puede que hayan un par de cosas que es mejor cambiar, pero para arrancar es mejor ceñirse de forma estrica a una norma (y entenderla) antes de "innovar".

---
Con respecto al error, busca en google lo que es. Los errores del compilador SIEMPRE son ciertos, aunque no siempre parecen lógicos.

Es buena idea que recorras el programa y en voz alta describas lo que hace, LUEGO, usa el depurador y chequea si lo que dices coincide.

Si el error no permite empezar a depurar, entonces siendo esto un codigo muy corto, reescribelo (o comenta las lineas) y vuelve a hacerlo. Verás que hay algo que siempre se te pasa por alto

--
P.D: Si logro entender lo que estas haciendo, quieres hacer una validacion de clave. Si es asi, estas complicando el como se hace eso.