property StateName: string; Имя состояния |
property State: integer; Номер состояния (от 1 до StateCount) |
property StateCount: integer; Количество состояний. Свойство доступно только на чтение |
property Speed: integer; Скорость спрайта (1..10) |
property Active: boolean; Активность спрайта: True, если спрайт активен (т.е. происходит его анимация), и False в противном случае |
property Frame: integer; Текущий кадр в текущем состоянии |
procedure AddState(name: string; count: integer); Добавляет состояние к спрайту. После добавления всех состояний следует вызвать CheckStates |
procedure CheckStates; Проверяет корректность набора состояний. Вызывается после добавления всех состояний |
procedure SaveWithInfo(fname: string); Сохраняет графический и информационный файлы спрайта. Имя fname задает имя графического файла. Информационный файл сохраняется в тот же каталог, что и графический, имеет то же имя и расширение .spinf |
procedure NextFrame; Переходит к следующему кадру в текущем состоянии |
procedure NextTick; Переходит к следующему тику таймера; если он равен ticks, то он сбрасывается в 1 и вызывается NextFrame |
function FrameCount: integer; Возвращает количество кадров в текущем состоянии |
function FrameBeg: integer; Возвращает начальный кадр в текущем состоянии |
function Clone: SpriteABC; Возвращает клон объекта |
property CurrentPicture: integer;
Номер текущего рисунка
property Count: integer;
Количество рисунков в наборе
procedure Add(fname: string); Добавляет рисунок к спрайту, загружая его из файла fname. Рисунок должен иметь те же размеры, что и все рисунки из набора |
procedure ChangePicture(fname: string); Меняет набор рисунков на набор, состоящий из одного рисунка, загружая его из файла с именем fname |
procedure ChangePicture(w: integer; fname: string); Меняет набор рисунков на набор, загружая его из файла с именем fname. Файл должен хранить последовательность изображений одного размера, расположенных по горизонтали. Каждое изображение считается имеющим ширину w |
procedure NextPicture; Циклически переходит к следующему рисунку из набора |
procedure PrevPicture; Циклически переходит к предыдующему рисунку из набора |
function Clone: MultiPictureABC; Возвращает клон набора рисунков |