hedgewars/uVariables.pas
changeset 5732 f3f381011728
parent 5728 aca2acfba4ca
child 5740 caf10b231b08
equal deleted inserted replaced
5730:1ef0027411f4 5732:f3f381011728
    23 
    23 
    24 uses SDLh, uTypes, uFloat, GLunit, uConsts, Math, uMobile;
    24 uses SDLh, uTypes, uFloat, GLunit, uConsts, Math, uMobile;
    25 
    25 
    26 var
    26 var
    27 /////// init flags ///////
    27 /////// init flags ///////
    28     cMinScreenWidth   : LongInt     = 480;
    28     cMinScreenWidth    : LongInt     = 480;
    29     cMinScreenHeight  : LongInt     = 320;
    29     cMinScreenHeight   : LongInt     = 320;
    30     cScreenWidth      : LongInt     = 1024;
    30     cScreenWidth       : LongInt     = 1024;
    31     cScreenHeight     : LongInt     = 768;
    31     cScreenHeight      : LongInt     = 768;
    32     cOrigScreenWidth  : LongInt     = 1024;
    32     cOrigScreenWidth   : LongInt     = 1024;
    33     cOrigScreenHeight : LongInt     = 768;
    33     cOrigScreenHeight  : LongInt     = 768;
       
    34     cNewScreenWidth    : LongInt     = 1024;
       
    35     cNewScreenHeight   : LongInt     = 768;
       
    36     cScreenResizeDelay : LongWord    = 0;
    34     cBits           : LongInt     = 32;
    37     cBits           : LongInt     = 32;
    35     ipcPort         : Word        = 0;
    38     ipcPort         : Word        = 0;
    36     cFullScreen     : boolean     = false;
    39     cFullScreen     : boolean     = false;
    37     isSoundEnabled  : boolean     = true;
    40     isSoundEnabled  : boolean     = true;
    38     isMusicEnabled  : boolean     = false;
    41     isMusicEnabled  : boolean     = false;