Pas2JS: fixed new Pas2JS project options form layout, improved i18n, regenerated translations and updated Russian translation

This commit is contained in:
Maxim Ganetsky 2021-12-30 02:11:36 +03:00
parent 062dbd72e1
commit be4384ef19
11 changed files with 143 additions and 104 deletions

View File

@ -1,24 +1,24 @@
object WebBrowserProjectOptionsForm: TWebBrowserProjectOptionsForm
Left = 431
Height = 430
Height = 538
Top = 310
Width = 508
Width = 635
Caption = 'Pas2JS Browser project options'
ClientHeight = 430
ClientWidth = 508
ClientHeight = 538
ClientWidth = 635
DesignTimePPI = 120
OnCreate = FormCreate
OnShow = FormShow
Position = poScreenCenter
LCLVersion = '2.3.0.0'
object CBCreateHTML: TCheckBox
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Owner
Left = 6
Height = 23
Top = 6
Width = 173
BorderSpacing.Left = 6
BorderSpacing.Top = 6
Left = 8
Height = 24
Top = 8
Width = 186
BorderSpacing.Left = 8
BorderSpacing.Top = 8
Caption = 'Create initial HTML page'
Checked = True
OnChange = CBCreateHTMLChange
@ -29,32 +29,33 @@ object WebBrowserProjectOptionsForm: TWebBrowserProjectOptionsForm
AnchorSideLeft.Control = CBCreateHTML
AnchorSideTop.Control = cbShowUncaughtExceptions
AnchorSideTop.Side = asrBottom
Left = 6
Height = 23
Top = 122
Width = 213
BorderSpacing.Top = 6
Left = 8
Height = 24
Top = 136
Width = 229
BorderSpacing.Top = 8
Caption = 'Use Browser Application object'
OnChange = CBUseBrowserAppChange
TabOrder = 1
end
object CBUseBrowserConsole: TCheckBox
AnchorSideLeft.Control = CBCreateHTML
AnchorSideTop.Control = CBUseWASI
AnchorSideTop.Control = edtWasmProgram
AnchorSideTop.Side = asrBottom
Left = 6
Height = 23
Top = 180
Width = 341
BorderSpacing.Top = 6
Left = 8
Height = 24
Top = 236
Width = 364
BorderSpacing.Top = 8
Caption = 'Use Browser Console unit to display writeln() output'
TabOrder = 2
end
object BPHelpOptions: TButtonPanel
Left = 6
Left = 8
Height = 38
Top = 386
Width = 496
Top = 492
Width = 619
BorderSpacing.Around = 8
OKButton.Name = 'OKButton'
OKButton.DefaultCaption = True
HelpButton.Name = 'HelpButton'
@ -67,15 +68,14 @@ object WebBrowserProjectOptionsForm: TWebBrowserProjectOptionsForm
ShowButtons = [pbOK, pbCancel]
end
object SEPort: TSpinEdit
AnchorSideLeft.Control = RBStartServerAt
AnchorSideLeft.Control = edtWasmProgram
AnchorSideTop.Control = RBStartServerAt
AnchorSideTop.Side = asrBottom
Left = 70
Height = 27
Top = 263
Width = 75
BorderSpacing.Left = 32
BorderSpacing.Top = 2
Left = 88
Height = 28
Top = 332
Width = 160
BorderSpacing.Top = 8
MaxValue = 65354
MinValue = 1024
TabOrder = 4
@ -85,11 +85,11 @@ object WebBrowserProjectOptionsForm: TWebBrowserProjectOptionsForm
AnchorSideLeft.Control = CBCreateHTML
AnchorSideTop.Control = CBUseBrowserConsole
AnchorSideTop.Side = asrBottom
Left = 6
Height = 23
Top = 209
Width = 194
BorderSpacing.Top = 6
Left = 8
Height = 24
Top = 268
Width = 206
BorderSpacing.Top = 8
Caption = 'Project needs a HTTP Server'
OnChange = CBUseHTTPServerChange
TabOrder = 5
@ -98,12 +98,12 @@ object WebBrowserProjectOptionsForm: TWebBrowserProjectOptionsForm
AnchorSideLeft.Control = CBCreateHTML
AnchorSideTop.Control = CBUseHTTPServer
AnchorSideTop.Side = asrBottom
Left = 38
Height = 23
Top = 238
Width = 180
BorderSpacing.Left = 32
BorderSpacing.Top = 6
Left = 48
Height = 24
Top = 300
Width = 189
BorderSpacing.Left = 40
BorderSpacing.Top = 8
Caption = 'Start HTTP Server on port'
Checked = True
TabOrder = 6
@ -113,39 +113,39 @@ object WebBrowserProjectOptionsForm: TWebBrowserProjectOptionsForm
AnchorSideLeft.Control = RBStartServerAt
AnchorSideTop.Control = SEPort
AnchorSideTop.Side = asrBottom
Left = 38
Height = 23
Top = 292
Width = 173
Left = 48
Height = 24
Top = 362
Width = 183
BorderSpacing.Top = 2
Caption = 'Use this URL to start app'
TabOrder = 7
end
object CBServerURL: TComboBox
AnchorSideLeft.Control = SEPort
AnchorSideLeft.Control = edtWasmProgram
AnchorSideTop.Control = RBUseURL
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Control = edtWasmProgram
AnchorSideRight.Side = asrBottom
Left = 70
Height = 27
Top = 317
Width = 426
Left = 88
Height = 28
Top = 394
Width = 539
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 2
BorderSpacing.Right = 12
ItemHeight = 0
BorderSpacing.Top = 8
BorderSpacing.Bottom = 8
ItemHeight = 20
TabOrder = 8
end
object CBMaintainPage: TCheckBox
AnchorSideLeft.Control = CBCreateHTML
AnchorSideTop.Control = CBCreateHTML
AnchorSideTop.Side = asrBottom
Left = 6
Height = 23
Top = 35
Width = 151
BorderSpacing.Top = 6
Left = 8
Height = 24
Top = 40
Width = 159
BorderSpacing.Top = 8
Caption = 'Maintain HTML Page'
TabOrder = 9
end
@ -153,11 +153,11 @@ object WebBrowserProjectOptionsForm: TWebBrowserProjectOptionsForm
AnchorSideLeft.Control = CBCreateHTML
AnchorSideTop.Control = CBMaintainPage
AnchorSideTop.Side = asrBottom
Left = 6
Height = 23
Top = 64
Width = 313
BorderSpacing.Top = 6
Left = 8
Height = 24
Top = 72
Width = 335
BorderSpacing.Top = 8
Caption = 'Run rtl when all page resources are fully loaded'
TabOrder = 10
end
@ -165,11 +165,11 @@ object WebBrowserProjectOptionsForm: TWebBrowserProjectOptionsForm
AnchorSideLeft.Control = CBRunOnReady
AnchorSideTop.Control = CBRunOnReady
AnchorSideTop.Side = asrBottom
Left = 6
Height = 23
Top = 93
Width = 226
BorderSpacing.Top = 6
Left = 8
Height = 24
Top = 104
Width = 237
BorderSpacing.Top = 8
Caption = 'Let rtl show uncaught exceptions'
TabOrder = 11
end
@ -177,25 +177,30 @@ object WebBrowserProjectOptionsForm: TWebBrowserProjectOptionsForm
AnchorSideLeft.Control = CBCreateHTML
AnchorSideTop.Control = CBUseBrowserApp
AnchorSideTop.Side = asrBottom
Left = 38
Height = 23
Top = 151
Width = 193
BorderSpacing.Left = 32
BorderSpacing.Top = 6
Left = 48
Height = 24
Top = 168
Width = 207
BorderSpacing.Left = 40
BorderSpacing.Top = 8
Caption = 'Host webassembly program'
Enabled = False
TabOrder = 12
end
object edtWasmProgram: TEdit
AnchorSideLeft.Control = CBUseWASI
AnchorSideLeft.Side = asrBottom
Left = 247
Height = 27
Top = 150
Width = 248
AnchorSideTop.Control = CBUseWASI
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 88
Height = 28
Top = 200
Width = 539
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 16
BorderSpacing.Left = 40
BorderSpacing.Top = 8
BorderSpacing.Right = 8
Enabled = False
TabOrder = 13
TextHint = 'Name of your webassembly file'

