É necessário Estar declarado Windows na seção uses,
em versões unicode declare Winapi.Windows.
Função do Delphi: IsCharAlpha ( Char )
Retorno: LongBool
Exemplos de uso:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 | procedure TForm1.Button1Click(Sender: TObject); begin if IsCharAlpha('e') then ShowMessage('O Caracterer é letra.') else ShowMessage('O Caracterer não é letra.'); if IsCharAlpha('7') then ShowMessage('O Caracterer é letra.') else ShowMessage('O Caracterer não é letra.'); if IsCharAlpha('*') then ShowMessage('O Caracterer é letra.') else ShowMessage('O Caracterer não é letra.'); end; |
