Ver Mensaje Individual
  #2  
Antiguo 08-04-2007
d-hugo d-hugo is offline
Miembro
 
Registrado: abr 2007
Posts: 34
Reputación: 0
d-hugo Va por buen camino
una forma de hacerlo

Una forma un poco burda de detectar si la tecla es un caracter puede lograrse usando el evento onKeyPress con un case. Algo más o menos así:
Código Delphi [-]
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  case ord(key) of
    65..90: begin
      // entre A y Z mayúscula
    end;
    97..122: begin
      // entre a y z minúscula
    end;
    else begin
      // para el resto
    end;
  end;
end;
Puede que no sea el método más eficiente, pero es relativamente simple de usar, lo único que hay que hacer es buscar los códigos ASCII para las letras que deseas filtrar, pero eso es fácil con el mapa de caracteres de Windows (que por cierto, en el caso de Windows XP da los valores en hexadecimal, pero pueden convertirse fácilmente a decimal con la calculadora científica)

Saludos, Hugo
Responder Con Cita