Перевод string в integer

[denisbrain]

Сообщение от Yurk@

если у тебя в строке будут недопустимые символы то TryStrToInt тебе вместо исключения результат выдаст 0

еще одна интересная функция нашел не давно
в модуле SysUtils

function StrToIntDef(const S: string; Default: Integer): Integer;
var
  E: Integer;
begin
  Val(S, Result, E);
  if E <> 0 then Result := Default;
end;

[Yurk@]

да, при исключении вместо 0 она выдаст тебе значение указаное в Default: Integer