Validar datos

Respuesta de
a
Usuario
Tengo el siguiente código para validar que la entrada de datos sean números reales, el problema es que si quiero borrar con la tecla retroceso no lo hace, unicamente me funciona con suprimir como hacer para que me acepte la tecla retroceso, supongo que hay que agrer su respectivo # en el intervalo aceptado pero no se cual, o si conoces una mejor manera para validar entrada de datos podrías explicarme de preferencia con un ejemplo, gracias:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if key in ['0' ..'9','.'] then
else
begin
key := #0;
end;
end;
Experto
La tecla de retroceso es #8.
Una mejor forma de validar datos sería con un control TMaskEdit (pero es poco flexible, para mi gusto) o si no, conseguiste "las rusas" (así se le llama a las librerías RXLib), que tienen controles especializados sobre todo en entradas numéricas (me parece, fíjate). Las podes bajar desde www.clubdelphi.com, o si no, fíjate por Internet que las tenés que encontrar. Son gratuitas y vienen con el código fuente incluido. Fíjate las que sean compatibles con tu versión de Delphi.

Si te sirvió, califícame en TodoExpertos. Si no, avisame y veo en qué más te puedo ayudar.

Marcelo