View File

@ -117,6 +117,7 @@ begin
CBCreateHTML.Caption:=pjsdCreateInitialHTMLPage;
CBMaintainPage.Caption:=pjsdMaintainHTMLPage;
CBRunOnReady.Caption:=pjsdRunRTLWhenAllPageResourcesAreFullyLoaded;
cbShowUncaughtExceptions.Caption:=pjsdLetRTLShowUncaughtExceptions;
CBUseBrowserApp.Caption:=pjsdUseBrowserApplicationObject;
CBUseBrowserConsole.Caption:=pjsdUseBrowserConsoleUnitToDisplayWritelnOutput;
CBUseHTTPServer.Caption:=pjsdProjectNeedsAHTTPServer;

View File

@ -55,6 +55,10 @@ msgstr "Options de ligne de commande supplémentaires du serveur HTTP (une par l
msgid "Add extra command-line options for the command which starts the webserver."
msgstr "Ajouter des options de ligne de commande supplémentaires pour la commande qui démarre le serveur Web."
#: strpas2jsdesign.pjsdletrtlshowuncaughtexceptions
msgid "Let RTL show uncaught exceptions"
msgstr ""
#: strpas2jsdesign.pjsdmaintainhtmlpage
msgid "Maintain HTML page"
msgstr "Gérer la page HTML"
@ -218,7 +222,7 @@ msgid "Use this URL to start application"
msgstr "Utiliser cette URL pour démarrer l'application"
#: strpas2jsdesign.pjsdusewasiapplicationobject
msgid "Host webassembly program"
msgid "Run WebAssembly program:"
msgstr ""
#: strpas2jsdesign.pjsdvisualstudiocodeextensiontemplatedirectory
@ -243,7 +247,7 @@ msgid "You can use IDE macros like $MakeExe(). Without a full path, %s is search
msgstr "Vous pouvez utiliser des macros de l'EDI comme $MakeExe(). Sans chemin complet, %s est recherché dans PATH."
#: strpas2jsdesign.pjswasiprogramfiletexthint
msgid "Name of your webassembly file"
msgid "Name of your WebAssembly file"
msgstr ""
#: strpas2jsdesign.spasjswebservercaption

