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

LazReport, editor sample: translate also strings which were extracted from forms

Browse Source 
git-svn-id: trunk@52545 -
This commit is contained in:
maxim 2016-06-21 22:08:32 +00:00
parent 874c7c3d41
commit 4f5f6976ef
1 changed files with 2 additions and 1 deletions

3
components/lazreport/samples/editor/maincalleditor.pas
View File

@ -31,7 +31,7 @@ uses
LR_DBSet, IniFiles, LR_PGrid, Menus, ComCtrls, ActnList, Lr_e_txt, Lr_e_htm,
LR_E_CSV, LR_DSet, LR_BarC, LR_RRect, LR_Shape, LR_ChBox, lconvencoding,
lr_e_gen, lr_utils, LCLProc, ExtCtrls, custompreview, LR_Pars, LR_e_htmldiv,
lrAddFunctionLibrary, LazLogger, LazFileUtils;
lrAddFunctionLibrary, LazLogger, LazFileUtils, LCLTranslator;
type
@ -621,6 +621,7 @@ begin
TranslateUnitResourceStrings('Lr_const','../../source/languages/lr_const.%s.po', Lang,FallbackLang);
TranslateUnitResourceStrings('lr_add_function_const','../../source/addons/addfunction/languages/lr_add_function_const.%s.po'
,Lang,FallbackLang);
SetDefaultLang(Lang); // needed to translate strings extracted from forms
end;
initialization