diff --git a/ide/aboutfrm.lfm b/ide/aboutfrm.lfm
index 75e8d05c29..7b382140e9 100644
--- a/ide/aboutfrm.lfm
+++ b/ide/aboutfrm.lfm
@@ -243,8 +243,8 @@ object AboutForm: TAboutForm
       AnchorSideBottom.Control = CloseButton
       AnchorSideBottom.Side = asrBottom
       Left = 6
-      Height = 29
-      Top = 11
+      Height = 26
+      Top = 12
       Width = 30
       Anchors = [akTop, akLeft, akBottom]
       BorderSpacing.Left = 6
@@ -252,8 +252,8 @@ object AboutForm: TAboutForm
     end
   end
   object PopupMenu1: TPopupMenu
-    left = 76
-    top = 278
+    Left = 76
+    Top = 278
     object miVerToClipboard: TMenuItem
       Caption = 'Copy version information to clipboard'
       OnClick = miVerToClipboardClick
diff --git a/ide/aboutfrm.pas b/ide/aboutfrm.pas
index e2a6e53d81..2840f7d113 100644
--- a/ide/aboutfrm.pas
+++ b/ide/aboutfrm.pas
@@ -307,20 +307,9 @@ begin
 end;
 
 procedure TAboutForm.LoadLogo;
-var
-  pic: TPicture;
-  W, H: Integer;
 begin
-  pic := TPicture.Create;
-  try
-    pic.LoadFromResourceName(hInstance, 'splash_logo', TPortableNetworkGraphic);
-    W := LogoImage.Width;
-    H := LogoImage.Height;
-    LogoImage.Picture.Bitmap.SetSize(W, H);
-    AntiAliasedStretchDrawBitmap(pic.Bitmap, LogoImage.Picture.Bitmap, W, H);
-  finally
-    pic.Free;
-  end;
+  LogoImage.Picture.LoadFromResourceName(HInstance, 'splash_logo', TPortableNetworkGraphic);
+  ScaleImg(LogoImage.Picture.Bitmap, LogoImage.Width, LogoImage.Height)
 end;
 
 
diff --git a/ide/splash.pp b/ide/splash.pp
index 28380cf6dc..2f8261ae60 100644
--- a/ide/splash.pp
+++ b/ide/splash.pp
@@ -124,18 +124,8 @@ begin
 end;
 
 procedure TSplashForm.LoadSplash;
-var
-  pic: TPicture;
 begin
-  pic := TPicture.Create;
-  try
-    pic.LoadFromResourceName(hInstance, 'splash_logo', TPortableNetworkGraphic);
-    Width := round(Height * pic.Width / pic.Height);
-    Image.Picture.Bitmap.SetSize(Width, Height);
-    AntiAliasedStretchDrawBitmap(pic.Bitmap, Image.Picture.Bitmap, Width, Height);
-  finally
-    pic.Free;
-  end;
+  Image.Picture.LoadFromResourceName(hInstance, 'splash_logo', TPortableNetworkGraphic);
 end;
 
 procedure TSplashForm.Show;
@@ -143,6 +133,7 @@ begin
   inherited;
 
   LoadSplash;
+  ScaleImg(Image.Picture.Bitmap, Width, Height);
 end;
 
 end.
diff --git a/images/splash_logo.png b/images/splash_logo.png
index 443ab15670..bfd7643648 100644
Binary files a/images/splash_logo.png and b/images/splash_logo.png differ
diff --git a/images/splash_logo.res b/images/splash_logo.res
index f66417486b..a0076efe0f 100644
Binary files a/images/splash_logo.res and b/images/splash_logo.res differ