- Added optional highlight for (un)walkable tiles

- Fixed lightmanager to draw in the correct color
- Fixed TMapBlock and TStaticBlock to correctly initialize itself as "unchanged"
- Cleanup in the server project
This commit is contained in:
2009-12-24 15:49:15 +01:00
parent f2764e928e
commit d461774816
9 changed files with 2396 additions and 2253 deletions

View File

@@ -173,8 +173,9 @@ begin
for iX := 0 to 7 do
Cells[iY * 8 + iX] := TMapCell.Create(Self, buffer, AX * 8 + iX, AY * 8 + iY);
finally
if Assigned(buffer) then FreeAndNil(buffer);
buffer.Free;
end;
FChanged := False;
end;
constructor TMapBlock.Create(AData: TStream);

View File

@@ -189,6 +189,7 @@ begin
FItems.Add(TStaticItem.Create(Self, block, AX, AY));
block.Free;
end;
FChanged := False;
end;
constructor TStaticBlock.Create(AData: TStream; AIndex: TGenericIndex);