end;
Когда ты преобразовываешь строку в число, ты должен быть уверен в том, что строка содержит число. Если в строке будет хоть один символ не относящейся к цифре, то во время преобразования произойдёт ошибка. Чтобы избавить от ошибок, можно использовать исключительные ситуации, заключая преобразование между try и except. Но есть ещё один способ – использовать функцию StrToIntDef у которой уже два параметра:
1. 1. Строка, которую надо преобразовать
2. 2. Значение по умолчанию, которое будет возвращено, если произошла ошибка. Итак, наш пример можно подкорректировать следующим образом:
var ch:Integer; begin ch:=StrToIntDef(Edit1.Text, 0); // Преобразовываю Edit1.Text в число end;
В этом примере, если произойдёт ошибка во время преобразование, то функция не будет ругаться, а вернёт значение 0.