hedgewars/uMisc.pas
branchqmlfrontend
changeset 11828 a69124eb7ce7
parent 11403 b894922d58cc
parent 11823 0fba6cb098a1
child 12855 1b2b84315d27
equal deleted inserted replaced
11827:8c71c5a1172f 11828:a69124eb7ce7
    31 function MakeScreenshot(filename: shortstring; k: LongInt; dump: LongWord): boolean;
    31 function MakeScreenshot(filename: shortstring; k: LongInt; dump: LongWord): boolean;
    32 function  GetTeamStatString(p: PTeam): shortstring;
    32 function  GetTeamStatString(p: PTeam): shortstring;
    33 function  SDL_RectMake(x, y, width, height: LongInt): TSDL_Rect; inline;
    33 function  SDL_RectMake(x, y, width, height: LongInt): TSDL_Rect; inline;
    34 
    34 
    35 implementation
    35 implementation
    36 uses SysUtils, uVariables, uUtils
    36 uses uVariables, uUtils
    37      {$IFDEF PNG_SCREENSHOTS}, PNGh, png {$ENDIF};
    37      {$IFDEF PNG_SCREENSHOTS}, PNGh, png {$ENDIF};
    38 
    38 
    39 type PScreenshot = ^TScreenshot;
    39 type PScreenshot = ^TScreenshot;
    40      TScreenshot = record
    40      TScreenshot = record
    41          buffer: PByte;
    41          buffer: PByte;