[Ama]

Bargest скорее всего прав:

Код:

...
else
 begin
   label1.Caption:=' Ошибка';
   button1.Enabled:=False;
   button2.Visible:=true;
   inc(KolOshibok);
 end;
end;
...