Hola tebre,
¿Esperas que probemos todo ese código?
No es por ser malo, pero esto me suena a: "corrijanmelo".
Si al menos emplearas la etiquetas DELPHI, se podría entender mejor toda esa maraña.
¿En que parte del todo el código te arroja el error? En vez de estar probando y adivinando donde está el problema, ¿porqué no nos indicas en que línea tienes problemas? Por cierto, sería recomendable que copiaras el error textualmente.
Saludos,