hedgewars/uStore.pas
changeset 4390 f219628ed666
parent 4385 f679ffa2dc8c
child 4398 36d7e4b6ca81
equal deleted inserted replaced
4389:d1c65b60cd68 4390:f219628ed666
    37 procedure RenderWeaponTooltip(atype: TAmmoType);
    37 procedure RenderWeaponTooltip(atype: TAmmoType);
    38 procedure ShowWeaponTooltip(x, y: LongInt);
    38 procedure ShowWeaponTooltip(x, y: LongInt);
    39 procedure FreeWeaponTooltip;
    39 procedure FreeWeaponTooltip;
    40 
    40 
    41 implementation
    41 implementation
    42 uses uMisc, uConsole, uLocale, uMobile, uVariables, uUtils, uTextures, uIO, uRender, uRenderUtils;
    42 uses uMisc, uConsole, uMobile, uVariables, uUtils, uTextures, uIO, uRender, uRenderUtils;
    43 
    43 
    44 type TGPUVendor = (gvUnknown, gvNVIDIA, gvATI, gvIntel, gvApple);
    44 type TGPUVendor = (gvUnknown, gvNVIDIA, gvATI, gvIntel, gvApple);
    45 
    45 
    46 var MaxTextureSize: LongInt;
    46 var MaxTextureSize: LongInt;
    47     cGPUVendor: TGPUVendor;
    47     cGPUVendor: TGPUVendor;