Код ANSI

← →
Silica © (2006-04-29 17:35) [0]

Скажите как проврить, что в поле Edit введено только число. Я в книге нашла код ANSI, где говориться, что, к примеру, русские буквы кодируются значениями 192-233 и 224-255. Подскажите как описать это в программе.
Мне нужно создать условие:

IF EDIT1.TEXT = (ВОТ ТУТ НЕ ЗНАЮ ЧТО НАПИСАТЬ) THEN
SHOWMESSAGE("Введенный символ не является числом!");

← →
Virgo_Style © (2006-04-29 17:38) [1]

var ValueInEdit:Integer;

if not TryStrToInt(Edit1.Text, ValueInEdit) then

← →
Virgo_Style © (2006-04-29 17:38) [2]

Virgo_Style © (29.04.06 17:38) [1]

если не Integer - аналогично

← →
Silica © (2006-04-29 17:41) [3]

Большое спасибо!!! Теперь буду знать! :)

Можно еще проверку на вхождение в строку нецифровых символов (LastDelimiter). Можно поставить в обработчик Edit1.OnExit.

Код ANSI Найти похожие ветки