JCF: improved localization, regenerated translations and updated Russian translation

git-svn-id: trunk@37432 -
This commit is contained in:
maxim 2012-05-26 17:50:09 +00:00
parent 3e8e2d0c05
commit e4137548cc
11 changed files with 84 additions and 8 deletions

View File

@ -40,7 +40,7 @@ uses
{ lazarus design time } { lazarus design time }
LazIDEIntf, SrcEditorIntf, IDEMsgIntf, ProjectIntf, LazIDEIntf, SrcEditorIntf, IDEMsgIntf, ProjectIntf,
{ local} { local}
EditorConverter, FileConverter, ConvertTypes; EditorConverter, FileConverter, ConvertTypes, jcfuiconsts;
type type
TJcfIdeMain = class(TObject) TJcfIdeMain = class(TObject)
@ -119,8 +119,9 @@ begin
if (SourceEditorManagerIntf= nil) or (SourceEditorManagerIntf.ActiveEditor = nil) then if (SourceEditorManagerIntf= nil) or (SourceEditorManagerIntf.ActiveEditor = nil) then
LogIdeMessage('', 'No current window', mtInputError, -1, -1) LogIdeMessage('', 'No current window', mtInputError, -1, -1)
else begin else begin
lsMsg := 'JEDI Code Format of ' + SourceEditorManagerIntf.ActiveEditor.FileName lsMsg := Format(lisJEDICodeFormatOfStartFormatting, [SourceEditorManagerIntf
+ NativeLineBreak + 'Start formatting?'; .ActiveEditor.FileName
+ NativeLineBreak]);
if MessageDlg(lsMsg, mtConfirmation, [mbYes, mbNo], 0) = mrYes then if MessageDlg(lsMsg, mtConfirmation, [mbYes, mbNo], 0) = mrYes then
ConvertEditor(SourceEditorManagerIntf.ActiveEditor); ConvertEditor(SourceEditorManagerIntf.ActiveEditor);
end; end;
@ -147,9 +148,9 @@ begin
lazProject := GetCurrentProject; lazProject := GetCurrentProject;
if lazProject = nil then if lazProject = nil then
exit; exit;
lsMsg := 'JEDI Code Format of ' + lazProject.MainFile.FileName + NativeLineBreak + lsMsg := Format(lisJEDICodeFormatOfAreYouSureThatYouWantToFormatAllFi, [
'Are you sure that you want to format all ' + IntToStr(lazProject.FileCount) + lazProject.MainFile.FileName + NativeLineBreak, IntToStr(lazProject.
' files in the project.'; FileCount)]);
if MessageDlg(lsMsg, mtConfirmation, [mbYes, mbNo], 0) = mrYes then begin if MessageDlg(lsMsg, mtConfirmation, [mbYes, mbNo], 0) = mrYes then begin
ClearToolMessages; ClearToolMessages;
{ loop through all modules in the project } { loop through all modules in the project }

View File

@ -310,6 +310,10 @@ resourcestring
lisEDType = 'Type: %s%s'; lisEDType = 'Type: %s%s';
lisEDError = 'Error'; lisEDError = 'Error';
lisJEDICodeFormatOfStartFormatting = 'JEDI Code Format of %sStart formatting?';
lisJEDICodeFormatOfAreYouSureThatYouWantToFormatAllFi = 'JEDI Code Format of'
+' %sAre you sure that you want to format all %s files in the project?';
implementation implementation
end. end.

View File

@ -506,6 +506,14 @@ msgstr "Einstellungen"
msgid "JCF Format Settings" msgid "JCF Format Settings"
msgstr "JCF-Formateinstellungen" msgstr "JCF-Formateinstellungen"
#: jcfuiconsts.lisjedicodeformatofareyousurethatyouwanttoformatallfi
msgid "JEDI Code Format of %sAre you sure that you want to format all %s files in the project?"
msgstr ""
#: jcfuiconsts.lisjedicodeformatofstartformatting
msgid "JEDI Code Format of %sStart formatting?"
msgstr ""
#: jcfuiconsts.lislbbreaklinesthatarelongerthanmaxlinelength #: jcfuiconsts.lislbbreaklinesthatarelongerthanmaxlinelength
msgid "&Break lines that are longer than max line length" msgid "&Break lines that are longer than max line length"
msgstr "Zeilen, die länger als das Maximum sind umbrechen" msgstr "Zeilen, die länger als das Maximum sind umbrechen"

