Реферат: Помощь в обучении программированию
AfterInit
LeftLimit:=1
DownLimit:=1
Установка значений отступов для данной фигуры. влево на единицу и вниз на единицу
CheckEach
Proc(Xabs,Yabs-1)and Proc(Xabs,Yabs)and
Proc(Xabs-1,Yabs)
Вызов процедуры Proc для конретных ячеек. Обычно вызываются процедуры для этих ячеек по рисованию, стиранию, проверки отсутствия в данной ячейке другой фигуры.
Для данной фигуры ячейками относящимися к данной фигуре являются ячейки расположенные относительно базовой
1) на одну ниже по Y,
2) в том же месте что и базовая
3) на одну левее по X
GetTwinFigure
if AlongClock then
GetTwinFigure:=TThreeCellFigure30
else
GetTwinFigure:=TThreeCellFigure12
Если вращение вдоль часовой стрелки то фигурой-близнецом будет TThreeCellFigure30 
Если против часовой то TThreeCellFigure12 
SetBaseCell
Cell.Color:=RandomColors[25];
Cell.TextureNum:=26
Установка определенных значений для текста и текстуры фигуры данного типа
Для остальных фигур перекрытие осуществляется аналогично.
TOptionsForm - класс формы настроек. Включает в себя такие объекты как:
|
MainPageControl; |
Закладки (TPageControl*) |
Расположен на форме настроек, включает в себя закладки (tabFigures) |
|
tabFigures |
К-во Просмотров: 466
Бесплатно скачать Реферат: Помощь в обучении программированию
|