Pourquoi faire un include ?

utilise Uses.


Uses LECT1DE.pas;


ensuite essaye de ne pas nommer tes unités comme tes fonctions :