paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2026-01-06 11:00:29 +01:00
Code Issues Packages Projects Releases Wiki Activity

added polish

Browse Source 
git-svn-id: trunk@4373 -
This commit is contained in:
mattias 2003-07-06 17:58:53 +00:00
parent afd8334eb0
commit 96d494b9c0
2 changed files with 10 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
ide/environmentopts.pp
View File

@ -631,15 +631,17 @@ begin
Result:=afaAsk;
end;
function GetLazarusLanguageNames(aLangId : TLazarusLanguage) : String;
function GetLazarusLanguageNames(aLangId: TLazarusLanguage) : String;
begin
Result :=rsLanguageAutomatic;
Result := '?';
Case aLangId of
llEnglish : Result:=rsLanguageEnglish;
llGerman : Result:=rsLanguageDeutsch;
llSpanish : Result:=rsLanguageSpanish;
llFrench : Result:=rsLanguageFrench;
llRussian : Result:=rsLanguageRussian;
llAutomatic: Result:=rsLanguageAutomatic;
llEnglish : Result:=rsLanguageEnglish;
llGerman : Result:=rsLanguageDeutsch;
llSpanish : Result:=rsLanguageSpanish;
llFrench : Result:=rsLanguageFrench;
llRussian : Result:=rsLanguageRussian;
llPolish : Result:=rsLanguagePolish;
end;
end;

1
ide/lazarusidestrconsts.pas
View File

@ -1224,6 +1224,7 @@ resourcestring
rsLanguageSpanish = 'Español';
rsLanguageFrench = 'French';
rsLanguageRussian = 'òÕÓÓËÉÊ';
rsLanguagePolish = 'Polish';
//Units dependencies
dlgUnitDepCaption = 'Unit dependencies';