Browse Source

Add public property MemUnitsSize

PascalCoin 3 years ago
parent
commit
3e7fa6252c
1 changed files with 1 additions and 0 deletions
  1. 1 0
      src/libraries/abstractmem/UAbstractMem.pas

+ 1 - 0
src/libraries/abstractmem/UAbstractMem.pas

@@ -156,6 +156,7 @@ Type
     property MaxAvailablePos : Int64 read FMaxAvailablePos;
     property HeaderInitialized : Boolean read FHeaderInitialized;
     property Is64Bits : Boolean read FIs64Bits;
+    property MemUnitsSize : Integer read FMemUnitsSize;
     function Initialize(ASetTo64Bytes : Boolean; AMemUnitsSize : Integer) : Boolean;
     function HeaderSize : Integer;
     function SizeOfAbstractMemPosition : TAbstractMemSize; inline;