35      , uPhysFSLayer;

    35      , uPhysFSLayer;

    36 

    36 

    37 const MaxRects = 512;

    37 const MaxRects = 512;

    38       MAXOBJECTRECTS = 16;

    38       MAXOBJECTRECTS = 16;

    39       MAXTHEMEOBJECTS = 32;

    39       MAXTHEMEOBJECTS = 32;

    40 

    41 

    41 type TRectsArray = array[0..MaxRects] of TSDL_Rect;

    42 type TRectsArray = array[0..MaxRects] of TSDL_Rect;

    42      PRectArray = ^TRectsArray;

    43      PRectArray = ^TRectsArray;

    43      TThemeObject = record

    44      TThemeObject = record

    44                      Surf: PSDL_Surface;

    45                      Surf: PSDL_Surface;