<p dir="ltr">Pero no es lo mismo letras que Letras.</p>
<p dir="ltr">Saludos<br>
Pancho <br>
Córdoba <br>
Argentina </p>
<br><div class="gmail_quote">El dom, 24 de mayo de 2015 06:12, Juan Perles <<a href="mailto:perlesj@gmail.com">perlesj@gmail.com</a>> escribió:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">Quiero comprobar que lo tecleado sobre un campo Edit contenga tan sólo letras, para ello hago una rutina muy sencilla que es la siguiente:<br>
Función comprobar(tecleado :string):bolean;<br>
Const Letras : ['a .. z','A .. Z','á','é','í','ó','ú'];<br>
Var x : integer;<br>
For x :=1 to length(tecleado) do Begin<br>
    If tecleado[x] in letras tren<br>
    Else begin<br>
        Showmessage('hay un carácter extraño');<br>
        Result := false<br>
        Exit;<br>
End;<br>
<br>
El error se me produce cuando compiló en la sentencia Letras que me dice:<br>
"Ordinal expresión expected"<br>
<br>
Mi pregunta es cómo puedo comprobar que lo tecleado son sólo letras.<br>
<br>
Gracias de antemano.<br>
<br>
<br>
<br>
Juan Perles<br>
628.482.007<br>
Enviado desde mi iPad<br>
_______________________________________________<br>
Lazarus-es mailing list<br>
<a href="mailto:Lazarus-es@lists.lazarus.freepascal.org" target="_blank">Lazarus-es@lists.lazarus.freepascal.org</a><br>
<a href="http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es" target="_blank">http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es</a><br>
</blockquote></div>