Помощь в обучении программированию — страница 4

во время рисования gmCreateFigureError Игра завершена с ошибкой создания фигуры TTetrisGame - класс реализующий алгоритм игры. Включает в себя такие объекты, как: fFiguresEnum управление набором фигур (TFigureEnumManager) Реализует хранение и доступ к массиву существующих фигур fField игровое поле (TField) Предназначено для хранения указателя на объект игровое поле fCurrentFigure текущая фигура (TBaseFigure) Предназначено для хранения указателя на текущую фигуру и

проведения с ней всяких операций типа вращения fTimer таймер (TTimer*) Предназначен для появления событий в программе через определенный промежуток времени, чтобы реализовывать перемещение фигуры поля: fQuickCoef коэффициент ускорения (integer) Предназначено для хранения коэффициента, который используется при ускоренном падении фигуры при нажатии клавиши fInProcess статус игры (byte) Предназначено для хранения статуса игры fFigNum количество фигур

(integer) Предназначено для хранения числа выпущенных фигур и отображении в статистике fTimerClicks время игры (integer) Предназначено для хранения времени игры и отображении в статистике fDeletedLines число удаленных линий (integer) Предназначено для хранения числа удаленных линий и отображении в статистике fOldTimer интервал таймера (integer) Интервал таймера до ускорения или 0 если таймер находится не в ускоренном режиме события: TimerTick(Sender:TObject) Событие от

таймера. Происходит через заданный интервал времени методы: SetInProcess(AInProcess:byte) Установка статуса игры. Использование данного метода, а не непосредственный доступ к полю гарантирует установку только допустимых значений и своевременное изменение строки статуса в основной форме LogicalError(ErrMsg:PChar) Вызывается при необходимости сообщить пользователю о произошедшей логической ошибке InitCurrentFigure; Создание текущей фигуры случайным

образом. Указатель на текущую фигуру остается в fCurrentFigure Start Запуск игры или продолжение после приостановки Stop Остановка игры Pause Приостановка игры NotActive:boolean Проверяет не находиться ли игра в состоянии игры, если да выдается сообщение IsGoing(ShowMsg:boolean=true) Проверяет не активна ли игра. если нет и ShowMsg то выдается сообщение ClearAll Вызов очистки игрового поля, обнуление fFigNum, fDeletedLines, fTimerClicks GetTextStatus:string Получение статистики по игре в

текстовом виде для вывода на экран RotateAgainst Проверка активна ли игра и есть ли текущая фигура, если да то происходит поворот фигуры RotateAlong MoveLeft Проверка активна ли игра и есть ли текущая фигура, если да то происходит сдвиг фигуры MoveRight GetInfo Получения статуса игры в текстовом виде для отображения в строке статуса DoFall Реализация метода падения (вызывается по клавиши вниз) StartQuickFall(Quick:boolean=true) Если Quick то установка режима ускоренного