«Числа Фибоначчи»
Кадр данного задания представляет собой TabSheet2, с расположенным на нем
StringGrid2 – для отображения стоклеточного квадрата.
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) выделяет выбранные числа, при повторном выборе числа - снимает выделение.
Процедура FibDrawCell(Sender: TObject; ACol, ARow: Integer;Rect: TRect; State:
TGridDrawState), закрашивает розовым цветом числа ряда Фибоначчи.
Достарыңызбен бөлісу: |