о відповіли НЬЮТОН ); ( sl == 3) ShowMessage ( Ви абсолютно вірно відповіли ЛЮБОВ ); (sl == 4) ShowMessage ( Ви абсолютно вірно відповіли АЗБУКА ); (sl == 5) ShowMessage ( Ви абсолютно вірно відповіли ДОЛОТО raquo ;); - gt; ShowModal ();
} }(RadioButton2-gt;Visible==false)-gt;Caption=Label3-gt;Caption+laquo;Иraquo;;++;(vgt;15)Form10-gt;ShowModal();
}
//---------------------------------------------------------------------------
void __fastcall TForm2 :: Button1Click (TObject * Sender)
{(RadioButton2- gt; Visible == true) {((sl == 1) || (sl == 3) || (sl == 2) || (sl == 5 )) {- gt; ShowModal ();
}(sl==4){-gt;Caption=StrToInt(Panel8-gt;Caption)+StrToInt(Form6-gt;Panel1-gt;Caption);-gt;Caption=StrToInt(Panel8-gt;Caption)+StrToInt(Form6-gt;Panel1-gt;Caption);-gt;ShowModal();-gt;Caption=laquo;Araquo;; - gt; Caption= A raquo ;; ++; k ++;
} (k == 6) {(sl == 1) ShowMessage ( Ви абсолютно вірно відповіли Ренкіна ); (sl == 2) ShowMessage ( Ви абсолютно вірно відповіли НЬЮТОН ); (sl == 3) ShowMessage ( Ви абсолютно вірно відповіли ЛЮБОВ ); (sl == 4) ShowMessage ( Ви абсолютно вірно відповіли АЗБУКА ); (sl == 5) ShowMessage ( Ви абсолютно вірно відповіли ДОЛОТО ); - gt; ShowModal ();
} - gt; Enabled=false; }(RadioButton2-gt;Visible==false)-gt;Caption=Label3-gt;Caption+laquo;Аraquo;;++;(vgt;15)Form10-gt;ShowModal();
}
//---------------------------------------------------------------------------
void __fastcall TForm2 :: Button2Click (TObject * Sender)
{(RadioButton2- gt; Visible == true) {((sl == 1) || (sl == 2) || (sl == 5)) {- gt; ShowModal ( ); }(sl==3){-gt;Caption=StrToInt(Panel8-gt;Caption)+StrToInt(Form6-gt;Panel1-gt;Caption);-gt;ShowModal();-gt;Caption=laquo;Бraquo;;++;
}(sl==4){-gt;Caption=StrToInt(Panel8-gt;Caption)+StrToInt(Form6-gt;Panel1-gt;Caption);-gt;ShowModal();-gt;Caption=laquo;Бraquo;;++;
} (k == 6) {(sl == 1) ShowMessage ( Ви абсолютно вірно відповіли Ренкіна ); (sl == 2) ShowMessage ( Ви абсолютно вірно відповіли НЬЮТОН ); (sl == 3) ShowMessage ( Ви абсолютно вірно відповіли ЛЮБОВ ); (sl == 4) ShowMessage ( Ви абсолютно вірно відповіли АЗБУКА ); (sl == 5) ShowMessage ( Ви абсолютно вірно відповіли ДОЛОТО ); - gt; ShowModal ();
}-gt;Enabled=false;}(RadioButton2-gt;Visible==false)-gt;Caption=Label3-gt;Caption+laquo;Бraquo;;++;(vgt;15)Form10-gt;ShowModal();
}
//---------------------------------------------------------------------------
void __fastcall TForm2 :: Button3Click (TObject * Sender)
{(RadioButton2- gt; Visible == true) {((sl==1)||(sl==4)||(sl==2)||(sl==5)){-gt;ShowModal();}(sl==3){-gt;Caption=StrToInt(Panel8-gt;Caption)+StrToInt(Form6-gt;Panel1-gt;Caption);-gt;ShowModal();-gt;Caption=laquo;Braquo;;++;
} (k == 6) {(sl == 1) ShowMessage ( Ви абсолютно вірно відповіли Ренкіна ); (sl == 2) ShowMessage ( Ви абсолютно вірно відповіли НЬЮТОН ); (sl == 3) ShowMessage ( Ви абсолютно вірно відповіли ЛЮБОВ ); (sl == 4) ShowMessage ( Ви абсолютно вірно відповіли АЗБУКА ); (sl == 5) ShowMessage ( Ви абсолютно вірно відповіли ДОЛОТО ); - gt; ShowModal ();
} - gt; Enabled=false; }(RadioButton2-gt;Visible==false)-gt;Caption=Label3-gt;Caption+laquo;Вraquo;;++;(vgt;15)Form10-gt;ShowModal();
}
//---------------------------------------------------------------------------
void __fastcall TForm2 :: Button4Click (TObject * Sender)
{(RadioButton2- gt; Visible == true) {-gt;ShowModal();-gt;Enabled=false;}(RadioButton2-gt;Visible==false)-gt;Caption=Label3-gt;Caption+laquo;Гraquo;;++;(vgt;15)Form10-gt;ShowModal();
}
//---------------------------------------------------------------------------
void __fastcall TForm2 :: Button5Click (TObject * Sender)
{(RadioButton2- gt; Visible == true) {((sl == 1) || (sl == 2) || (sl == 3) || (sl == 4 )) {- gt; ShowModal (); }(sl==5){-gt;Caption=StrToInt(Panel8-gt;Caption)+StrToInt(Form6-gt;Panel1-gt;Caption);-gt;ShowModal();-gt;Caption=laquo;Дraquo;;++;
} (k == 6) {(sl == 1) ShowMessage ( Ви абсолютно вірно відповіли Ренкіна ); (sl == 2) ShowMessage ( Ви абсолютно вірно відповіли НЬЮТОН ); (sl == 3) ShowMessage ( Ви абсолютно вірно відповіли ЛЮБОВ ); (sl == 4) ShowMessage ( Ви абсолютно вірно відповіли АЗБУКА ); (sl == 5) ShowMessage ( Ви абсолютно вірно відповіли ДОЛОТО ); - gt; ShowModal ();
