- Fixed mouse-up handling when no SelectedTile is given

This commit is contained in:
Andreas Schneider 2009-12-04 03:17:05 +01:00
parent b6dfd64d41
commit 082770f183
1 changed files with 1 additions and 1 deletions

View File

@ -566,7 +566,7 @@ begin
mnuGrabTileIDClick(nil); mnuGrabTileIDClick(nil);
end; end;
if (not acSelect.Checked) and (targetTile <> nil) then if (not acSelect.Checked) and (targetTile <> nil) and (SelectedTile <> nil) then
begin begin
targetRect := GetSelectedRect; targetRect := GetSelectedRect;