- Fixed ref counting for the virtual layer (fixes #53)

This commit is contained in:
Andreas Schneider 2009-12-16 15:18:42 +01:00
parent 8fcbe75e66
commit 797abbfa07
1 changed files with 2858 additions and 2857 deletions

View File

@ -2088,6 +2088,7 @@ begin
if item is TVirtualTile then if item is TVirtualTile then
begin begin
ABlockInfo^.LowRes := FVLayerMaterial; ABlockInfo^.LowRes := FVLayerMaterial;
ABlockInfo^.LowRes.AddRef;
ABlockInfo^.ScreenRect := Bounds(Trunc(drawX - 22), Trunc(drawY - z * 4), ABlockInfo^.ScreenRect := Bounds(Trunc(drawX - 22), Trunc(drawY - z * 4),
44, 44); 44, 44);
ABlockInfo^.DrawQuad[0][0] := drawX - 22; ABlockInfo^.DrawQuad[0][0] := drawX - 22;