Преглед на файлове

* Patch from Bart Broersma to introduce protected data property

git-svn-id: trunk@48436 -
michael преди 4 години
родител
ревизия
5e7291af15
променени са 1 файла, в които са добавени 1 реда и са изтрити 0 реда
  1. 1 0
      packages/fcl-stl/src/gdeque.pp

+ 1 - 0
packages/fcl-stl/src/gdeque.pp

@@ -42,6 +42,7 @@ type
     procedure MoveData(StartIndex: SizeUInt; Offset: SizeInt; NrElems: SizeUInt);
     procedure ClearSingleDataEntry(Index: SizeUInt); virtual;
     procedure ClearData; virtual;
+    property Data: TArr read FData;
   public
     function Size():SizeUInt;inline;
     constructor Create();