pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

To V 0.1.17.0

Browse Source 
Added: translate.lrs containing .po files

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@5433 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
gbamber
2016-12-07 09:47:36 +00:00
parent 4c05cccf2f
commit 3d58c89dc1
6 changed files with 460 additions and 75 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
applications/json_packager/jsonpackage.lpi
View File

@ -24,7 +24,7 @@
<UseVersionInfo Value="True"/>
<AutoIncrementBuild Value="True"/>
<MinorVersionNr Value="1"/>
<RevisionNr Value="16"/>
<RevisionNr Value="17"/>
<StringTable Comments="Buld configured for Win Linux and Darwin" FileDescription="An editor for OnlinePackageManager update JSON files" InternalName="jsoneditor" LegalCopyright="(c)2016 usernames lainz and minesadorada @ forum.lazarus.freepascal.org" LegalTrademarks="GPL code" OriginalFilename="jsoneditor" ProductName="Lazarus and Freepascal" ProductVersion="1.x and 3.x"/>
</VersionInfo>
<BuildModes Count="6">

178
applications/json_packager/jsonpackage.lps
View File

@ -4,13 +4,13 @@
<PathDelim Value="\"/>
<Version Value="10"/>
<BuildModes Active="Win64"/>
<Units Count="18">
<Units Count="23">
<Unit0>
<Filename Value="jsonpackage.lpr"/>
<IsPartOfProject Value="True"/>
<EditorIndex Value="6"/>
<EditorIndex Value="2"/>
<CursorPos Y="30"/>
<UsageCount Value="67"/>
<UsageCount Value="76"/>
<Loaded Value="True"/>
</Unit0>
<Unit1>
@ -19,12 +19,13 @@
<ComponentName Value="frmMain"/>
<HasResources Value="True"/>
<ResourceBaseClass Value="Form"/>
<TopLine Value="52"/>
<CursorPos X="30" Y="34"/>
<UsageCount Value="67"/>
<IsVisibleTab Value="True"/>
<TopLine Value="15"/>
<CursorPos X="57" Y="44"/>
<UsageCount Value="76"/>
<Bookmarks Count="2">
<Item0 Y="493" ID="1"/>
<Item1 Y="773"/>
<Item0 Y="502" ID="1"/>
<Item1 Y="784"/>
</Bookmarks>
<Loaded Value="True"/>
<LoadedDesigner Value="True"/>
@ -32,7 +33,7 @@
<Unit2>
<Filename Value="ugenericcollection.pas"/>
<IsPartOfProject Value="True"/>
<UsageCount Value="67"/>
<UsageCount Value="76"/>
</Unit2>
<Unit3>
<Filename Value="D:\Lazarusprojects\golfml\egacalculator\source\umainform.pas"/>
@ -42,33 +43,33 @@
<EditorIndex Value="-1"/>
<TopLine Value="541"/>
<CursorPos X="3" Y="544"/>
<UsageCount Value="13"/>
<UsageCount Value="12"/>
</Unit3>
<Unit4>
<Filename Value="D:\Lazarusprojects\MDSUM\CryptINI\trunk\cryptinilpk\cryptini.pas"/>
<EditorIndex Value="-1"/>
<UsageCount Value="10"/>
<UsageCount Value="9"/>
</Unit4>
<Unit5>
<Filename Value="D:\Lazarusprojects\MDSUM\CryptINI\trunk\latest_stable\cryptinilpk\ucryptini.pas"/>
<EditorIndex Value="-1"/>
<TopLine Value="1376"/>
<CursorPos X="55" Y="1411"/>
<UsageCount Value="15"/>
<UsageCount Value="14"/>
</Unit5>
<Unit6>
<Filename Value="..\..\lazarus\lcl\defaulttranslator.pas"/>
<UnitName Value="DefaultTranslator"/>
<EditorIndex Value="-1"/>
<CursorPos X="53" Y="29"/>
<UsageCount Value="14"/>
<UsageCount Value="13"/>
</Unit6>
<Unit7>
<Filename Value="..\..\lazarus\lcl\lcltranslator.pas"/>
<UnitName Value="LCLTranslator"/>
<EditorIndex Value="-1"/>
<TopLine Value="517"/>
<UsageCount Value="14"/>
<UsageCount Value="13"/>
</Unit7>
<Unit8>
<Filename Value="..\..\NewPascal\lazarus\packager\registration\registerfcl.pas"/>
@ -76,7 +77,7 @@
<EditorIndex Value="-1"/>
<TopLine Value="24"/>
<CursorPos X="42" Y="37"/>
<UsageCount Value="10"/>
<UsageCount Value="9"/>
</Unit8>
<Unit9>
<Filename Value="D:\lazarustrunk\common_components\onlinepackagemanager\onlinepackagemanager\opkman_mainfrm.pas"/>
@ -84,7 +85,7 @@
<EditorIndex Value="-1"/>
<TopLine Value="22"/>
<CursorPos X="12" Y="23"/>
<UsageCount Value="10"/>
<UsageCount Value="9"/>
</Unit9>
<Unit10>
<Filename Value="D:\lazarustrunk\common_components\onlinepackagemanager\onlinepackagemanager\opkman_mainfrm.lfm"/>
@ -93,190 +94,223 @@
<ResourceBaseClass Value="Form"/>
<EditorIndex Value="-1"/>
<CursorPos X="6"/>
<UsageCount Value="10"/>
<UsageCount Value="9"/>
<DefaultSyntaxHighlighter Value="LFM"/>
</Unit10>
<Unit11>
<Filename Value="C:\NewPascalDarwin\lazarus\lcl\grids.pas"/>
<UnitName Value="Grids"/>
<EditorIndex Value="5"/>
<EditorIndex Value="-1"/>
<TopLine Value="10428"/>
<CursorPos X="29" Y="10452"/>
<UsageCount Value="17"/>
<Loaded Value="True"/>
<CursorPos X="33" Y="10448"/>
<UsageCount Value="16"/>
</Unit11>
<Unit12>
<Filename Value="C:\NewPascalDarwin\fpc\rtl\objpas\classes\classesh.inc"/>
<EditorIndex Value="-1"/>
<TopLine Value="475"/>
<CursorPos X="21" Y="525"/>
<UsageCount Value="16"/>
<UsageCount Value="15"/>
</Unit12>
<Unit13>
<Filename Value="X:\MainForm\MainForm\umain.pas"/>
<EditorIndex Value="-1"/>
<TopLine Value="200"/>
<CursorPos X="21" Y="383"/>
<UsageCount Value="14"/>
<UsageCount Value="13"/>
</Unit13>
<Unit14>
<Filename Value="D:\lazarustrunk\common_components\kcontrols_1.7\source\kgrids.pas"/>
<UnitName Value="KGrids"/>
<EditorIndex Value="1"/>
<EditorIndex Value="-1"/>
<TopLine Value="5883"/>
<CursorPos X="19" Y="5885"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
<UsageCount Value="14"/>
</Unit14>
<Unit15>
<Filename Value="C:\NewPascalDarwin\lazarus\lcl\lcltype.pp"/>
<UnitName Value="LCLType"/>
<EditorIndex Value="2"/>
<EditorIndex Value="-1"/>
<TopLine Value="1619"/>
<CursorPos X="21" Y="1643"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
<UsageCount Value="14"/>
</Unit15>
<Unit16>
<Filename Value="C:\NewPascalDarwin\lazarus\ide\lazarus.pp"/>
<UnitName Value="Lazarus"/>
<EditorIndex Value="3"/>
<TopLine Value="108"/>
<CursorPos Y="154"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
<EditorIndex Value="-1"/>
<TopLine Value="63"/>
<CursorPos X="21" Y="94"/>
<UsageCount Value="14"/>
</Unit16>
<Unit17>
<Filename Value="D:\lazarustrunk\common_components\kcontrols_1.7\source\kmemo.pas"/>
<UnitName Value="KMemo"/>
<IsVisibleTab Value="True"/>
<EditorIndex Value="4"/>
<EditorIndex Value="-1"/>
<TopLine Value="1501"/>
<CursorPos X="78" Y="1525"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
<UsageCount Value="9"/>
</Unit17>
<Unit18>
<Filename Value="D:\lazarustrunk\common_components\cryptini\ucryptini.pas"/>
<EditorIndex Value="-1"/>
<TopLine Value="1023"/>
<CursorPos X="30" Y="1045"/>
<UsageCount Value="9"/>
</Unit18>
<Unit19>
<Filename Value="C:\NewPascalDarwin\lazarus\ide\revision.inc"/>
<EditorIndex Value="-1"/>
<CursorPos X="28" Y="2"/>
<UsageCount Value="14"/>
</Unit19>
<Unit20>
<Filename Value="D:\lazarustrunk\common_components\bgrabitmap-master\bgrabitmap\bgrasse.pas"/>
<UnitName Value="BGRASSE"/>
<EditorIndex Value="-1"/>
<TopLine Value="405"/>
<CursorPos X="9" Y="429"/>
<UsageCount Value="12"/>
</Unit20>
<Unit21>
<Filename Value="C:\NewPascalDarwin\lazarus\lcl\translations.pas"/>
<UnitName Value="Translations"/>
<EditorIndex Value="1"/>
<TopLine Value="67"/>
<CursorPos X="41" Y="90"/>
<UsageCount Value="11"/>
<Loaded Value="True"/>
</Unit21>
<Unit22>
<Filename Value="translate.lrs"/>
<EditorIndex Value="-1"/>
<UsageCount Value="10"/>
</Unit22>
</Units>
<OtherDefines Count="1">
<Define0 Value="IGNOREPICTURE"/>
</OtherDefines>
<JumpHistory Count="29" HistoryIndex="28">
<JumpHistory Count="30" HistoryIndex="29">
<Position1>
<Filename Value="umain.pas"/>
<Caret Line="632" Column="23" TopLine="593"/>
<Caret Line="498" Column="75" TopLine="458"/>
</Position1>
<Position2>
<Filename Value="umain.pas"/>
<Caret Line="636" Column="65" TopLine="597"/>
<Caret Line="77" Column="72" TopLine="43"/>
</Position2>
<Position3>
<Filename Value="umain.pas"/>
<Caret Line="638" Column="37" TopLine="599"/>
<Caret Line="568" Column="55" TopLine="545"/>
</Position3>
<Position4>
<Filename Value="umain.pas"/>
<Caret Line="639" Column="23" TopLine="600"/>
<Caret Line="57" TopLine="33"/>
</Position4>
<Position5>
<Filename Value="umain.pas"/>
<Caret Line="710" Column="61" TopLine="670"/>
<Caret Line="569" Column="43" TopLine="545"/>
</Position5>
<Position6>
<Filename Value="umain.pas"/>
<Caret Line="397" TopLine="360"/>
<Caret Line="415" Column="4" TopLine="412"/>
</Position6>
<Position7>
<Filename Value="umain.pas"/>
<Caret Line="441" Column="5" TopLine="414"/>
<Caret Line="417" Column="54" TopLine="244"/>
</Position7>
<Position8>
<Filename Value="umain.pas"/>
<Caret Line="444" Column="42" TopLine="141"/>
<Caret Line="470" Column="3" TopLine="209"/>
</Position8>
<Position9>
<Filename Value="umain.pas"/>
<Caret Line="386" Column="27" TopLine="377"/>
<Caret Line="18" Column="40"/>
</Position9>
<Position10>
<Filename Value="umain.pas"/>
<Caret Line="431" Column="18" TopLine="417"/>
<Caret Line="464" TopLine="437"/>
</Position10>
<Position11>
<Filename Value="umain.pas"/>
<Caret Line="367" Column="18" TopLine="363"/>
<Caret Line="168" Column="18" TopLine="134"/>
</Position11>
<Position12>
<Filename Value="umain.pas"/>
<Caret Line="36" Column="71" TopLine="10"/>
<Caret Line="897" TopLine="850"/>
</Position12>
<Position13>
<Filename Value="umain.pas"/>
<Caret Line="700" TopLine="682"/>
<Caret Line="904" Column="47" TopLine="862"/>
</Position13>
<Position14>
<Filename Value="umain.pas"/>
<Caret Line="31" Column="60" TopLine="13"/>
<Caret Line="898" Column="3" TopLine="863"/>
</Position14>
<Position15>
<Filename Value="umain.pas"/>
<Caret Line="417" Column="45" TopLine="393"/>
<Caret Line="902" Column="44" TopLine="863"/>
</Position15>
<Position16>
<Filename Value="umain.pas"/>
<Caret Line="6" Column="60"/>
<Caret Line="903" Column="42" TopLine="863"/>
</Position16>
<Position17>
<Filename Value="umain.pas"/>
<Caret Line="38" Column="37" TopLine="23"/>
<Caret Line="899" Column="45" TopLine="863"/>
</Position17>
<Position18>
<Filename Value="umain.pas"/>
<Caret Line="388" TopLine="375"/>
<Caret Line="900" Column="44" TopLine="864"/>
</Position18>
<Position19>
<Filename Value="umain.pas"/>
<Caret Line="41" Column="15" TopLine="17"/>
<Caret Line="188" Column="4" TopLine="175"/>
</Position19>
<Position20>
<Filename Value="umain.pas"/>
<Caret Line="510" Column="87" TopLine="486"/>
<Caret Line="900" Column="50" TopLine="864"/>
</Position20>
<Position21>
<Filename Value="umain.pas"/>
<Caret Line="84" Column="71" TopLine="58"/>
<Caret Line="188" Column="4" TopLine="159"/>
</Position21>
<Position22>
<Filename Value="umain.pas"/>
<Caret Line="112" Column="18" TopLine="72"/>
<Caret Line="900" Column="45" TopLine="864"/>
</Position22>
<Position23>
<Filename Value="umain.pas"/>
<Caret Line="231" Column="15" TopLine="191"/>
<Caret Line="188" TopLine="154"/>
</Position23>
<Position24>
<Filename Value="umain.pas"/>
<Caret Line="498" Column="75" TopLine="458"/>
<Caret Line="903" Column="34" TopLine="863"/>
</Position24>
<Position25>
<Filename Value="umain.pas"/>
<Caret Line="77" Column="72" TopLine="43"/>
<Caret Line="54" Column="49" TopLine="20"/>
</Position25>
<Position26>
<Filename Value="D:\lazarustrunk\common_components\kcontrols_1.7\source\kgrids.pas"/>
<Caret Line="5887" Column="12" TopLine="5883"/>
<Filename Value="umain.pas"/>
<Caret Line="3"/>
</Position26>
<Position27>
<Filename Value="D:\lazarustrunk\common_components\kcontrols_1.7\source\kgrids.pas"/>
<Caret Line="5885" Column="19" TopLine="5883"/>
<Filename Value="umain.pas"/>
<Caret Line="184" Column="23" TopLine="162"/>
</Position27>
<Position28>
<Filename Value="C:\NewPascalDarwin\lazarus\lcl\lcltype.pp"/>
<Caret Line="1643" Column="21" TopLine="1619"/>
<Filename Value="umain.pas"/>
<Caret Line="55" Column="78" TopLine="37"/>
</Position28>
<Position29>
<Filename Value="C:\NewPascalDarwin\lazarus\ide\lazarus.pp"/>
<Caret Line="154" TopLine="108"/>
<Filename Value="umain.pas"/>
<Caret Line="905" Column="26" TopLine="864"/>
</Position29>
<Position30>
<Filename Value="umain.pas"/>
<Caret Line="922" Column="5" TopLine="878"/>
</Position30>
</JumpHistory>
</ProjectSession>
</CONFIG>

BIN
applications/json_packager/jsonpackage.res
View File

Binary file not shown.

303
applications/json_packager/translate.lrs Normal file
View File

@ -0,0 +1,303 @@
LazarusResources.Add('jsoneditor.en','PO',[
'msgid ""'#13#10'msgstr ""'#13#10'"Content-Type: text/plain; charset=UTF-8\n"'
+#13#10'"Project-Id-Version: \n"'#13#10'"POT-Creation-Date: \n"'#13#10'"PO-Re'
+'vision-Date: \n"'#13#10'"Last-Translator: \n"'#13#10'"Language-Team: \n"'#13
+#10'"MIME-Version: 1.0\n"'#13#10'"Content-Transfer-Encoding: 8bit\n"'#13#10
+'"Language: en\n"'#13#10'"X-Generator: Poedit 1.8.11\n"'#13#10#13#10'#: tfrm'
+'main.btnadd.caption'#13#10'msgid "Add"'#13#10'msgstr "Add"'#13#10#13#10'#: '
+'tfrmmain.btnadd.hint'#13#10'msgid ""'#13#10'"Add Package File:\n"'#13#10'"T'
+'he update zip can contain more than one lpk file\n"'#13#10'"deployed to the'
+' same place.\n"'#13#10'msgstr ""'#13#10'"Add Package File:\n"'#13#10'"The u'
+'pdate zip can contain more than one lpk file\n"'#13#10'"deployed to the sam'
+'e place.\n"'#13#10#13#10'#: tfrmmain.btnremove.caption'#13#10'msgid "Remove'
+'"'#13#10'msgstr "Remove"'#13#10#13#10'#: tfrmmain.btnremove.hint'#13#10'msg'
+'id ""'#13#10'"Remove Package File:\n"'#13#10'"Deletes the last entry from t'
+'he list\n"'#13#10'msgstr ""'#13#10'"Remove Package File:\n"'#13#10'"Deletes'
+' the last entry from the list\n"'#13#10#13#10'#: tfrmmain.cbforcenotify.cap'
+'tion'#13#10'msgid "Force Notify"'#13#10'msgstr "Force Notify"'#13#10#13#10
+'#: tfrmmain.cbforcenotify.hint'#13#10'msgid ""'#13#10'"Force Notify check b'
+'ox:\n"'#13#10'"If this is checked the OPM user will be notified\n"'#13#10'"'
+'of your update. Only check this if the update is important.\n"'#13#10'msgs'
+'tr ""'#13#10'"Force Notify check box:\n"'#13#10'"If this is checked the OPM'
+' user will be notified\n"'#13#10'"of your update. Only check this if the u'
+'pdate is important.\n"'#13#10#13#10'#: tfrmmain.cmd_close.caption'#13#10'ms'
+'gid "&Close"'#13#10'msgstr "&Close"'#13#10#13#10'#: tfrmmain.cmd_save.capti'
+'on'#13#10'msgid "&Save"'#13#10'msgstr "&Save"'#13#10#13#10'#: tfrmmain.cmd_'
+'save.hint'#13#10'msgid ""'#13#10'"Save the current configuration to disk\n"'
+#13#10'"as a JSON update file\n"'#13#10'msgstr ""'#13#10'"Save the current c'
+'onfiguration to disk\n"'#13#10'"as a JSON update file\n"'#13#10#13#10'#: tf'
+'rmmain.editdownloadzipurl.hint'#13#10'msgid ""'#13#10'"Download URL:\n"'#13
+#10'"Include the FULL url needed to download the package Zip file\n"'#13#10
+'msgstr ""'#13#10'"Download URL:\n"'#13#10'"Include the FULL url needed to d'
+'ownload the package Zip file\n"'#13#10#13#10'#: tfrmmain.editname.hint'#13
+#10'msgid ""'#13#10'"Update Zip Name:\n"'#13#10'"This is just the filename ('
+'not including the path)\n"'#13#10'"of your update zip. Type, or click the ['
+'...]\n"'#13#10'msgstr ""'#13#10'"Update Zip Name:\n"'#13#10'"This is just t'
+'he filename (not including the path)\n"'#13#10'"of your update zip. Type, o'
+'r click the [...]\n"'#13#10#13#10'#: tfrmmain.filemenu.caption'#13#10'msgid'
+' "File"'#13#10'msgstr "File"'#13#10#13#10'#: tfrmmain.fileopen1.caption'#13
+#10'msgid "&Open ..."'#13#10'msgstr "&Open ..."'#13#10#13#10'#: tfrmmain.fil'
+'eopen1.hint'#13#10'msgid "Open"'#13#10'msgstr "Open"'#13#10#13#10'#: tfrmma'
+'in.filesaveas1.caption'#13#10'msgid "&Save As ..."'#13#10'msgstr "&Save As '
+'..."'#13#10#13#10'#: tfrmmain.filesaveas1.hint'#13#10'msgid "Save As"'#13#10
+'msgstr "Save As"'#13#10#13#10'#: tfrmmain.lbldownloadzipurl.caption'#13#10
+'msgid "Download URL:"'#13#10'msgstr "Download URL:"'#13#10#13#10'#: tfrmmai'
+'n.lblname.caption'#13#10'msgid "Update Zip Name:"'#13#10'msgstr "Update Zip'
+' Name:"'#13#10#13#10'#: tfrmmain.lblpackagefiles.caption'#13#10'msgid "Pack'
+'age Files:"'#13#10'msgstr "Package Files:"'#13#10#13#10'#: tfrmmain.loadite'
+'m.caption'#13#10'msgid "Load..."'#13#10'msgstr "Load..."'#13#10#13#10'#: tf'
+'rmmain.mnu_filenew.caption'#13#10'msgid "New"'#13#10'msgstr "New"'#13#10#13
+#10'#: tfrmmain.mnu_filesave.caption'#13#10'msgid "Save"'#13#10'msgstr "Save'
+'"'#13#10#13#10'#: tfrmmain.mnu_help.caption'#13#10'msgid "&Help"'#13#10'msg'
+'str "&Help"'#13#10#13#10'#: tfrmmain.mnu_helpabout.caption'#13#10'msgid "Ab'
+'out.."'#13#10'msgstr "About.."'#13#10#13#10'#: tfrmmain.mnu_helpdisablewarn'
+'ings.caption'#13#10'msgid "Disable warnings"'#13#10'msgstr "Disable warning'
+'s"'#13#10#13#10'#: tfrmmain.mnu_helpshowhints.caption'#13#10'msgid "Show Po'
+'pup Hints"'#13#10'msgstr "Show Popup Hints"'#13#10#13#10'#: tfrmmain.mnu_la'
+'ng.caption'#13#10'msgid "Languages.."'#13#10'msgstr "Languages.."'#13#10#13
+#10'#: tfrmmain.mnu_lang_en.caption'#13#10'msgid "English"'#13#10'msgstr "En'
+'glish"'#13#10#13#10'#: tfrmmain.mnu_lang_es.caption'#13#10'msgid "Espa'#195
+#177'ol"'#13#10'msgstr "Espa'#195#177'ol"'#13#10#13#10'#: tfrmmain.saveasite'
+'m.caption'#13#10'msgid "Save As..."'#13#10'msgstr "Save As..."'#13#10#13#10
+'#: tfrmmain.sb_editname.caption'#13#10'msgid "..."'#13#10'msgstr "..."'#13
+#10#13#10'#: tfrmmain.sb_editname.hint'#13#10'msgid ""'#13#10'"Update Zip Na'
+'me:\n"'#13#10'"Click this to browse your system to find\n"'#13#10'" an exis'
+'ting Update Zip\n"'#13#10'msgstr ""'#13#10'"Update Zip Name:\n"'#13#10'"Cli'
,'ck this to browse your system to find\n"'#13#10'" an existing Update Zip\n"'
+#13#10#13#10'#: tfrmmain.spd_checkurl.caption'#13#10'msgid "Check URL"'#13#10
+'msgstr "Check URL"'#13#10#13#10'#: tfrmmain.spd_checkurl.hint'#13#10'msgid '
+'"Attempting to Open URL"'#13#10'msgstr "Attempting to Open URL"'#13#10#13#10
+'#: tfrmmain.stringpackagefiles.hint'#13#10'msgid ""'#13#10'"Package Files:\'
+'n"'#13#10'"[Add]: to make a new entry\n"'#13#10'"[Remove]: Remove last ent'
+'ry\n"'#13#10'"lpk filename: i.e. mycontrol.lpk\n"'#13#10'"Version: The FULL'
+' version (i.e. not 1.0 but 1.0.0.0)\n"'#13#10'msgstr ""'#13#10'"Package Fil'
+'es:\n"'#13#10'"[Add]: to make a new entry\n"'#13#10'"[Remove]: Remove last'
+' entry\n"'#13#10'"lpk filename: i.e. mycontrol.lpk\n"'#13#10'"Version: The '
+'FULL version (i.e. not 1.0 but 1.0.0.0)\n"'#13#10#13#10'#: umain.rsabout'#13
+#10'msgid "About"'#13#10'msgstr "About"'#13#10#13#10'#: umain.rscompiledwith'
+'2'#13#10'msgid "Compiled with FPC V:%s and Lazarus V:%d.%d%s for the %s - %'
+'s platform%s%s"'#13#10'msgstr "Compiled with FPC V:%s and Lazarus V:%d.%d%s'
+' for the %s - %s platform%s%s"'#13#10#13#10'#: umain.rsdownloadzipurld'#13
+#10'msgid "- Download URL does not contain the zipfile name"'#13#10'msgstr "'
+'- Download URL does not contain the zipfile name"'#13#10#13#10'#: umain.rsd'
+'ownloadzipurli'#13#10'msgid "- Download URL is too short or missing"'#13#10
+'msgstr "- Download URL is too short or missing"'#13#10#13#10'#: umain.rsdow'
+'nloadzipurli2'#13#10'msgid "- Download URL is incomplete"'#13#10'msgstr "- '
+'Download URL is incomplete"'#13#10#13#10'#: umain.rsdownloadzipurls'#13#10
+'msgid "- Download URL should start with \"http\""'#13#10'msgstr "- Download'
+' URL should start with \"http\""'#13#10#13#10'#: umain.rsfilemaybeuns'#13#10
+'msgid "JSON may be unsaved. Are you sure you want to quit?"'#13#10'msgstr "'
+'JSON may be unsaved. Are you sure you want to quit?"'#13#10#13#10'#: umain.'
+'rsfixthentryag'#13#10'msgid "Fix, then try again."'#13#10'msgstr "Fix, then'
+' try again."'#13#10#13#10'#: umain.rshelpandinfor'#13#10'msgid "Help and In'
+'formation"'#13#10'msgstr "Help and Information"'#13#10#13#10'#: umain.rshtt'
+'pwwwupdat'#13#10'msgid "http://www.updatesite.com/myupdate/mypackagename.zi'
+'p"'#13#10'msgstr "http://www.updatesite.com/myupdate/mypackagename.zip"'#13
+#10#13#10'#: umain.rslanguagechan'#13#10'msgid "Language changed to \"%s\"."'
+#13#10'msgstr "Language changed to \"%s\"."'#13#10#13#10'#: umain.rslpkfilen'
+'ame'#13#10'msgid "lpk FileName"'#13#10'msgstr "lpk FileName"'#13#10#13#10'#'
+': umain.rsmypackagenam'#13#10'msgid "mypackagename.zip"'#13#10'msgstr "mypa'
+'ckagename.zip"'#13#10#13#10'#: umain.rsoneofthereq1'#13#10'msgid "One of th'
+'e required fields is missing or wrong."'#13#10'msgstr "One of the required '
+'fields is missing or wrong."'#13#10#13#10'#: umain.rsoneofthereqn'#13#10'ms'
+'gid "One or more of the required fields are missing or wrong."'#13#10'msgst'
+'r "One or more of the required fields are missing or wrong."'#13#10#13#10'#'
+': umain.rsoverwrite'#13#10'msgid "Overwrite"'#13#10'msgstr "Overwrite"'#13
+#10#13#10'#: umain.rssavedok'#13#10'msgid "Saved OK"'#13#10'msgstr "Saved OK'
+'"'#13#10#13#10'#: umain.rssaveunsucces'#13#10'msgid "Save unsuccessful"'#13
+#10'msgstr "Save unsuccessful"'#13#10#13#10'#: umain.rssorrycopyope'#13#10'm'
+'sgid "Sorry - copy operation was unsuccessful"'#13#10'msgstr "Sorry - copy '
+'operation was unsuccessful"'#13#10#13#10'#: umain.rssorrythislan'#13#10'msg'
+'id "Sorry, this language is unavailable at this time."'#13#10'msgstr "Sorry'
+', this language is unavailable at this time."'#13#10#13#10'#: umain.rsswass'
+'uccessf'#13#10'msgid "%s was successfully copied to the %s folder"'#13#10'm'
+'sgstr "%s was successfully copied to the %s folder"'#13#10#13#10'#: umain.r'
+'sthelpkentryd'#13#10'msgid "The .lpk entry #%d is missing the .lpk extensio'
+'n"'#13#10'msgstr "The .lpk entry #%d is missing the .lpk extension"'#13#10
+#13#10'#: umain.rsthelpkentryd2'#13#10'msgid "The .lpk entry #%d is is absen'
+'t"'#13#10'msgstr "The .lpk entry #%d is is absent"'#13#10#13#10'#: umain.rs'
+'therearenolp'#13#10'msgid "- There are no .lpk files in the list yet"'#13#10
+'msgstr "- There are no .lpk files in the list yet"'#13#10#13#10'#: umain.rs'
+'thereareoneo'#13#10'msgid "- There are one or more .lpk entries with the sa'
+'me name.%s- Every .lpk entry must have a unique name."'#13#10'msgstr "- The'
+'re are one or more .lpk entries with the same name.%s- Every .lpk entry mus'
+'t have a unique name."'#13#10#13#10'#: umain.rsthisoptionsh'#13#10'msgid "T'
+'his option should only be used for crucial updates or bug-fixed packages. A'
+'re you OK with that?"'#13#10'msgstr "This option should only be used for cr'
+'ucial updates or bug-fixed packages. Are you OK with that?"'#13#10#13#10'#:'
+' umain.rsturnhintsoff'#13#10'msgid "(You can toggle these hints on/off in t'
+'he Help menu)"'#13#10'msgstr "(You can toggle these hints on/off in the Hel'
,'p menu)"'#13#10#13#10'#: umain.rsupdate'#13#10'msgid "Update"'#13#10'msgstr'
+' "Update"'#13#10#13#10'#: umain.rsupdatejsonsf'#13#10'msgid "Update file \"'
+'%s\" failed to load correctly."'#13#10'msgstr "Update"'#13#10#13#10'#: umai'
+'n.rsupdatezipnam'#13#10'msgid "- Update zip name is too short or missing"'
+#13#10'msgstr "- Update zip name is too short or missing"'#13#10#13#10'#: um'
+'ain.rsupdatezipnam2'#13#10'msgid "- Update zip name missing extension \".zi'
+'p\""'#13#10'msgstr "- Update zip name missing extension \".zip\""'#13#10#13
+#10'#: umain.rsversion0000'#13#10'msgid "Version (n.n.n.n)"'#13#10'msgstr "V'
+'ersion (n.n.n.n)"'#13#10#13#10'#: umain.rsversionentry'#13#10'msgid "Versio'
+'n Entry #%d is absent"'#13#10'msgstr "Version Entry #%d is absent"'#13#10#13
+#10'#: umain.rsversionentry2'#13#10'msgid "Version entry #%d needs to be of '
+'the form n.n.n.n"'#13#10'msgstr "Version entry #%d needs to be of the form '
+'n.n.n.n"'#13#10#13#10'#: umain.rswouldyoulike'#13#10'msgid "Would you like '
+'to copy %s to the %s folder?"'#13#10'msgstr "Would you like to copy %s to t'
+'he %s folder?"'#13#10#13#10'#: umain.rsyoumayneedto'#13#10'msgid "(You may '
+'need to restart the app to see the change)"'#13#10'msgstr "(You may need to'
+' restart the app to see the change)"'#13#10#13#10
]);
LazarusResources.Add('jsoneditor.es','PO',[
'msgid ""'#13#10'msgstr ""'#13#10'"Content-Type: text/plain; charset=UTF-8\n"'
+#13#10'"Project-Id-Version: \n"'#13#10'"POT-Creation-Date: \n"'#13#10'"PO-Re'
+'vision-Date: \n"'#13#10'"Last-Translator: \n"'#13#10'"Language-Team: \n"'#13
+#10'"MIME-Version: 1.0\n"'#13#10'"Content-Transfer-Encoding: 8bit\n"'#13#10
+'"Language: es\n"'#13#10'"X-Generator: Poedit 1.8.11\n"'#13#10#13#10'#: tfrm'
+'main.btnadd.caption'#13#10'msgid "Add"'#13#10'msgstr "A'#195#177'adir"'#13
+#10#13#10'#: tfrmmain.btnadd.hint'#13#10'msgid ""'#13#10'"Add Package File:\'
+'n"'#13#10'"The update zip can contain more than one lpk file\n"'#13#10'"dep'
+'loyed to the same place.\n"'#13#10'msgstr "Agregar archivo del paquete: La '
+'actualizaci'#195#179'n postal puede contener m'#195#161's de un archivo LPK'
+' desplegado en el mismo lugar."'#13#10#13#10'#: tfrmmain.btnremove.caption'
+#13#10'msgid "Remove"'#13#10'msgstr "Eliminar"'#13#10#13#10'#: tfrmmain.btnr'
+'emove.hint'#13#10'msgid ""'#13#10'"Remove Package File:\n"'#13#10'"Deletes '
+'the last entry from the list\n"'#13#10'msgstr "Eliminar archivo del paquete'
+': Borra la '#195#186'ltima entrada de la lista"'#13#10#13#10'#: tfrmmain.cb'
+'forcenotify.caption'#13#10'msgid "Force Notify"'#13#10'msgstr "Notificar la'
+' fuerza"'#13#10#13#10'#: tfrmmain.cbforcenotify.hint'#13#10'msgid ""'#13#10
+'"Force Notify check box:\n"'#13#10'"If this is checked the OPM user will be'
+' notified\n"'#13#10'"of your update. Only check this if the update is impo'
+'rtant.\n"'#13#10'msgstr "Casilla de verificaci'#195#179'n notificar de fuer'
+'za: Si esto se comprueba se notificar'#195#161' al usuario de la OPM de su '
+'actualizaci'#195#179'n. S'#195#179'lo esto Compruebe si la actualizaci'#195
+#179'n es importante."'#13#10#13#10'#: tfrmmain.cmd_close.caption'#13#10'msg'
+'id "&Close"'#13#10'msgstr "&Cerrar"'#13#10#13#10'#: tfrmmain.cmd_save.capti'
+'on'#13#10'msgid "&Save"'#13#10'msgstr "Guardar"'#13#10#13#10'#: tfrmmain.cm'
+'d_save.hint'#13#10'msgid ""'#13#10'"Save the current configuration to disk\'
+'n"'#13#10'"as a JSON update file\n"'#13#10'msgstr "Guardar la configuraci'
+#195#179'n actual en el disco como un archivo de actualizaci'#195#179'n JSON'
+'"'#13#10#13#10'#: tfrmmain.editdownloadzipurl.hint'#13#10'msgid ""'#13#10'"'
+'Download URL:\n"'#13#10'"Include the FULL url needed to download the packag'
+'e Zip file\n"'#13#10'msgstr "URL de descarga: Incluir el url COMPLETO neces'
+'ario para descargar el archivo Zip del paquete"'#13#10#13#10'#: tfrmmain.ed'
+'itname.hint'#13#10'msgid ""'#13#10'"Update Zip Name:\n"'#13#10'"This is jus'
+'t the filename (not including the path)\n"'#13#10'"of your update zip. Type'
+', or click the [...]\n"'#13#10'msgstr ""'#13#10'"Actualizar postal Nombre:\'
+'n"'#13#10'"Esto es s'#195#179'lo el nombre de archivo (sin incluir la ruta '
+'de acceso) de su actualizaci'#195#179'n postal. Escriba o haga clic en el ['
+'...]\n"'#13#10#13#10'#: tfrmmain.filemenu.caption'#13#10'msgid "File"'#13#10
+'msgstr "Archivo"'#13#10#13#10'#: tfrmmain.fileopen1.caption'#13#10'msgid "&'
+'Open ..."'#13#10'msgstr "& Abrir..."'#13#10#13#10'#: tfrmmain.fileopen1.hin'
+'t'#13#10'msgid "Open"'#13#10'msgstr "Abrir"'#13#10#13#10'#: tfrmmain.filesa'
+'veas1.caption'#13#10'msgid "&Save As ..."'#13#10'msgstr "Guardar &como..."'
+#13#10#13#10'#: tfrmmain.filesaveas1.hint'#13#10'msgid "Save As"'#13#10'msgs'
+'tr "Guardar como"'#13#10#13#10'#: tfrmmain.lbldownloadzipurl.caption'#13#10
+'msgid "Download URL:"'#13#10'msgstr "URL de Descarga"'#13#10#13#10'#: tfrm'
+'main.lblname.caption'#13#10'msgid "Update Zip Name:"'#13#10'msgstr "Actuali'
+'zar postal Nombre:"'#13#10#13#10'#: tfrmmain.lblpackagefiles.caption'#13#10
+'msgid "Package Files:"'#13#10'msgstr "El paquete de archivos:"'#13#10#13#10
+'#: tfrmmain.loaditem.caption'#13#10'msgid "Load..."'#13#10'msgstr "Cargar A'
+'rchivo"'#13#10#13#10'#: tfrmmain.mnu_filenew.caption'#13#10'msgid "New"'#13
+#10'msgstr "Nuevo"'#13#10#13#10'#: tfrmmain.mnu_filesave.caption'#13#10'msgi'
+'d "Save"'#13#10'msgstr "Guardar"'#13#10#13#10'#: tfrmmain.mnu_help.caption'
+#13#10'msgid "&Help"'#13#10'msgstr "&Ayuda"'#13#10#13#10'#: tfrmmain.mnu_hel'
+'pabout.caption'#13#10'msgid "About.."'#13#10'msgstr "Acerca de"'#13#10#13#10
+'#: tfrmmain.mnu_helpdisablewarnings.caption'#13#10'msgid "Disable warnings"'
+#13#10'msgstr "Desactivar advertencias"'#13#10#13#10'#: tfrmmain.mnu_helpsho'
+'whints.caption'#13#10'msgid "Show Popup Hints"'#13#10'msgstr "Mostrar popup'
+'"'#13#10#13#10'#: tfrmmain.mnu_lang.caption'#13#10'msgid "Languages.."'#13
+#10'msgstr "Idiomas"'#13#10#13#10'#: tfrmmain.mnu_lang_en.caption'#13#10'msg'
+'id "English"'#13#10'msgstr "Ingles"'#13#10#13#10'#: tfrmmain.mnu_lang_es.ca'
+'ption'#13#10'msgid "Espa'#195#177'ol"'#13#10'msgstr "Espa'#195#177'ol"'#13
+#10#13#10'#: tfrmmain.saveasitem.caption'#13#10'msgid "Save As..."'#13#10'ms'
+'gstr "Guardar como..."'#13#10#13#10'#: tfrmmain.sb_editname.caption'#13#10
+'msgid "..."'#13#10'msgstr "..."'#13#10#13#10'#: tfrmmain.sb_editname.hint'
,#13#10'msgid ""'#13#10'"Update Zip Name:\n"'#13#10'"Click this to browse you'
+'r system to find\n"'#13#10'" an existing Update Zip\n"'#13#10'msgstr "Actua'
+'lizaci'#195#179'n Zip nombre: Haga clic aqu'#195#173' para ver su sistema p'
+'ara encontrar un Zip de actualizaci'#195#179'n existentes"'#13#10#13#10'#: '
+'tfrmmain.spd_checkurl.caption'#13#10'msgid "Check URL"'#13#10'msgstr "Compr'
+'ueba la URL."'#13#10#13#10'#: tfrmmain.spd_checkurl.hint'#13#10'msgid "Atte'
+'mpting to Open URL"'#13#10'msgstr "Intentar abrir URL"'#13#10#13#10'#: tfrm'
+'main.stringpackagefiles.hint'#13#10'msgid ""'#13#10'"Package Files:\n"'#13
+#10'"[Add]: to make a new entry\n"'#13#10'"[Remove]: Remove last entry\n"'
+#13#10'"lpk filename: i.e. mycontrol.lpk\n"'#13#10'"Version: The FULL versio'
+'n (i.e. not 1.0 but 1.0.0.0)\n"'#13#10'msgstr ""'#13#10'"Los archivos del p'
+'aquete:\n"'#13#10'"[A'#195#177'adir]: para hacer una nueva entrada\n"'#13#10
+'"[Quitar]: Eliminar la '#195#186'ltima entrada de nombre de archivo\n"'#13
+#10'"LPK: es decir mycontrol.lpk Versi'#195#179'n: La versi'#195#179'n compl'
+'eta (es decir, no 1.0, pero 1.0.0.0)\n"'#13#10#13#10'#: umain.rsabout'#13#10
+'msgid "About"'#13#10'msgstr "Acerca de"'#13#10#13#10'#: umain.rscompiledwit'
+'h2'#13#10'msgid "Compiled with FPC V:%s and Lazarus V:%d.%d%s for the %s - '
+'%s platform%s%s"'#13#10'msgstr "Compilado con FPC V: %s y Lazarus V:%d.%d%s'
+' para el % de s - plataforma de %s %s %s"'#13#10#13#10'#: umain.rsdownloadz'
+'ipurld'#13#10'msgid "- Download URL does not contain the zipfile name"'#13
+#10'msgstr "-URL de descarga no contiene el nombre del archivo zip"'#13#10#13
+#10'#: umain.rsdownloadzipurli'#13#10'msgid "- Download URL is too short or '
+'missing"'#13#10'msgstr "-URL de descarga es demasiado breve o falta"'#13#10
+#13#10'#: umain.rsdownloadzipurli2'#13#10'msgid "- Download URL is incomplet'
+'e"'#13#10'msgstr "-URL de descarga es incompleta"'#13#10#13#10'#: umain.rsd'
+'ownloadzipurls'#13#10'msgid "- Download URL should start with \"http\""'#13
+#10'msgstr "-Descargar la URL debe comenzar con \"http\""'#13#10#13#10'#: um'
+'ain.rsfilemaybeuns'#13#10'msgid "JSON may be unsaved. Are you sure you want'
+' to quit?"'#13#10'msgstr "JSON puede ser salvo. '#194#191'Est'#195#161' seg'
+'uro que desea salir?"'#13#10#13#10'#: umain.rsfixthentryag'#13#10'msgid "Fi'
+'x, then try again."'#13#10'msgstr "Fijar, int'#195#169'ntelo de nuevo."'#13
+#10#13#10'#: umain.rshelpandinfor'#13#10'msgid "Help and Information"'#13#10
+'msgstr "Ayuda e Info"'#13#10#13#10'#: umain.rshttpwwwupdat'#13#10'msgid "ht'
+'tp://www.updatesite.com/myupdate/mypackagename.zip"'#13#10'msgstr "http://w'
+'ww.updatesite.com/myupdate/mypackagename.zip"'#13#10#13#10'#: umain.rslangu'
+'agechan'#13#10'msgid "Language changed to \"%s\"."'#13#10'msgstr "Idioma ca'
+'mbiado a \"%s\"."'#13#10#13#10'#: umain.rslpkfilename'#13#10'msgid "lpk Fil'
+'eName"'#13#10'msgstr "lpk nombre de archivo"'#13#10#13#10'#: umain.rsmypack'
+'agenam'#13#10'msgid "mypackagename.zip"'#13#10'msgstr "mypackagename.zip"'
+#13#10#13#10'#: umain.rsoneofthereq1'#13#10'msgid "One of the required field'
+'s is missing or wrong."'#13#10'msgstr "Uno de los campos requeridos es falt'
+'a o no."'#13#10#13#10'#: umain.rsoneofthereqn'#13#10'msgid "One or more of '
+'the required fields are missing or wrong."'#13#10'msgstr "Uno o m'#195#161
+'s de los campos necesarios falta o mal."'#13#10#13#10'#: umain.rsoverwrite'
+#13#10'msgid "Overwrite"'#13#10'msgstr "Sobrescribir"'#13#10#13#10'#: umain.'
+'rssavedok'#13#10'msgid "Saved OK"'#13#10'msgstr "Guardado OK"'#13#10#13#10
+'#: umain.rssaveunsucces'#13#10'msgid "Save unsuccessful"'#13#10'msgstr "Sal'
+'var sin '#195#169'xito"'#13#10#13#10'#: umain.rssorrycopyope'#13#10'msgid "'
+'Sorry - copy operation was unsuccessful"'#13#10'msgstr "Lo sentimos - opera'
+'ci'#195#179'n de copia no prosper'#195#179'"'#13#10#13#10'#: umain.rssorryt'
+'hislan'#13#10'msgid "Sorry, this language is unavailable at this time."'#13
+#10'msgstr "Lo sentimos, este idioma no est'#195#161' disponible en este mom'
+'ento."'#13#10#13#10'#: umain.rsswassuccessf'#13#10'msgid "%s was successful'
+'ly copied to the %s folder"'#13#10'msgstr "%s se ha copiado con '#195#169'x'
+'ito a la carpeta de %s"'#13#10#13#10'#: umain.rsthelpkentryd'#13#10'msgid "'
+'The .lpk entry #%d is missing the .lpk extension"'#13#10'msgstr "La entrada'
+' de LPK # %d falta la extensi'#195#179'n de LPK"'#13#10#13#10'#: umain.rsth'
+'elpkentryd2'#13#10'msgid "The .lpk entry #%d is is absent"'#13#10'msgstr "L'
+'a entrada de LPK # %d es ausente"'#13#10#13#10'#: umain.rstherearenolp'#13
+#10'msgid "- There are no .lpk files in the list yet"'#13#10'msgstr "-Hay no'
+' hay archivos lpk en la lista a'#195#186'n"'#13#10#13#10'#: umain.rstherear'
+'eoneo'#13#10'msgid "- There are one or more .lpk entries with the same name'
+'.%s- Every .lpk entry must have a unique name."'#13#10'msgstr "-Hay una o m'
+#195#161's entradas de LPK con la name.%s-mismo cada entrada lpk debe tener '
,'un nombre '#195#186'nico."'#13#10#13#10'#: umain.rsthisoptionsh'#13#10'msgi'
+'d "This option should only be used for crucial updates or bug-fixed package'
+'s. Are you OK with that?"'#13#10'msgstr "Esta opci'#195#179'n debe usarse c'
+'ruciales actualizaciones o paquetes de bug-fixed. '#194#191'Est'#195#161' b'
+'ien con eso?"'#13#10#13#10'#: umain.rsturnhintsoff'#13#10'msgid "(You can t'
+'oggle these hints on/off in the Help menu)"'#13#10'msgstr "(Se pueden alter'
+'nar estos consejos de encendido/apagado en el men'#195#186' Ayuda)"'#13#10
+#13#10'#: umain.rsupdate'#13#10'msgid "Update"'#13#10'msgstr "Actualizar"'#13
+#10#13#10'#: umain.rsupdatejsonsf'#13#10'msgid "Update file \"%s\" failed to'
+' load correctly."'#13#10'msgstr "Actualizar el archivo \"%s\" no se pudo ca'
+'rgar correctamente."'#13#10#13#10'#: umain.rsupdatezipnam'#13#10'msgid "- U'
+'pdate zip name is too short or missing"'#13#10'msgstr "'#194#161'El nombre '
+'es demasiado corto!"'#13#10#13#10'#: umain.rsupdatezipnam2'#13#10'msgid "- '
+'Update zip name missing extension \".zip\""'#13#10'msgstr "-Actualizaci'#195
+#179'n falta extensi'#195#179'n \".zip\" el nombre zip"'#13#10#13#10'#: umai'
+'n.rsversion0000'#13#10'msgid "Version (n.n.n.n)"'#13#10'msgstr "Versi'#195
+#179'n (n.n.n.n)"'#13#10#13#10'#: umain.rsversionentry'#13#10'msgid "Version'
+' Entry #%d is absent"'#13#10'msgstr "Existe versi'#195#179'n entrada # %d"'
+#13#10#13#10'#: umain.rsversionentry2'#13#10'msgid "Version entry #%d needs '
+'to be of the form n.n.n.n"'#13#10'msgstr "Entrada # %d de la versi'#195#179
+'n debe ser de la forma n.n.n.n"'#13#10#13#10'#: umain.rswouldyoulike'#13#10
+'msgid "Would you like to copy %s to the %s folder?"'#13#10'msgstr "'#194#191
+'Quieres copiar la carpeta de %s %s?"'#13#10#13#10'#: umain.rsyoumayneedto'
+#13#10'msgid "(You may need to restart the app to see the change)"'#13#10'ms'
+'gstr "(Puede que necesite reiniciar la aplicaci'#195#179'n para ver el camb'
+'io)"'#13#10#13#10
]);

