FIX: Access violation when archive icon not found

This commit is contained in:
Alexander Koblov 2012-12-23 09:21:57 +00:00
commit 0e6d3f59eb

View file

@ -1412,10 +1412,10 @@ begin
FreeThenNil(Icon);
DestroyIcon(hicn);
end
end;
{$ELSE}
Result:= nil;
end
else
{$ENDIF}
Result:= nil;
end;
function TPixMapManager.DrawBitmap(iIndex: PtrInt; Canvas : TCanvas; X, Y: Integer) : Boolean;
@ -1949,4 +1949,4 @@ finalization
end;
end.