Capturar teclas en edit

[DarkByte]

Prueba a escibir un function que te devuelva true o false si es o no es un carácter. En ese function podrías poner

Código Delphi [-]
function TeclaAceptada(tecla:string):boolean;
begin
If Tecla = "1" Then
  begin
      Result := False;
   end;
(...)

No he podido comprobar el código pues estoy algo liado con C y estoy sólo echando una mirada al club a ver como anda.