paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-12 05:21:27 +02:00
Code Issues Packages Projects Releases Wiki Activity

fpvectorial: Avoid unnecessary widestring conversion.

Browse Source
This commit is contained in:
wp_xyz 2023-01-08 18:21:54 +01:00
parent 84adf78bd9
commit 9ce162804c
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/fpvectorial/svgvectorialreader.pas
View File

@ -2347,7 +2347,7 @@ end;
function TvSVGVectorialReader.ReadPathFromNode(ANode: TDOMNode;
AData: TvVectorialPage; ADoc: TvVectorialDocument): TvEntity;
var
lNodeName, lDStr: WideString;
lNodeName, lDStr: String;
i, j: Integer;
lCurPath: TPath;
lPaths: TvSVGPathList;
@ -2362,7 +2362,7 @@ begin
Inc(FPathNumber);
FSVGPathTokenizer.ExtraDebugStr := Format(' [TvSVGVectorialReader.ReadPathFromNode] path#(1-based)=%d', [FPathNumber]);
lPaths := ReadPathFromString(UTF8Encode(lDStr), AData, ADoc);
lPaths := ReadPathFromString(lDStr, AData, ADoc);
FSVGPathTokenizer.ExtraDebugStr := '';
for j := 0 to lPaths.Count-1 do
begin