diff --git a/src/game/g_gui.pas b/src/game/g_gui.pas
index 893bdd8e2c0c2362a99b345ca9262e966b3b1d8f..35c1da4ea7f1fbfc916b691b2679edb40659ce59 100644 (file)
--- a/src/game/g_gui.pas
+++ b/src/game/g_gui.pas
interface
uses
- mempool,
+ {$IFDEF USE_MEMPOOL}mempool,{$ENDIF}
e_graphics, e_input, e_log, g_playermodel, g_basic, MAPDEF, utils;
const
TFontType = (Texture, Character);
- TFont = class(TPoolObject)
+ TFont = class{$IFDEF USE_MEMPOOL}(TPoolObject){$ENDIF}
private
ID: DWORD;
FScale: Single;
TOnChangeEvent = procedure(Sender: TGUIControl);
TOnEnterEvent = procedure(Sender: TGUIControl);
- TGUIControl = class(TPoolObject)
+ TGUIControl = class{$IFDEF USE_MEMPOOL}(TPoolObject){$ENDIF}
private
FX, FY: Integer;
FEnabled: Boolean;
property RightAlign: Boolean read FRightAlign write FRightAlign; // for menu
end;
- TGUIWindow = class(TPoolObject)
+ TGUIWindow = class{$IFDEF USE_MEMPOOL}(TPoolObject){$ENDIF}
private
FActiveControl: TGUIControl;
FDefControl: string;