hedgewars/uStore.pas
changeset 4359 83ef50815535
parent 4357 a1fcfc341a52
child 4367 f4a0ec067601
equal deleted inserted replaced
4357:a1fcfc341a52 4359:83ef50815535
    80 procedure FreeWeaponTooltip;
    80 procedure FreeWeaponTooltip;
    81 procedure Tint(r, g, b, a: Byte); inline;
    81 procedure Tint(r, g, b, a: Byte); inline;
    82 procedure Tint(c: Longword); inline;
    82 procedure Tint(c: Longword); inline;
    83 
    83 
    84 implementation
    84 implementation
    85 uses uMisc, uConsole, uLocale, uMobile;
    85 uses uMisc, uConsole, uLocale, uMobile, uVariables;
    86 
    86 
    87 type TGPUVendor = (gvUnknown, gvNVIDIA, gvATI, gvIntel, gvApple);
    87 type TGPUVendor = (gvUnknown, gvNVIDIA, gvATI, gvIntel, gvApple);
    88 
    88 
    89 var HHTexture: PTexture;
    89 var HHTexture: PTexture;
    90     MaxTextureSize: LongInt;
    90     MaxTextureSize: LongInt;