TAnimComp

type TAnimComp = record

  Flags: SmallInt;

AnimComp flags for system and user

  Timer: SmallInt;

timer defines how long to keep this component active: if set non-zero, timer decrements to zero then switches to nextSeq if set to zero, AnimComp never switches

  TimeSet: SmallInt;

Initial value for timer when the AnimComp is activated by the system

  NextComp: PAnimComp;

Pointer to next components of animation object

  PrevComp: PAnimComp;

Pointer to previous components of animation object

  NextSeq: PAnimComp;

Pointer to component component definition of next image in sequence

  PrevSeq: PAnimComp;

pointer to component component definition of previous image in sequence

  AnimCRoutine: Pointer;

Pointer of special animation procedure

  YTrans: SmallInt;

Initial y translation (if this is a component)

  XTrans: SmallInt;

Initial x translation (if this is a component)

  HeadOb: PAnimOb;

  AnimBob: PBob;

end;