View File

@ -55,6 +55,10 @@ msgstr "Extra parancssori paraméterek a HTTP kiszolgáló számára (soronként
msgid "Add extra command-line options for the command which starts the webserver."
msgstr "Extra parancssori paraméterek megadása a webkiszolgálót indító parancs számára."
#: strpas2jsdesign.pjsdletrtlshowuncaughtexceptions
msgid "Let RTL show uncaught exceptions"
msgstr ""
#: strpas2jsdesign.pjsdmaintainhtmlpage
msgid "Maintain HTML page"
msgstr "HTML lap karbantartása"
@ -220,7 +224,7 @@ msgid "Use this URL to start application"
msgstr "Az alkalmazás indításához ezt az URL-t használja"
#: strpas2jsdesign.pjsdusewasiapplicationobject
msgid "Host webassembly program"
msgid "Run WebAssembly program:"
msgstr ""
#: strpas2jsdesign.pjsdvisualstudiocodeextensiontemplatedirectory
@ -247,7 +251,7 @@ msgid "You can use IDE macros like $MakeExe(). Without a full path, %s is search
msgstr "Használhatók az IDE makrók, mint a $MakeExe(). Teljes útvonal nélkül a PATH-ban felsorolt helyeken lesz keresve a(z) %s."
#: strpas2jsdesign.pjswasiprogramfiletexthint
msgid "Name of your webassembly file"
msgid "Name of your WebAssembly file"
msgstr ""
#: strpas2jsdesign.spasjswebservercaption

View File

@ -45,6 +45,10 @@ msgstr ""
msgid "Add extra command-line options for the command which starts the webserver."
msgstr ""
#: strpas2jsdesign.pjsdletrtlshowuncaughtexceptions
msgid "Let RTL show uncaught exceptions"
msgstr ""
#: strpas2jsdesign.pjsdmaintainhtmlpage
msgid "Maintain HTML page"
msgstr ""
@ -208,7 +212,7 @@ msgid "Use this URL to start application"
msgstr ""
#: strpas2jsdesign.pjsdusewasiapplicationobject
msgid "Host webassembly program"
msgid "Run WebAssembly program:"
msgstr ""
#: strpas2jsdesign.pjsdvisualstudiocodeextensiontemplatedirectory
@ -233,7 +237,7 @@ msgid "You can use IDE macros like $MakeExe(). Without a full path, %s is search
msgstr ""
#: strpas2jsdesign.pjswasiprogramfiletexthint
msgid "Name of your webassembly file"
msgid "Name of your WebAssembly file"
msgstr ""
#: strpas2jsdesign.spasjswebservercaption

