mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-21 09:58:13 +00:00
Code Issues Projects Releases Packages Wiki Activity

UPD: Optimize SVG rendering speed

Browse source 
(cherry picked from commit b8e13477b0)
This commit is contained in:
Alexander Koblov 2022-12-07 18:50:53 +03:00
commit b81bb31aad
1 changed files with 3 additions and 16 deletions
Download patch file Download diff file Expand all files Collapse all files

19
src/platform/udcreadsvg.pas
View file

@ -3,7 +3,7 @@
-------------------------------------------------------------------------
Scalable Vector Graphics reader implementation (via rsvg and cairo)
Copyright (C) 2012-2019 Alexander Koblov (alexx2000@mail.ru)
Copyright (C) 2012-2022 Alexander Koblov (alexx2000@mail.ru)
This library is free software; you can redistribute it and/or
modify it under the terms of the GNU Lesser General Public
@ -109,9 +109,7 @@ type
procedure RsvgHandleRender(RsvgHandle: Pointer; CairoSurface: Pcairo_surface_t;
Cairo: Pcairo_t; Img: TFPCustomImage);
var
X, Y: Integer;
ImageData: PBGRA;
PixelColor: TFPColor;
Desc: TRawImageDescription;
begin
try
@ -123,19 +121,8 @@ begin
// Initialize image description
Desc.Init_BPP32_B8G8R8A8_BIO_TTB(Img.Width, Img.Height);
TLazIntfImage(Img).DataDescription:= Desc;
// Read image data
for Y:= 0 to Img.Height - 1 do
for X:= 0 to Img.Width - 1 do
with ImageData^ do
begin
PixelColor.alpha:= Alpha + Alpha shl 8;
PixelColor.red:= Red + Red shl 8;
PixelColor.green:= Green + Green shl 8;
PixelColor.blue:= Blue + Blue shl 8;
Img.Colors[X, Y]:= PixelColor;
Inc(ImageData);
end;
// Copy image data
Move(ImageData^, TLazIntfImage(Img).PixelData^, Img.Width * Img.Height * SizeOf(TBGRA));
end;
finally
g_object_unref(RsvgHandle);