paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-05-30 04:22:49 +02:00
Code Issues Packages Projects Releases Wiki Activity

favorites: i18n support, hungarian translation. Patch from Péter Gábor. Issue #29103

Browse Source 
git-svn-id: trunk@50521 -
This commit is contained in:
ondrej 2015-11-28 19:53:40 +00:00
parent 19206bce93
commit c76c07b037
7 changed files with 63 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
.gitattributes vendored
View File

@ -1294,6 +1294,9 @@ components/favorites/README.txt svneol=native#text/plain
components/favorites/favorites.lpk svneol=native#text/plain components/favorites/favorites.lpk svneol=native#text/plain
components/favorites/favorites.pas svneol=native#text/pascal components/favorites/favorites.pas svneol=native#text/pascal
components/favorites/favorites_impl.pas svneol=native#text/pascal components/favorites/favorites_impl.pas svneol=native#text/pascal
components/favorites/favoritesstr.pas svneol=native#text/pascal
components/favorites/languages/favoritesstr.hu.po svneol=native#text/plain
components/favorites/languages/favoritesstr.po svneol=native#text/plain
components/filebrowser/frmconfigfilebrowser.lfm svneol=native#text/plain components/filebrowser/frmconfigfilebrowser.lfm svneol=native#text/plain
components/filebrowser/frmconfigfilebrowser.pp svneol=native#text/plain components/filebrowser/frmconfigfilebrowser.pp svneol=native#text/plain
components/filebrowser/frmfilebrowser.lfm svneol=native#text/plain components/filebrowser/frmfilebrowser.lfm svneol=native#text/plain

12
components/favorites/favorites.lpk
View File

@ -9,6 +9,7 @@
<Version Value="11"/> <Version Value="11"/>
<PathDelim Value="\"/> <PathDelim Value="\"/>
<SearchPaths> <SearchPaths>
<OtherUnitFiles Value="."/>
<UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/> <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
</SearchPaths> </SearchPaths>
<CodeGeneration> <CodeGeneration>
@ -30,13 +31,22 @@
<Description Value="Creates a third section (on the top) in the Open tool button drop-down menu where you can register your favorite projects."/> <Description Value="Creates a third section (on the top) in the Open tool button drop-down menu where you can register your favorite projects."/>
<License Value="GPL-2"/> <License Value="GPL-2"/>
<Version Minor="1" Release="1"/> <Version Minor="1" Release="1"/>
<Files Count="1"> <Files Count="2">
<Item1> <Item1>
<Filename Value="favorites_impl.pas"/> <Filename Value="favorites_impl.pas"/>
<HasRegisterProc Value="True"/> <HasRegisterProc Value="True"/>
<UnitName Value="favorites_impl"/> <UnitName Value="favorites_impl"/>
</Item1> </Item1>
<Item2>
<Filename Value="favoritesstr.pas"/>
<UnitName Value="favoritesstr"/>
</Item2>
</Files> </Files>
<i18n>
<EnableI18N Value="True"/>
<OutDir Value="languages"/>
<EnableI18NForLFM Value="True"/>
</i18n>
<RequiredPkgs Count="2"> <RequiredPkgs Count="2">
<Item1> <Item1>
<PackageName Value="IDEIntf"/> <PackageName Value="IDEIntf"/>

2
components/favorites/favorites.pas
View File

@ -7,7 +7,7 @@ unit favorites;
interface interface
uses uses
favorites_impl, LazarusPackageIntf; favorites_impl, favoritesstr, LazarusPackageIntf;
implementation implementation

6
components/favorites/favorites_impl.pas
View File

@ -32,7 +32,7 @@ interface
uses uses
Classes, SysUtils, ToolBarIntf, IDEImagesIntf, Graphics, PackageIntf, Classes, SysUtils, ToolBarIntf, IDEImagesIntf, Graphics, PackageIntf,
Menus, LazIDEIntf, ProjectIntf, Laz2_XMLCfg, IDEOptionsIntf, Menus, LazIDEIntf, ProjectIntf, Laz2_XMLCfg, IDEOptionsIntf,
IDECommands, ComCtrls; IDECommands, ComCtrls, IDEMsgIntf, favoritesstr;
type type
TFavoritesHandler = class TFavoritesHandler = class
@ -164,9 +164,9 @@ begin
xAddToFav := TFileNameMenuItem.Create(Self); xAddToFav := TFileNameMenuItem.Create(Self);
xAddToFav.FileName := xProj.ProjectInfoFile; xAddToFav.FileName := xProj.ProjectInfoFile;
if not FavHandler.IsInFavoriteProjects(xProj.ProjectInfoFile) then if not FavHandler.IsInFavoriteProjects(xProj.ProjectInfoFile) then
xAddToFav.Caption := Format('Add to favorites: %s', [xProj.ProjectInfoFile]) // To-Do: localize xAddToFav.Caption := Format(sAddToFavoritesS, [xProj.ProjectInfoFile])
else else
xAddToFav.Caption := Format('Remove from favorites: %s', [xProj.ProjectInfoFile]); // To-Do: localize xAddToFav.Caption := Format(sRemoveFromFavoritesS, [xProj.ProjectInfoFile]);
xAddToFav.OnClick := @mnuAddRemoveActiveProject; xAddToFav.OnClick := @mnuAddRemoveActiveProject;
xM.Insert(xMIndex, xAddToFav); xM.Insert(xMIndex, xAddToFav);
Inc(xMIndex); Inc(xMIndex);

13
components/favorites/favoritesstr.pas Normal file
View File

@ -0,0 +1,13 @@
unit favoritesstr;
{$mode objfpc}{$H+}
interface
resourcestring
sAddToFavoritesS = 'Add to favorites: %s';
sRemoveFromFavoritesS = 'Remove from favorites: %s';
implementation
end.

21
components/favorites/languages/favoritesstr.hu.po Normal file
View File

@ -0,0 +1,21 @@
msgid ""
msgstr ""
"Project-Id-Version: \n"
"POT-Creation-Date: \n"
"PO-Revision-Date: \n"
"Last-Translator: Péter Gábor <ptrg@freemail.hu>\n"
"Language-Team: Magyar (Hungarian)\n"
"Language: hu\n"
"MIME-Version: 1.0\n"
"Content-Type: text/plain; charset=UTF-8\n"
"Content-Transfer-Encoding: 8bit\n"
"X-Generator: Poedit 1.5.4\n"
#: favoritesstr.saddtofavoritess
msgid "Add to favorites: %s"
msgstr "Hozzáadás a kedvencekhez: %s"
#: favoritesstr.sremovefromfavoritess
msgid "Remove from favorites: %s"
msgstr "Eltávolítás a kedvencek közül: %s"

11
components/favorites/languages/favoritesstr.po Normal file
View File

@ -0,0 +1,11 @@
msgid ""
msgstr "Content-Type: text/plain; charset=UTF-8"
#: favoritesstr.saddtofavoritess
msgid "Add to favorites: %s"
msgstr ""
#: favoritesstr.sremovefromfavoritess
msgid "Remove from favorites: %s"
msgstr ""