X-Git-Url: https://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fshared%2FCONFIG.pas;h=4aa7e659b79a47c6d0351c4002533414dc0c3fc9;hb=6cfc4749e77a32dc356f8dc4b4f26788626bbb4e;hp=3dfd736f4a6e1f492090993a7e4a11c96d63053c;hpb=dd0d8ac4cc2a0aa774f25c8a1a774f7358acfae7;p=d2df-sdl.git diff --git a/src/shared/CONFIG.pas b/src/shared/CONFIG.pas index 3dfd736..4aa7e65 100644 --- a/src/shared/CONFIG.pas +++ b/src/shared/CONFIG.pas @@ -16,14 +16,13 @@ {$INCLUDE a_modes.inc} unit CONFIG; -{ ------------------------------------ -CONFIG.PAS ÂÅÐÑÈß ÎÒ 24.09.06 ------------------------------------ -} - interface +{$IFDEF USE_MEMPOOL} +uses + mempool; +{$ENDIF} + type TParam = record Param: ShortString; @@ -31,7 +30,7 @@ type Section: Word; end; - TConfig = class(TObject) + TConfig = class{$IFDEF USE_MEMPOOL}(TPoolObject){$ENDIF} private FParams: array of TParam; FSections: array of ShortString; @@ -58,7 +57,7 @@ type implementation uses - SysUtils, BinEditor; + SysUtils, utils; { TConfig }