paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-15 17:59:26 +02:00
Code Issues Packages Projects Releases Wiki Activity

LCL: added const to GetLocalizedFormatDescription function parameters

Browse Source 
(cherry picked from commit 0a0b688587)
This commit is contained in:
Maxim Ganetsky 2022-01-17 00:33:57 +03:00
parent f5629cffbb
commit e1581cc153
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/include/picture.inc
View File

@ -39,7 +39,7 @@ type
property Formats[Index: integer]: PPicFileFormat read GetFormats; default; property Formats[Index: integer]: PPicFileFormat read GetFormats; default;
end; end;
function GetLocalizedFormatDescription(GraphicClass: TGraphicClass; OriginalDescription: string): string; function GetLocalizedFormatDescription(const GraphicClass: TGraphicClass; const OriginalDescription: string): string;
begin begin
case GraphicClass.ClassName of case GraphicClass.ClassName of
'TPortableNetworkGraphic': Result:=rsPortableNetworkGraphic; 'TPortableNetworkGraphic': Result:=rsPortableNetworkGraphic;