- Changed TTileData.FFileName to get trimmed after initialization

This commit is contained in:
Andreas Schneider 2008-09-15 22:58:46 +02:00
parent ac37625746
commit da87485fc5
1 changed files with 4 additions and 2 deletions

View File

@ -21,7 +21,7 @@
* CDDL HEADER END * CDDL HEADER END
* *
* *
* Portions Copyright 2007 Andreas Schneider * Portions Copyright 2008 Andreas Schneider
*) *)
unit UTiledata; unit UTiledata;
@ -30,7 +30,7 @@ unit UTiledata;
interface interface
uses uses
Classes, UMulBlock; Classes, SysUtils, UMulBlock;
const const
tdfBackground = $00000001; tdfBackground = $00000001;
@ -183,6 +183,7 @@ begin
AData.Read(FTextureID, SizeOf(Word)); AData.Read(FTextureID, SizeOf(Word));
AData.Read(PChar(FTileName)^, 20); AData.Read(PChar(FTileName)^, 20);
end; end;
FTileName := Trim(FTileName);
end; end;
destructor TLandTiledata.Destroy; destructor TLandTiledata.Destroy;
@ -234,6 +235,7 @@ begin
AData.Read(FHeight, SizeOf(Byte)); AData.Read(FHeight, SizeOf(Byte));
AData.Read(PChar(FTileName)^, 20); AData.Read(PChar(FTileName)^, 20);
end; end;
FTileName := Trim(FTileName);
end; end;
destructor TStaticTiledata.Destroy; destructor TStaticTiledata.Destroy;