[Tensh]

Добрый вечер. Собственно возникла проблема. Было дано куча заданий по информатике из одной книжки, где вроде бы очень неплохо расписаны все возможности Delphi, ну и книжка соответственно наполнена различными заданиями.
Вот собственно само задание

Пусть необходимо проверить, является ли допустимым вводимый в окно редактирования символ при наборе натурального числа. В соответствии с поставленной задачей разрешимыми для ввода являются цифры, клавиши Enter (символ - #13) и Backspace (символ - #8) - стирание влево неверно введенного символа.

Назовем нашу функцию ProvInputInt. Описание функции можно представить в виде:

Код:

function ProvInputInt (ch: char): Boolean; begin

if (ch>='0') and (ch<='9') or (ch=#13) or (ch=#8) 
then ProvInputInt:=True // символ допустим 
else Provlnputlnt:=False; //символ недопустим

end;

Функция работает с одним параметром — ch - переменная типа Char, результат работы функции — переменная типа Boolean. В теле функции проверяется, каким символом является символ ch. Если символ ch - цифра, #13 или #8, то значению функции Provlnputlnt присваивается значение True, иначе значению функции Provlnputlnt присваивается значение False.

Проблема возникла вот в чём. Вроде бы функция написана, как она работает понятно. Вот только как её использовать абсолютно не понятно. Нужно её каким-то образом для поля Edit применить, только вот в книге не написано как, а без наглядного примера воображение не работает...

Помогите пожалуйста.