Код символа "BackSpase" в ANSI(Если такой есть...)

[ChEaTeR-abc]

Есть програма и в ней есть контроль ввода символов в текстовое поле:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
IF not(Key in ['0'..'9']) THEN
  Key:=#0;

Работает нормально, но нельзя стирать символы, т.к. в таком случае кнопке присваивается значение 0.Насколько я понял нужно изменить ['0'..'9'] на ['0'..'9', #xxx], где ххх - код кнопки

[r9m]

Это называется "Забой". Код - 8 обозначение - "bs"

[ChEaTeR-abc]

Спасибо большое!

[ZaRDaK]

еще

VK_BACKSPACE