Функция StrToIntDef( const S: string;
Default: Integer ): Integer;
Модуль: SysUtils
Описание
Функция преобразовывает строковое представление десятичного или шестнадцатеричного целого числа в значение типа Integer. Если исходная строка содержит запись числа в недопустимом виде, то функция возвращает значение, указанное в параметре Default.
Пример var
X: Integer; begin
X:= StrToIntDef( Edit1.text, -1); If X=-1 then
MessageDlg( 'Ошибка ввода!', mtInformation, [mbOk], 0); end;