View File

@ -55,6 +55,10 @@ msgstr "Opções extra de linha de comando do servidor HTTP (uma por linha)"
msgid "Add extra command-line options for the command which starts the webserver."
msgstr "Adicionar opções extra de linha de comando para o comando que inicia o servidor web."
#: strpas2jsdesign.pjsdletrtlshowuncaughtexceptions
msgid "Let RTL show uncaught exceptions"
msgstr ""
#: strpas2jsdesign.pjsdmaintainhtmlpage
msgid "Maintain HTML page"
msgstr "Manter página HTML"
@ -219,7 +223,7 @@ msgid "Use this URL to start application"
msgstr "Usar esta URL para iniciar a aplicação"
#: strpas2jsdesign.pjsdusewasiapplicationobject
msgid "Host webassembly program"
msgid "Run WebAssembly program:"
msgstr ""
#: strpas2jsdesign.pjsdvisualstudiocodeextensiontemplatedirectory
@ -246,7 +250,7 @@ msgid "You can use IDE macros like $MakeExe(). Without a full path, %s is search
msgstr "Você pode usar macros IDE como \"$MakeExe()\". Sem um caminho completo, %s é pesquisado em \"PATH\""
#: strpas2jsdesign.pjswasiprogramfiletexthint
msgid "Name of your webassembly file"
msgid "Name of your WebAssembly file"
msgstr ""
#: strpas2jsdesign.spasjswebservercaption

View File

@ -9,7 +9,7 @@ msgstr ""
"MIME-Version: 1.0\n"
"Content-Transfer-Encoding: 8bit\n"
"Language: ru\n"
"X-Generator: Poedit 2.2.1\n"
"X-Generator: Poedit 2.4.3\n"
#: strpas2jsdesign.pjsdatompackagetemplatedirectory
msgid "Atom package template directory"
@ -55,6 +55,10 @@ msgstr "Дополнительные параметры команды запу
msgid "Add extra command-line options for the command which starts the webserver."
msgstr "Добавить дополнительные параметры в команду запуска веб-сервера."
#: strpas2jsdesign.pjsdletrtlshowuncaughtexceptions
msgid "Let RTL show uncaught exceptions"
msgstr "Разрешать RTL показывать необработанные исключения"
#: strpas2jsdesign.pjsdmaintainhtmlpage
msgid "Maintain HTML page"
msgstr "Поддерживать страницу HTML"
@ -218,8 +222,8 @@ msgid "Use this URL to start application"
msgstr "Использовать следующий адрес для запуска приложения"
#: strpas2jsdesign.pjsdusewasiapplicationobject
msgid "Host webassembly program"
msgstr ""
msgid "Run WebAssembly program:"
msgstr "Запускать программу WebAssembly:"
#: strpas2jsdesign.pjsdvisualstudiocodeextensiontemplatedirectory
msgid "Visual Studio Code extension template directory"
@ -243,8 +247,8 @@ msgid "You can use IDE macros like $MakeExe(). Without a full path, %s is search
msgstr "Можно использовать макросы IDE, например, $MakeExe(). Если полный путь не указан, поиск %s производится при помощи переменной окружения PATH."
#: strpas2jsdesign.pjswasiprogramfiletexthint
msgid "Name of your webassembly file"
msgstr ""
msgid "Name of your WebAssembly file"
msgstr "Имя файла WebAssembly"
#: strpas2jsdesign.spasjswebservercaption
msgctxt "strpas2jsdesign.spasjswebservercaption"

View File