2
applications/json_packager/umain.lfm
View File

@ -3,8 +3,10 @@ object frmMain: TfrmMain
Height = 420
Top = 226
Width = 320
AutoSize = True
BorderIcons = [biSystemMenu]
BorderStyle = bsSingle
BorderWidth = 8
ClientHeight = 400
ClientWidth = 320
DefaultMonitor = dmPrimary

50
applications/json_packager/umain.pas
View File

@ -1,4 +1,5 @@
unit umain;
{$DEFINE PO_RESOURCES}
{ OnlinePackageManager Update JSON Editor
Copyright (C)2016 usernames lainz, minesadorada, GetMem @ http://forum.lazarus.freepascal.org/index.php
@ -40,7 +41,8 @@ unit umain;
0.1.15.0: BugFix: File/Save didn't add the '.json' suffix in Linux (minesadorada)
Addition: After Loading, run validation tests(minesadorada)
0.1.16.0: Renamed ForceUpdate to ForceNotify (GetMem/minesadorada)
0.1.17.0: ??
0.1.17.0: po files stored in resource file as fallback (minesadorada)
0.1.18.0: ??
}
{$mode objfpc}{$H+}
@ -51,10 +53,11 @@ uses
Classes, Forms, Controls, StdCtrls, Menus, ActnList, StdActns, Grids,
Graphics, Buttons, fileutil, LazFileUtils, fileinfo, ugenericcollection, fpjsonrtti,
Dialogs, LCLTranslator, PopupNotifier, SysUtils, inifiles,
lclintf, lclVersion;
lclintf, lclVersion{$IFDEF PO_RESOURCES},LResources, LazUTF8Classes{$ENDIF};
CONST C_DEBUGMESSAGES=FALSE;
type
@ -177,6 +180,10 @@ type
var
frmMain: TfrmMain;
{$IFDEF PO_RESOURCES}
aLRes: TLResource;
aSS: TStringListUTF8;
{$ENDIF}
implementation
@ -413,8 +420,10 @@ var
sLang: string;
iIniCount:Integer;
begin
{
Self.AutoAdjustLayout(lapAutoAdjustForDPI, Self.DesignTimeDPI,
Screen.PixelsPerInch, Self.Width, ScaleX(Self.Width, Self.DesignTimeDPI));
}
// Enable AutoSize again to get correct Height
editName.AutoSize := True;
editDownloadZipURL.AutoSize := True;
@ -605,6 +614,7 @@ begin
else
begin
mnu_lang_en.Checked := False;
// SetDefaultLang(''); // Back to default?
ShowMessage(rsSorryThisLan + LineEnding + rsYouMayNeedTo);
end;
end;
@ -621,6 +631,7 @@ begin
else
begin
mnu_lang_es.Checked := False;
SetDefaultLang(''); // Back to DefaultTranslator
ShowMessage(rsSorryThisLan);
end;
end;
@ -886,4 +897,39 @@ begin
end;
end;
{$IFDEF PO_RESOURCES}
// Use embedded .po resources if not distributed with executable
Initialization
{$I translate.lrs}
If NOT FileExistsUTF8(ProgramDirectory + 'locale\' + ExtractFilenameOnly(Application.EXEName) + '.es.po') then
BEGIN
aLRes:=LazarusResources.Find('jsoneditor.es');
if assigned(aLRes) then
begin
ForceDirectory(ProgramDirectory + 'locale');
aSS:=TStringListUTF8.Create;
TRY
Ass.Add(aLRes.Value);
aSS.SaveToFile(ProgramDirectory + 'locale\' + ExtractFilenameOnly(Application.EXEName) + '.es.po');
Finally
aSS.Free;
end;
end;
END;
If NOT FileExistsUTF8(ProgramDirectory + 'locale\' + ExtractFilenameOnly(Application.EXEName) + '.en.po') then
BEGIN
aLRes:=LazarusResources.Find('jsoneditor.en');
if assigned(aLRes) then
begin
ForceDirectory(ProgramDirectory + 'locale');
aSS:=TStringListUTF8.Create;
TRY
Ass.Add(aLRes.Value);
aSS.SaveToFile(ProgramDirectory + 'locale\' + ExtractFilenameOnly(Application.EXEName) + '.en.po');
FINALLY
aSS.Free;
END;
end;
END;
{$ENDIF}
end.