Создание комплекса тренажеров и игровых обучающих программ по математике

Кадр  данного  задания  представляет  собой TabSheet2, с  расположенным  на  нем 

WebBrowser1-  для  вывода  учебного  материала, Button32 – кнопка  для  перехода  из 

текущего задания к содержанию.  

Первоначально  на StringGrid2 выделяются  цветом  простые  числа  до 100. Кнопка 

Button7  меняет  кадр  с  фрагментом  учебного  материала.  Когда  все  фрагменты  учебного 

материала  заканчиваются, StringGrid2 очищается  и  пользователю  предлагается  выделить 

простые числа.  

Для  выделения  используется  процедура StringGrid3DrawCell(Sender: TObject; ACol, 

ARow: Integer;Rect: TRect; State: TGridDrawState), которая  закрашивает  синим  цветом 

выбранные числа.  

Процедура StringGrid3SelectCell(Sender: TObject; ACol, ARow: Integer; var CanSelect: 

Boolean) выделяет выбранные числа, при повторном выборе числа  - снимает выделение. 

Процедура PrimNumDrawCell(Sender: TObject; ACol, ARow: Integer;Rect: TRect; State: 

TGridDrawState) закрашивает красным цветом простые числа. 

Функция PrimeNumber(Number: integer):boolean; - возвращает true, если число 

простое, false – в противном случае. 

 

21

 

 

жүктеу/скачать 0.65 Mb.

Достарыңызбен бөлісу: