Проверка на число, Необходимо проверить трёх значный символ, число ли это Опции

[Zevs5]

Необходимо проверить трёх значный символ, число ли это

Не совсем Паскалевский вопрос потому что использую Делфи но принцып то один.
Нужно проверить введённый символ (однозначный, двузначный либо трех значный) на то, является ли он числом и потом если это число занести его в числовой массив.

Потомучто если я конечно не ошибаюсь если объявлен числовой массив то строковое значение туда не запихнёшь.

[volvo]

Ну и зачем тебе понадобилось определять, число это или нет, ПОСЛЕ того, как ты уже заполнил (вернее, попытался заполнить) числовой массив? Если бы в Memo было значение, которое нельзя перевести в число, то к моменту вызова

show := TryStrToInt(IntToStr(ar[i]));

программа уже завершилась бы с ошибкой, так что...

Ты полностью задание приведи, а то совершенно неясно, что именно тебе надо сделать, и зачем.