2
0
Эх сурвалжийг харах

UPD: Viewer - speed up the first rotate (based on Exif metadata)

Alexander Koblov 1 сар өмнө
parent
commit
5a23bd3f6e
1 өөрчлөгдсөн 6 нэмэгдсэн , 6 устгасан
  1. 6 6
      src/fviewer.pas

+ 6 - 6
src/fviewer.pas

@@ -1917,11 +1917,11 @@ var
   x, y: Integer;
   xWidth,
   yHeight: Integer;
-  SourceImg: TLazIntfImage = nil;
-  TargetImg: TLazIntfImage = nil;
+  SourceImg: TLazIntfImage;
+  TargetImg: TLazIntfImage;
 begin
   TargetImg:= TLazIntfImage.Create(0, 0);
-  SourceImg:= Image.Picture.Bitmap.CreateIntfImage;
+  SourceImg := TLazIntfImage.Create(TRasterImage(Image.Picture.Graphic).RawImage, False);
   TargetImg.DataDescription:= SourceImg.DataDescription; // use the same image format
   xWidth:= Image.Picture.Bitmap.Width - 1;
   yHeight:= Image.Picture.Bitmap.Height - 1;
@@ -1980,11 +1980,11 @@ var
   x, y: Integer;
   xWidth,
   yHeight: Integer;
-  SourceImg: TLazIntfImage = nil;
-  TargetImg: TLazIntfImage = nil;
+  SourceImg: TLazIntfImage;
+  TargetImg: TLazIntfImage;
 begin
   TargetImg:= TLazIntfImage.Create(0, 0);
-  SourceImg:= Image.Picture.Bitmap.CreateIntfImage;
+  SourceImg := TLazIntfImage.Create(TRasterImage(Image.Picture.Graphic).RawImage, False);
   TargetImg.DataDescription:= SourceImg.DataDescription; // use the same image format
   xWidth:= Image.Picture.Bitmap.Width - 1;
   yHeight:= Image.Picture.Bitmap.Height - 1;