Оффтоп:
Цитата:
|
Сообщение от Kailon
...P.S.: это вообще для чего?
|
Видимо, для задержки показа формы, нерационально поскольку на слабой машинке будет работать, а на мощном агрегате пролетит за доли секунды, вдобавок, вероятно намертво должно вешать приложение, другими средствами задержка делается
Ошибка наверное здесь
Код:
...
procedure TForm1.Button1Click(Sender: TObject);
begin
if radiogroup1.ItemIndex=strtoint(s6) then
c:=c+1;
...
нефакт, что в строковой переменной s6 лежит integer, могут быть и буквы