procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
a:integer;
begin
i:=strtoint(edit1.Text);
a:=strtoint(edit2.Text);
if (i>=170)and(a>=70) then listbox1.Items.Add ….

Братцы помогите этот код защитить, если вместо числа введем буквы.

Привет всемю.Нашел как отключаеться:

Отключи встроенный отладчик:
Tools->Debugger Options-># Integrated Debugging

Мда, я чет не въеду, на кой такой гемор, если уж тебе надо ток цифры вводить, то надо сделать так чтоб другие символы просто к примеру подменялись на ноль или вообще не вводились, а выдовался звуковой сигнал.
Пример:
if not (key in ['0'..'9', ' '_ ',', '.']) then // Задаёш то что можно вводить
begin
key:=#0; // Вводит 0 вместо ненужного
beep; // Выдаёт звуковой сигнал
end;

Я недавно начал изучать Delphi. Знаний пока маловато,вот
пробую че в книге прочитал. Да не все в книге пушут.