@ -55,6 +55,10 @@ msgstr ""
msgid "Add extra command-line options for the command which starts the webserver."
msgstr ""
#: strpas2jsdesign.pjsdletrtlshowuncaughtexceptions
msgid "Let RTL show uncaught exceptions"
msgstr ""
#: strpas2jsdesign.pjsdmaintainhtmlpage
msgid "Maintain HTML page"
msgstr ""
@ -220,7 +224,7 @@ msgid "Use this URL to start application"
msgstr ""
#: strpas2jsdesign.pjsdusewasiapplicationobject
msgid "Host webassembly program"
msgid "Run WebAssembly program:"
msgstr ""
#: strpas2jsdesign.pjsdvisualstudiocodeextensiontemplatedirectory
@ -247,7 +251,7 @@ msgid "You can use IDE macros like $MakeExe(). Without a full path, %s is search
msgstr ""
#: strpas2jsdesign.pjswasiprogramfiletexthint
msgid "Name of your webassembly file"
msgid "Name of your WebAssembly file"
msgstr ""
#: strpas2jsdesign.spasjswebservercaption

View File

@ -57,6 +57,10 @@ msgstr "Додаткові параметри командного рядка HT
msgid "Add extra command-line options for the command which starts the webserver."
msgstr "Додайте параметри командного рядка для команди запуску вебсервера."
#: strpas2jsdesign.pjsdletrtlshowuncaughtexceptions
msgid "Let RTL show uncaught exceptions"
msgstr ""
#: strpas2jsdesign.pjsdmaintainhtmlpage
msgid "Maintain HTML page"
msgstr "Підтримувати HTML-сторінку"
@ -220,7 +224,7 @@ msgid "Use this URL to start application"
msgstr "Для запуску застосунку використати цей URL"
#: strpas2jsdesign.pjsdusewasiapplicationobject
msgid "Host webassembly program"
msgid "Run WebAssembly program:"
msgstr ""
#: strpas2jsdesign.pjsdvisualstudiocodeextensiontemplatedirectory
@ -245,7 +249,7 @@ msgid "You can use IDE macros like $MakeExe(). Without a full path, %s is search
msgstr "Можна використовувати макроси ІСР на зразок $MakeExe(). Без повного шляху %s буде шукатись у PATH."
#: strpas2jsdesign.pjswasiprogramfiletexthint
msgid "Name of your webassembly file"
msgid "Name of your WebAssembly file"
msgstr ""
#: strpas2jsdesign.spasjswebservercaption

View File

@ -56,6 +56,10 @@ msgstr ""
msgid "Add extra command-line options for the command which starts the webserver."
msgstr ""
#: strpas2jsdesign.pjsdletrtlshowuncaughtexceptions
msgid "Let RTL show uncaught exceptions"
msgstr ""
#: strpas2jsdesign.pjsdmaintainhtmlpage
msgid "Maintain HTML page"
msgstr ""
@ -221,7 +225,7 @@ msgid "Use this URL to start application"
msgstr ""
#: strpas2jsdesign.pjsdusewasiapplicationobject
msgid "Host webassembly program"
msgid "Run WebAssembly program:"
msgstr ""
#: strpas2jsdesign.pjsdvisualstudiocodeextensiontemplatedirectory
@ -248,7 +252,7 @@ msgid "You can use IDE macros like $MakeExe(). Without a full path, %s is search
msgstr ""
#: strpas2jsdesign.pjswasiprogramfiletexthint
msgid "Name of your webassembly file"
msgid "Name of your WebAssembly file"
msgstr ""
#: strpas2jsdesign.spasjswebservercaption

View File

@ -80,9 +80,10 @@ Resourcestring
// New browser project options form
pjsdPas2JSBrowserProjectOptions = 'Pas2JS Browser project options';
pjsdCreateInitialHTMLPage = 'Create initial HTML page';
pjsdLetRTLShowUncaughtExceptions = 'Let RTL show uncaught exceptions';
pjsdUseBrowserApplicationObject = 'Use Browser Application object';
pjsdUseWASIApplicationObject = 'Host webassembly program';
pjsWasiProgramFileTextHint = 'Name of your webassembly file';
pjsdUseWASIApplicationObject = 'Run WebAssembly program:';
pjsWasiProgramFileTextHint = 'Name of your WebAssembly file';
// New NodeJS project options form
pjsdNodeJSProjectOptions = 'NodeJS project options';