Identificar se é letra ou numero no edit

fazer mais ou menos o seguinte:

num evento como o onChange ou onExit (acho que seria o mais indicado) faria assim:

var
TamanhoDoTexto : Integer;
Z : Integer;
Teste : String[1];
begin
TamanhoDoTexto := Length(Edit1Text);

for Z := 1 to 3 do
begin
Teste := Copy(Edit1.Text, Z, 1);

Case Teste of
´A´...´Z´, ´a´...´z´ : faz algum processamento;
´0´...´9´ : faz algum outro processamento;
else
faz algum outro processamento para não letra nem número
end;
end;

Acredito que irá funcionar. Estou imaginando e fazendo de cabeça. Também poderia fazer o seguinte, poderia converter o valor encontrado em CHAR e verificar se ele está dentro de uma faixa como ´0´..´9´ e de ´#23´ até agora não me lembro o final e também definir se é uma letra ou um número.

Mas acho que funcionará o que te passei. Qualquer coisa dê um toque que te ajudo amanhã .

Falou...