From 685e707752f72f1a74da315a3ababd6eed038aee Mon Sep 17 00:00:00 2001
From: ondrej <ondrej@lazarus-ide.org>
Date: Thu, 26 Apr 2018 09:08:41 +0000
Subject: [PATCH] IDE: fix image loading after r57716 #136d996374

git-svn-id: trunk@57720 -
---
 components/ideintf/ideimagesintf.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/components/ideintf/ideimagesintf.pas b/components/ideintf/ideimagesintf.pas
index ec17b458df..e0a496b076 100644
--- a/components/ideintf/ideimagesintf.pas
+++ b/components/ideintf/ideimagesintf.pas
@@ -320,7 +320,7 @@ begin
         raise Exception.CreateFmt('TIDEImages.LoadImage: %s not found.', [ImageName]);
       if Grp is TCustomBitmap then
       begin
-        Rc := Rect(0, 0, List.Width-1, List.Height-1);
+        Rc := Rect(0, 0, List.Width, List.Height);
         OffsetRect(Rc, (Grp.Width-List.Width) div 2, (Grp.Height-List.Height) div 2);
         Result := List.AddSlice(TCustomBitmap(Grp), Rc);
       end else