hedgewars/uMisc.pas
changeset 11823 0fba6cb098a1
parent 11367 a91c4c4fd85c
child 11828 a69124eb7ce7
child 12621 d972b31f8881
equal deleted inserted replaced
11822:4600dcb9db4f 11823:0fba6cb098a1
    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;