View File

@ -506,6 +506,14 @@ msgstr "Options"
msgid "JCF Format Settings" msgid "JCF Format Settings"
msgstr "Paramètres de formattage de JCF" msgstr "Paramètres de formattage de JCF"
#: jcfuiconsts.lisjedicodeformatofareyousurethatyouwanttoformatallfi
msgid "JEDI Code Format of %sAre you sure that you want to format all %s files in the project?"
msgstr ""
#: jcfuiconsts.lisjedicodeformatofstartformatting
msgid "JEDI Code Format of %sStart formatting?"
msgstr ""
#: jcfuiconsts.lislbbreaklinesthatarelongerthanmaxlinelength #: jcfuiconsts.lislbbreaklinesthatarelongerthanmaxlinelength
msgid "&Break lines that are longer than max line length" msgid "&Break lines that are longer than max line length"
msgstr "Coupe les lignes qui sont plus longues que la longueur de ligne maximale" msgstr "Coupe les lignes qui sont plus longues que la longueur de ligne maximale"

View File

@ -1,4 +1,3 @@
# Massimo Soricetti <notturno@quipo.it>, 2011.
msgid "" msgid ""
msgstr "" msgstr ""
"PO-Revision-Date: 2011-04-22 13:00+0200\n" "PO-Revision-Date: 2011-04-22 13:00+0200\n"
@ -506,6 +505,14 @@ msgstr "Opzioni"
msgid "JCF Format Settings" msgid "JCF Format Settings"
msgstr "Impostazioni formato JCF" msgstr "Impostazioni formato JCF"
#: jcfuiconsts.lisjedicodeformatofareyousurethatyouwanttoformatallfi
msgid "JEDI Code Format of %sAre you sure that you want to format all %s files in the project?"
msgstr ""
#: jcfuiconsts.lisjedicodeformatofstartformatting
msgid "JEDI Code Format of %sStart formatting?"
msgstr ""
#: jcfuiconsts.lislbbreaklinesthatarelongerthanmaxlinelength #: jcfuiconsts.lislbbreaklinesthatarelongerthanmaxlinelength
msgid "&Break lines that are longer than max line length" msgid "&Break lines that are longer than max line length"
msgstr "&Spezza righe più lunghe della lunghezza massima" msgstr "&Spezza righe più lunghe della lunghezza massima"

View File

@ -1,4 +1,3 @@
# Valdas Jankūnas <zmuogs@gmail.com>, 2010.
msgid "" msgid ""
msgstr "" msgstr ""
"Content-Type: text/plain; charset=UTF-8\n" "Content-Type: text/plain; charset=UTF-8\n"
@ -506,6 +505,14 @@ msgstr "Parinktys"
msgid "JCF Format Settings" msgid "JCF Format Settings"
msgstr "JCF formato nuostatos" msgstr "JCF formato nuostatos"
#: jcfuiconsts.lisjedicodeformatofareyousurethatyouwanttoformatallfi
msgid "JEDI Code Format of %sAre you sure that you want to format all %s files in the project?"
msgstr ""
#: jcfuiconsts.lisjedicodeformatofstartformatting
msgid "JEDI Code Format of %sStart formatting?"
msgstr ""
#: jcfuiconsts.lislbbreaklinesthatarelongerthanmaxlinelength #: jcfuiconsts.lislbbreaklinesthatarelongerthanmaxlinelength
msgid "&Break lines that are longer than max line length" msgid "&Break lines that are longer than max line length"
msgstr "&Laužti eilutes, kurios ilgesnės nei maksimalus eilutės ilgis" msgstr "&Laužti eilutes, kurios ilgesnės nei maksimalus eilutės ilgis"

View File

@ -496,6 +496,14 @@ msgstr ""
msgid "JCF Format Settings" msgid "JCF Format Settings"
msgstr "" msgstr ""
#: jcfuiconsts.lisjedicodeformatofareyousurethatyouwanttoformatallfi
msgid "JEDI Code Format of %sAre you sure that you want to format all %s files in the project?"
msgstr ""
#: jcfuiconsts.lisjedicodeformatofstartformatting
msgid "JEDI Code Format of %sStart formatting?"
msgstr ""
#: jcfuiconsts.lislbbreaklinesthatarelongerthanmaxlinelength #: jcfuiconsts.lislbbreaklinesthatarelongerthanmaxlinelength
msgid "&Break lines that are longer than max line length" msgid "&Break lines that are longer than max line length"
msgstr "" msgstr ""

