Skip to content

Commit

Permalink
enabled localization via hfs.lng
Browse files Browse the repository at this point in the history
  • Loading branch information
rejetto committed May 24, 2020
1 parent 17cd814 commit fdef1fe
Show file tree
Hide file tree
Showing 3 changed files with 629 additions and 4 deletions.
5 changes: 3 additions & 2 deletions developer notes.txt
Original file line number Diff line number Diff line change
@@ -1,8 +1,9 @@
Initially developed with Delphi 6, now with Delphi 10.3.3
Initially developed with Delphi 6, now with Delphi 10.3.3

Icons are generated at http://fontello.com/ . Use fontello.json for further modifications.

=== LIBS USED
ICS v8.63 by François PIETTE http://www.overbyte.be
TRegExpr v0.952 by Andrey V. Sorokin http://www.regexpstudio.com/TRegExpr/TRegExpr.html
JEDI Code Library v2.7 https://github.com/project-jedi/jcl
JEDI Code Library v2.7 https://github.com/project-jedi/jcl
Kryvich's Delphi Localizer v4.1 http://sites.google.com/site/kryvich
5 changes: 3 additions & 2 deletions hfs.dpr
Original file line number Diff line number Diff line change
Expand Up @@ -25,6 +25,7 @@ uses
{$IFDEF EX_DEBUG}
ftmExceptionForm,
{$ENDIF }
uFreeLocalizer,
monoLib,
Forms,
windows,
Expand Down Expand Up @@ -94,14 +95,14 @@ begin
end;
{$IFDEF EX_DEBUG}initErrorHandler(format('HFS %s (%s)', [VERSION, VERSION_BUILD]));{$ENDIF}
Application.Initialize();
{

if fileExists('hfs.lng') then
begin
FreeLocalizer.AutoTranslate := True;
try FreeLocalizer.LanguageFile := 'hfs.lng';
except msgDlg('Localization not supporting your codepage', MB_ICONERROR+MB_OK) end;
end;
}

Application.CreateForm(TmainFrm, mainFrm);
Application.CreateForm(TnewuserpassFrm, newuserpassFrm);
Application.CreateForm(ToptionsFrm, optionsFrm);
Expand Down
Loading

0 comments on commit fdef1fe

Please sign in to comment.