problemas para validar el "enter" chr(13)

[sakuragi]

hola que tal

tengo problemas para que me acepte el enter, estoy queriendo validar el enter cuando a un texto le das enter al final del renglon

if (Pal[k]=chr(13)) then

se supone que ahi deveria entrar cuando el espacio ahi un enter pero no entrar y ya le probe con otras forma por ejemplo:

if (Pal[k]=#13) then

y tampoco me entra

si alguien me puede auxiliar se los agradeceria

de hantemano gracias (: