From 05aa1b08f9cec8025be50bfb50cb4c2ef332fea2 Mon Sep 17 00:00:00 2001 From: michl Date: Thu, 7 Feb 2019 22:00:54 +0000 Subject: [PATCH] LCL: TLazIntfImage: After revision 60360 #71e6fd3e59 it isn't needed to call CreateData when Create is called with size and description flags. git-svn-id: trunk@60361 - --- lcl/include/icnsicon.inc | 1 - lcl/include/intfbasewinapi.inc | 1 - 2 files changed, 2 deletions(-) diff --git a/lcl/include/icnsicon.inc b/lcl/include/icnsicon.inc index b49dd3e647..615144d38a 100644 --- a/lcl/include/icnsicon.inc +++ b/lcl/include/icnsicon.inc @@ -406,7 +406,6 @@ begin IconImage.RawImageNeeded(false); RawImg := IconImage.FImage; IntfImage := TLazIntfImage.Create(IconImage.Width, IconImage.Height, [riqfRGB, riqfAlpha, riqfUpdate]); - IntfImage.CreateData; try SrcImage := TLazIntfImage.Create(RawImg, False); try diff --git a/lcl/include/intfbasewinapi.inc b/lcl/include/intfbasewinapi.inc index 4bf16c9c09..9c754c43fb 100644 --- a/lcl/include/intfbasewinapi.inc +++ b/lcl/include/intfbasewinapi.inc @@ -1285,7 +1285,6 @@ function TWidgetSet.GradientFill(DC: HDC; Vertices: PTriVertex; NumVertices: Lon function CreateIntfImage(W, H: Integer; Clear: Boolean): TLazIntfImage; begin Result := TLazIntfImage.Create(W, H, [riqfRGB, riqfAlpha, riqfUpdate]); - Result.CreateData; if Clear then Result.FillPixels(FPColor(0, 0, 0, $0000)); end;