* Replaced fgl with heContnrs
* Fixed behavior of the undo packet list (fixes #88)
This commit is contained in:
@@ -21,7 +21,7 @@
|
||||
* CDDL HEADER END
|
||||
*
|
||||
*
|
||||
* Portions Copyright 2009 Andreas Schneider
|
||||
* Portions Copyright 2012 Andreas Schneider
|
||||
*)
|
||||
unit UMap;
|
||||
|
||||
@@ -30,7 +30,7 @@ unit UMap;
|
||||
interface
|
||||
|
||||
uses
|
||||
SysUtils, Classes, fgl, UWorldItem;
|
||||
SysUtils, Classes, heContnrs, UWorldItem;
|
||||
|
||||
const
|
||||
MapCellSize = 3;
|
||||
@@ -60,7 +60,7 @@ type
|
||||
procedure Write(AData: TStream); override;
|
||||
end;
|
||||
|
||||
TMapCellList = specialize TFPGObjectList<TMapCell>;
|
||||
TMapCellList = specialize TheObjectVector<TMapCell>;
|
||||
|
||||
{ TMapBlock }
|
||||
|
||||
|
||||
@@ -21,7 +21,7 @@
|
||||
* CDDL HEADER END
|
||||
*
|
||||
*
|
||||
* Portions Copyright 2009 Andreas Schneider
|
||||
* Portions Copyright 2012 Andreas Schneider
|
||||
*)
|
||||
unit UStatics;
|
||||
|
||||
@@ -30,7 +30,7 @@ unit UStatics;
|
||||
interface
|
||||
|
||||
uses
|
||||
SysUtils, Classes, fgl, UGenericIndex, UWorldItem, UTiledata;
|
||||
SysUtils, Classes, heContnrs, UGenericIndex, UWorldItem, UTiledata;
|
||||
|
||||
type
|
||||
{ TStaticItem }
|
||||
@@ -56,7 +56,7 @@ type
|
||||
procedure Write(AData: TStream); override;
|
||||
end;
|
||||
|
||||
TStaticItemList = specialize TFPGObjectList<TStaticItem>;
|
||||
TStaticItemList = specialize TheObjectVector<TStaticItem>;
|
||||
|
||||
{ TStaticBlock}
|
||||
|
||||
|
||||
@@ -21,7 +21,7 @@
|
||||
* CDDL HEADER END
|
||||
*
|
||||
*
|
||||
* Portions Copyright 2009 Andreas Schneider
|
||||
* Portions Copyright 2012 Andreas Schneider
|
||||
*)
|
||||
unit UWorldItem;
|
||||
|
||||
@@ -30,7 +30,7 @@ unit UWorldItem;
|
||||
interface
|
||||
|
||||
uses
|
||||
Classes, fgl, UMulBlock;
|
||||
Classes, heContnrs, UMulBlock;
|
||||
|
||||
type
|
||||
TWorldBlock = class;
|
||||
@@ -81,7 +81,7 @@ type
|
||||
property RawZ: ShortInt read FZ;
|
||||
end;
|
||||
|
||||
TWorldItemList = specialize TFPGObjectList<TWorldItem>;
|
||||
TWorldItemList = specialize TheObjectVector<TWorldItem>;
|
||||
|
||||
{ TWorldBlock }
|
||||
|
||||
|
||||
Reference in New Issue
Block a user