FIX: Incorrect image colors after rotation (fixes #2783)

This commit is contained in:
Alexander Koblov 2026-03-14 15:16:36 +03:00
commit 3666aba90b

View file

@ -542,13 +542,10 @@ uses
uConvEncoding, DCBasicTypes, DCOSUtils, uOSUtils, uFindByrMr, uFileViewWithGrid,
fPrintSetup, uFindFiles, uAdministrator, uOfficeXML, uHighlighterProcs, dmHigh,
SynEditTypes, uFile, uFileSystemFileSource, uFileProcs, uOperationsManager,
uFileSourceOperationOptions
uFileSourceOperationOptions, uGraphics
{$if lcl_fullversion >= 4990000}
, SynEditWrappedView
{$endif}
{$IF DEFINED(LCLGTK2) OR DEFINED(DARWIN)}
, uGraphics
{$ENDIF}
;
const
@ -1968,7 +1965,8 @@ begin
Image.Height:= x;
end;
TRasterImage(Image.Picture.Graphic).LoadFromIntfImage(TargetImg);
BitmapAssign(TRasterImage(Image.Picture.Graphic), TargetImg);
FreeAndNil(SourceImg);
FreeAndNil(TargetImg);
AdjustImageSize;
@ -2006,7 +2004,8 @@ begin
end;
end;
TRasterImage(Image.Picture.Graphic).LoadFromIntfImage(TargetImg);
BitmapAssign(TRasterImage(Image.Picture.Graphic), TargetImg);
FreeAndNil(SourceImg);
FreeAndNil(TargetImg);
AdjustImageSize;