Estoy restringiendo un EDIT para que solo puedan introducir valores númericos,
Código Delphi
[-]
begin
if not (key in ['0'..'9',#8])then
key:=#0;
end;
Me funciona perfectamente porque no me deja escribir texto en el EDIT pero el texto me lo escribe en un MEMO que tengo colocado al lado.
Gracias por la ayuda.