View File

@ -504,6 +504,14 @@ msgstr "Opções"
msgid "JCF Format Settings" msgid "JCF Format Settings"
msgstr "Configurações \"JCF\"" msgstr "Configurações \"JCF\""
#: jcfuiconsts.lisjedicodeformatofareyousurethatyouwanttoformatallfi
msgid "JEDI Code Format of %sAre you sure that you want to format all %s files in the project?"
msgstr ""
#: jcfuiconsts.lisjedicodeformatofstartformatting
msgid "JEDI Code Format of %sStart formatting?"
msgstr ""
#: jcfuiconsts.lislbbreaklinesthatarelongerthanmaxlinelength #: jcfuiconsts.lislbbreaklinesthatarelongerthanmaxlinelength
msgid "&Break lines that are longer than max line length" msgid "&Break lines that are longer than max line length"
msgstr "&Interromper linhas maiores que o tamanho máximo da linha" msgstr "&Interromper linhas maiores que o tamanho máximo da linha"

View File

@ -504,6 +504,14 @@ msgstr "Opções"
msgid "JCF Format Settings" msgid "JCF Format Settings"
msgstr "Configurações \"JCF\"" msgstr "Configurações \"JCF\""
#: jcfuiconsts.lisjedicodeformatofareyousurethatyouwanttoformatallfi
msgid "JEDI Code Format of %sAre you sure that you want to format all %s files in the project?"
msgstr ""
#: jcfuiconsts.lisjedicodeformatofstartformatting
msgid "JEDI Code Format of %sStart formatting?"
msgstr ""
#: jcfuiconsts.lislbbreaklinesthatarelongerthanmaxlinelength #: jcfuiconsts.lislbbreaklinesthatarelongerthanmaxlinelength
msgid "&Break lines that are longer than max line length" msgid "&Break lines that are longer than max line length"
msgstr "&Interromper linhas maiores que o tamanho máximo da linha" msgstr "&Interromper linhas maiores que o tamanho máximo da linha"

View File

@ -507,6 +507,15 @@ msgstr "Параметры"
msgid "JCF Format Settings" msgid "JCF Format Settings"
msgstr "Форматирование кода JEDI" msgstr "Форматирование кода JEDI"
#: jcfuiconsts.lisjedicodeformatofareyousurethatyouwanttoformatallfi
#| msgid "JEDI Code Format of %sAre you sure that you want to format all %s files in the project."
msgid "JEDI Code Format of %sAre you sure that you want to format all %s files in the project?"
msgstr "Форматирование кода JEDI для %sВы действительно хотите форматировать все (%s) файлы в проекте?"
#: jcfuiconsts.lisjedicodeformatofstartformatting
msgid "JEDI Code Format of %sStart formatting?"
msgstr "Форматирование кода JEDI для %sНачать?"
#: jcfuiconsts.lislbbreaklinesthatarelongerthanmaxlinelength #: jcfuiconsts.lislbbreaklinesthatarelongerthanmaxlinelength
msgid "&Break lines that are longer than max line length" msgid "&Break lines that are longer than max line length"
msgstr "&Разрыв строк длиннее максимума" msgstr "&Разрыв строк длиннее максимума"

View File

@ -504,6 +504,14 @@ msgstr "Параметри"
msgid "JCF Format Settings" msgid "JCF Format Settings"
msgstr "Параметри Форматування JCF" msgstr "Параметри Форматування JCF"
#: jcfuiconsts.lisjedicodeformatofareyousurethatyouwanttoformatallfi
msgid "JEDI Code Format of %sAre you sure that you want to format all %s files in the project?"
msgstr ""
#: jcfuiconsts.lisjedicodeformatofstartformatting
msgid "JEDI Code Format of %sStart formatting?"
msgstr ""
#: jcfuiconsts.lislbbreaklinesthatarelongerthanmaxlinelength #: jcfuiconsts.lislbbreaklinesthatarelongerthanmaxlinelength
msgid "&Break lines that are longer than max line length" msgid "&Break lines that are longer than max line length"
msgstr "&Розривати рядки що довші за макс. довжину рядка" msgstr "&Розривати рядки що довші за макс. довжину рядка"