problemas para validar el "enter" chr(13)

[sakuragi]

hola que tal
gracias por responde.. pero todavia sigo teniendo problemas

no me funciona el #13+#10

los hise en un case

case pal[k] of

chr(13+10): // enter
begin
matriz[inicio,9]:='100';
inicio:=(strtoint(matriz[inicio,9]))
end;

tambien asi:

con un if

if (Pal[k]=#13+#10)then
begin
matriz[inicio,9]:='100';
inicio:=(strtoint(matriz[inicio,9]));
end;

segui el comentario que me dieron pero no me a funcionado. no se a podedido entrar ni en el case ni en el if

de hante manos gracias