Pas2JS: improved layout of project options frame and i18n-ed it; regenerated translations and updated Russian translation.

git-svn-id: trunk@61726 -
This commit is contained in:
maxim 2019-08-18 22:48:26 +00:00
parent 936f07e67a
commit 71da6305cc
11 changed files with 439 additions and 48 deletions

View File

@ -19,6 +19,10 @@ msgstr ""
msgid "Browser to use when opening HTML page"
msgstr ""
#: strpas2jsdesign.pjsdmaintainhtmlfile
msgid "Maintain HTML file"
msgstr ""
#: strpas2jsdesign.pjsdnodejsappdescription
msgid "A pas2js program running in node.js"
msgstr "Un programme pas2js en cours d'exécution dans node.js"
@ -41,6 +45,30 @@ msgstr ""
msgid "Port numbers to start allocating from %s"
msgstr ""
#: strpas2jsdesign.pjsdprojecthtmlfile
msgid "Project HTML file:"
msgstr ""
#: strpas2jsdesign.pjsdprojectisawebbrowserpas2jsproject
msgid "Project is a Web Browser (pas2js) project"
msgstr ""
#: strpas2jsdesign.pjsdprojectneedsahttpserver
msgid "Project needs a HTTP server"
msgstr ""
#: strpas2jsdesign.pjsdresetcompilecommand
msgid "Reset Compile command"
msgstr ""
#: strpas2jsdesign.pjsdresetruncommand
msgid "Reset Run command"
msgstr ""
#: strpas2jsdesign.pjsdrunrtlwhenallpageresourcesarefullyloaded
msgid "Run RTL when all page resources are fully loaded"
msgstr ""
#: strpas2jsdesign.pjsdselectbrowserexecutable
msgid "Select browser executable"
msgstr ""
@ -61,10 +89,22 @@ msgstr ""
msgid "Server instances will be started with a port starting from this number, increasing per new project"
msgstr ""
#: strpas2jsdesign.pjsdstarthttpserveronport
msgid "Start HTTP Server on port"
msgstr ""
#: strpas2jsdesign.pjsdusebrowserconsoleunittodisplaywritelnoutput
msgid "Use Browser Console unit to display writeln() output"
msgstr ""
#: strpas2jsdesign.pjsdusethisbrowserwhenopeningtheurlorhtmlfileofawebbro
msgid "Use this browser when opening the URL or HTML file of a web browser project"
msgstr ""
#: strpas2jsdesign.pjsdusethisurltostartapplication
msgid "Use this URL to start application"
msgstr ""
#: strpas2jsdesign.pjsdwebappdescription
msgid "A pas2js program running in the browser"
msgstr "Un programme pas2js en cours d'exécution dans le navigateur"
@ -73,6 +113,10 @@ msgstr "Un programme pas2js en cours d'exécution dans le navigateur"
msgid "Web Browser Application"
msgstr "Application navigateur Web"
#: strpas2jsdesign.pjsdwebprojectpas2js
msgid "Web Project (pas2js)"
msgstr ""
#: strpas2jsdesign.pjsdyoucanuseidemacroslikemakeexewithoutafullpathissea
#, object-pascal-format
msgid "You can use IDE macros like $MakeExe(). Without a full path, %s is searched in PATH."

View File

@ -19,6 +19,10 @@ msgstr ""
msgid "Browser to use when opening HTML page"
msgstr ""
#: strpas2jsdesign.pjsdmaintainhtmlfile
msgid "Maintain HTML file"
msgstr ""
#: strpas2jsdesign.pjsdnodejsappdescription
msgid "A pas2js program running in node.js"
msgstr "Fut egy pas2js program node.js-ben"
@ -41,6 +45,30 @@ msgstr ""
msgid "Port numbers to start allocating from %s"
msgstr ""
#: strpas2jsdesign.pjsdprojecthtmlfile
msgid "Project HTML file:"
msgstr ""
#: strpas2jsdesign.pjsdprojectisawebbrowserpas2jsproject
msgid "Project is a Web Browser (pas2js) project"
msgstr ""
#: strpas2jsdesign.pjsdprojectneedsahttpserver
msgid "Project needs a HTTP server"
msgstr ""
#: strpas2jsdesign.pjsdresetcompilecommand
msgid "Reset Compile command"
msgstr ""
#: strpas2jsdesign.pjsdresetruncommand
msgid "Reset Run command"
msgstr ""
#: strpas2jsdesign.pjsdrunrtlwhenallpageresourcesarefullyloaded
msgid "Run RTL when all page resources are fully loaded"
msgstr ""
#: strpas2jsdesign.pjsdselectbrowserexecutable
msgid "Select browser executable"
msgstr ""
@ -61,10 +89,22 @@ msgstr ""
msgid "Server instances will be started with a port starting from this number, increasing per new project"
msgstr ""
#: strpas2jsdesign.pjsdstarthttpserveronport
msgid "Start HTTP Server on port"
msgstr ""
#: strpas2jsdesign.pjsdusebrowserconsoleunittodisplaywritelnoutput
msgid "Use Browser Console unit to display writeln() output"
msgstr ""
#: strpas2jsdesign.pjsdusethisbrowserwhenopeningtheurlorhtmlfileofawebbro
msgid "Use this browser when opening the URL or HTML file of a web browser project"
msgstr ""
#: strpas2jsdesign.pjsdusethisurltostartapplication
msgid "Use this URL to start application"
msgstr ""
#: strpas2jsdesign.pjsdwebappdescription
msgid "A pas2js program running in the browser"
msgstr "Fut egy pas2js program a webböngészőben"
@ -73,6 +113,10 @@ msgstr "Fut egy pas2js program a webböngészőben"
msgid "Web Browser Application"
msgstr "Webböngésző alkalmazás"
#: strpas2jsdesign.pjsdwebprojectpas2js
msgid "Web Project (pas2js)"
msgstr ""
#: strpas2jsdesign.pjsdyoucanuseidemacroslikemakeexewithoutafullpathissea
#, object-pascal-format
msgid "You can use IDE macros like $MakeExe(). Without a full path, %s is searched in PATH."

View File

@ -9,6 +9,10 @@ msgstr ""
msgid "Browser to use when opening HTML page"
msgstr ""
#: strpas2jsdesign.pjsdmaintainhtmlfile
msgid "Maintain HTML file"
msgstr ""
#: strpas2jsdesign.pjsdnodejsappdescription
msgid "A pas2js program running in node.js"
msgstr ""
@ -31,6 +35,30 @@ msgstr ""
msgid "Port numbers to start allocating from %s"
msgstr ""
#: strpas2jsdesign.pjsdprojecthtmlfile
msgid "Project HTML file:"
msgstr ""
#: strpas2jsdesign.pjsdprojectisawebbrowserpas2jsproject
msgid "Project is a Web Browser (pas2js) project"
msgstr ""
#: strpas2jsdesign.pjsdprojectneedsahttpserver
msgid "Project needs a HTTP server"
msgstr ""
#: strpas2jsdesign.pjsdresetcompilecommand
msgid "Reset Compile command"
msgstr ""
#: strpas2jsdesign.pjsdresetruncommand
msgid "Reset Run command"
msgstr ""
#: strpas2jsdesign.pjsdrunrtlwhenallpageresourcesarefullyloaded
msgid "Run RTL when all page resources are fully loaded"
msgstr ""
#: strpas2jsdesign.pjsdselectbrowserexecutable
msgid "Select browser executable"
msgstr ""
@ -51,10 +79,22 @@ msgstr ""
msgid "Server instances will be started with a port starting from this number, increasing per new project"
msgstr ""
#: strpas2jsdesign.pjsdstarthttpserveronport
msgid "Start HTTP Server on port"
msgstr ""
#: strpas2jsdesign.pjsdusebrowserconsoleunittodisplaywritelnoutput
msgid "Use Browser Console unit to display writeln() output"
msgstr ""
#: strpas2jsdesign.pjsdusethisbrowserwhenopeningtheurlorhtmlfileofawebbro
msgid "Use this browser when opening the URL or HTML file of a web browser project"
msgstr ""
#: strpas2jsdesign.pjsdusethisurltostartapplication
msgid "Use this URL to start application"
msgstr ""
#: strpas2jsdesign.pjsdwebappdescription
msgid "A pas2js program running in the browser"
msgstr ""
@ -63,6 +103,10 @@ msgstr ""
msgid "Web Browser Application"
msgstr ""
#: strpas2jsdesign.pjsdwebprojectpas2js
msgid "Web Project (pas2js)"
msgstr ""
#: strpas2jsdesign.pjsdyoucanuseidemacroslikemakeexewithoutafullpathissea
#, object-pascal-format
msgid "You can use IDE macros like $MakeExe(). Without a full path, %s is searched in PATH."

View File

@ -19,6 +19,10 @@ msgstr ""
msgid "Browser to use when opening HTML page"
msgstr ""
#: strpas2jsdesign.pjsdmaintainhtmlfile
msgid "Maintain HTML file"
msgstr ""
#: strpas2jsdesign.pjsdnodejsappdescription
msgctxt "strpas2jsdesign.pjsdnodejsappdescription"
msgid "A pas2js program running in node.js"
@ -43,6 +47,30 @@ msgstr ""
msgid "Port numbers to start allocating from %s"
msgstr ""
#: strpas2jsdesign.pjsdprojecthtmlfile
msgid "Project HTML file:"
msgstr ""
#: strpas2jsdesign.pjsdprojectisawebbrowserpas2jsproject
msgid "Project is a Web Browser (pas2js) project"
msgstr ""
#: strpas2jsdesign.pjsdprojectneedsahttpserver
msgid "Project needs a HTTP server"
msgstr ""
#: strpas2jsdesign.pjsdresetcompilecommand
msgid "Reset Compile command"
msgstr ""
#: strpas2jsdesign.pjsdresetruncommand
msgid "Reset Run command"
msgstr ""
#: strpas2jsdesign.pjsdrunrtlwhenallpageresourcesarefullyloaded
msgid "Run RTL when all page resources are fully loaded"
msgstr ""
#: strpas2jsdesign.pjsdselectbrowserexecutable
msgid "Select browser executable"
msgstr ""
@ -63,10 +91,22 @@ msgstr ""
msgid "Server instances will be started with a port starting from this number, increasing per new project"
msgstr ""
#: strpas2jsdesign.pjsdstarthttpserveronport
msgid "Start HTTP Server on port"
msgstr ""
#: strpas2jsdesign.pjsdusebrowserconsoleunittodisplaywritelnoutput
msgid "Use Browser Console unit to display writeln() output"
msgstr ""
#: strpas2jsdesign.pjsdusethisbrowserwhenopeningtheurlorhtmlfileofawebbro
msgid "Use this browser when opening the URL or HTML file of a web browser project"
msgstr ""
#: strpas2jsdesign.pjsdusethisurltostartapplication
msgid "Use this URL to start application"
msgstr ""
#: strpas2jsdesign.pjsdwebappdescription
msgctxt "strpas2jsdesign.pjsdwebappdescription"
msgid "A pas2js program running in the browser"
@ -77,6 +117,10 @@ msgctxt "strpas2jsdesign.pjsdwebapplication"
msgid "Web Browser Application"
msgstr "Aplicação navegador web"
#: strpas2jsdesign.pjsdwebprojectpas2js
msgid "Web Project (pas2js)"
msgstr ""
#: strpas2jsdesign.pjsdyoucanuseidemacroslikemakeexewithoutafullpathissea
#, object-pascal-format
msgid "You can use IDE macros like $MakeExe(). Without a full path, %s is searched in PATH."

View File

@ -19,6 +19,10 @@ msgstr "Обзор"
msgid "Browser to use when opening HTML page"
msgstr "Браузер для открытия страницы HTML"
#: strpas2jsdesign.pjsdmaintainhtmlfile
msgid "Maintain HTML file"
msgstr "Поддерживать файл HTML"
#: strpas2jsdesign.pjsdnodejsappdescription
msgid "A pas2js program running in node.js"
msgstr "Программа pas2js, запускаемая в node.js"
@ -41,6 +45,30 @@ msgstr "Путь к исполнимому файлу Node.js"
msgid "Port numbers to start allocating from %s"
msgstr "Начало диапазона запрашиваемых у %s портов"
#: strpas2jsdesign.pjsdprojecthtmlfile
msgid "Project HTML file:"
msgstr "Файл HTML проекта:"
#: strpas2jsdesign.pjsdprojectisawebbrowserpas2jsproject
msgid "Project is a Web Browser (pas2js) project"
msgstr "Проект предназначен для веб-браузера (pas2js)"
#: strpas2jsdesign.pjsdprojectneedsahttpserver
msgid "Project needs a HTTP server"
msgstr "Проекту требуется сервер HTTP"
#: strpas2jsdesign.pjsdresetcompilecommand
msgid "Reset Compile command"
msgstr "Сбросить команду компиляции"
#: strpas2jsdesign.pjsdresetruncommand
msgid "Reset Run command"
msgstr "Сбросить команду запуска"
#: strpas2jsdesign.pjsdrunrtlwhenallpageresourcesarefullyloaded
msgid "Run RTL when all page resources are fully loaded"
msgstr "Запускать RTL после полной загрузки всех ресурсов страницы"
#: strpas2jsdesign.pjsdselectbrowserexecutable
msgid "Select browser executable"
msgstr "Выберите исполнимый файл браузера"
@ -61,10 +89,22 @@ msgstr "Выберите исполнимый файл simpleserver"
msgid "Server instances will be started with a port starting from this number, increasing per new project"
msgstr "Экземпляры серверов будут запускаться на портах с номерами, начинающимися с указанного и увеличивающимися в каждом новом проекте"
#: strpas2jsdesign.pjsdstarthttpserveronport
msgid "Start HTTP Server on port"
msgstr "Запускать сервер HTTP на порту"
#: strpas2jsdesign.pjsdusebrowserconsoleunittodisplaywritelnoutput
msgid "Use Browser Console unit to display writeln() output"
msgstr "Отображать вывод writeln() посредством модуля консоли браузера"
#: strpas2jsdesign.pjsdusethisbrowserwhenopeningtheurlorhtmlfileofawebbro
msgid "Use this browser when opening the URL or HTML file of a web browser project"
msgstr "Браузер для открытия предназначенного для него проекта по указанному адресу либо из файла HTML"
#: strpas2jsdesign.pjsdusethisurltostartapplication
msgid "Use this URL to start application"
msgstr "Использовать следующий адрес для запуска приложения"
#: strpas2jsdesign.pjsdwebappdescription
msgid "A pas2js program running in the browser"
msgstr "Программа pas2js, запускаемая в браузере"
@ -73,6 +113,10 @@ msgstr "Программа pas2js, запускаемая в браузере"
msgid "Web Browser Application"
msgstr "Приложение для веб-браузера"
#: strpas2jsdesign.pjsdwebprojectpas2js
msgid "Web Project (pas2js)"
msgstr "Веб-проект (pas2js)"
#: strpas2jsdesign.pjsdyoucanuseidemacroslikemakeexewithoutafullpathissea
#, object-pascal-format
msgid "You can use IDE macros like $MakeExe(). Without a full path, %s is searched in PATH."

View File

@ -19,6 +19,10 @@ msgstr ""
msgid "Browser to use when opening HTML page"
msgstr ""
#: strpas2jsdesign.pjsdmaintainhtmlfile
msgid "Maintain HTML file"
msgstr ""
#: strpas2jsdesign.pjsdnodejsappdescription
msgid "A pas2js program running in node.js"
msgstr "Node.js içinde çalışan bir pas2js programı"
@ -41,6 +45,30 @@ msgstr ""
msgid "Port numbers to start allocating from %s"
msgstr ""
#: strpas2jsdesign.pjsdprojecthtmlfile
msgid "Project HTML file:"
msgstr ""
#: strpas2jsdesign.pjsdprojectisawebbrowserpas2jsproject
msgid "Project is a Web Browser (pas2js) project"
msgstr ""
#: strpas2jsdesign.pjsdprojectneedsahttpserver
msgid "Project needs a HTTP server"
msgstr ""
#: strpas2jsdesign.pjsdresetcompilecommand
msgid "Reset Compile command"
msgstr ""
#: strpas2jsdesign.pjsdresetruncommand
msgid "Reset Run command"
msgstr ""
#: strpas2jsdesign.pjsdrunrtlwhenallpageresourcesarefullyloaded
msgid "Run RTL when all page resources are fully loaded"
msgstr ""
#: strpas2jsdesign.pjsdselectbrowserexecutable
msgid "Select browser executable"
msgstr ""
@ -61,10 +89,22 @@ msgstr ""
msgid "Server instances will be started with a port starting from this number, increasing per new project"
msgstr ""
#: strpas2jsdesign.pjsdstarthttpserveronport
msgid "Start HTTP Server on port"
msgstr ""
#: strpas2jsdesign.pjsdusebrowserconsoleunittodisplaywritelnoutput
msgid "Use Browser Console unit to display writeln() output"
msgstr ""
#: strpas2jsdesign.pjsdusethisbrowserwhenopeningtheurlorhtmlfileofawebbro
msgid "Use this browser when opening the URL or HTML file of a web browser project"
msgstr ""
#: strpas2jsdesign.pjsdusethisurltostartapplication
msgid "Use this URL to start application"
msgstr ""
#: strpas2jsdesign.pjsdwebappdescription
msgid "A pas2js program running in the browser"
msgstr "Tarayıcıda çalışan bir pas2js programı"
@ -73,6 +113,10 @@ msgstr "Tarayıcıda çalışan bir pas2js programı"
msgid "Web Browser Application"
msgstr "Web Tarayıcı Uygulaması"
#: strpas2jsdesign.pjsdwebprojectpas2js
msgid "Web Project (pas2js)"
msgstr ""
#: strpas2jsdesign.pjsdyoucanuseidemacroslikemakeexewithoutafullpathissea
#, object-pascal-format
msgid "You can use IDE macros like $MakeExe(). Without a full path, %s is searched in PATH."

View File

@ -21,6 +21,10 @@ msgstr ""
msgid "Browser to use when opening HTML page"
msgstr ""
#: strpas2jsdesign.pjsdmaintainhtmlfile
msgid "Maintain HTML file"
msgstr ""
#: strpas2jsdesign.pjsdnodejsappdescription
msgid "A pas2js program running in node.js"
msgstr "Програма pas2js, що запускається в node.js"
@ -43,6 +47,30 @@ msgstr ""
msgid "Port numbers to start allocating from %s"
msgstr ""
#: strpas2jsdesign.pjsdprojecthtmlfile
msgid "Project HTML file:"
msgstr ""
#: strpas2jsdesign.pjsdprojectisawebbrowserpas2jsproject
msgid "Project is a Web Browser (pas2js) project"
msgstr ""
#: strpas2jsdesign.pjsdprojectneedsahttpserver
msgid "Project needs a HTTP server"
msgstr ""
#: strpas2jsdesign.pjsdresetcompilecommand
msgid "Reset Compile command"
msgstr ""
#: strpas2jsdesign.pjsdresetruncommand
msgid "Reset Run command"
msgstr ""
#: strpas2jsdesign.pjsdrunrtlwhenallpageresourcesarefullyloaded
msgid "Run RTL when all page resources are fully loaded"
msgstr ""
#: strpas2jsdesign.pjsdselectbrowserexecutable
msgid "Select browser executable"
msgstr ""
@ -63,10 +91,22 @@ msgstr ""
msgid "Server instances will be started with a port starting from this number, increasing per new project"
msgstr ""
#: strpas2jsdesign.pjsdstarthttpserveronport
msgid "Start HTTP Server on port"
msgstr ""
#: strpas2jsdesign.pjsdusebrowserconsoleunittodisplaywritelnoutput
msgid "Use Browser Console unit to display writeln() output"
msgstr ""
#: strpas2jsdesign.pjsdusethisbrowserwhenopeningtheurlorhtmlfileofawebbro
msgid "Use this browser when opening the URL or HTML file of a web browser project"
msgstr ""
#: strpas2jsdesign.pjsdusethisurltostartapplication
msgid "Use this URL to start application"
msgstr ""
#: strpas2jsdesign.pjsdwebappdescription
msgid "A pas2js program running in the browser"
msgstr "Програма pas2js, що запускається в оглядачі"
@ -75,6 +115,10 @@ msgstr "Програма pas2js, що запускається в оглядач
msgid "Web Browser Application"
msgstr "Додаток для веб-оглядача"
#: strpas2jsdesign.pjsdwebprojectpas2js
msgid "Web Project (pas2js)"
msgstr ""
#: strpas2jsdesign.pjsdyoucanuseidemacroslikemakeexewithoutafullpathissea
#, object-pascal-format
msgid "You can use IDE macros like $MakeExe(). Without a full path, %s is searched in PATH."

View File

@ -20,6 +20,10 @@ msgstr ""
msgid "Browser to use when opening HTML page"
msgstr ""
#: strpas2jsdesign.pjsdmaintainhtmlfile
msgid "Maintain HTML file"
msgstr ""
#: strpas2jsdesign.pjsdnodejsappdescription
msgid "A pas2js program running in node.js"
msgstr "一个pas2js程序运行在node.js"
@ -42,6 +46,30 @@ msgstr ""
msgid "Port numbers to start allocating from %s"
msgstr ""
#: strpas2jsdesign.pjsdprojecthtmlfile
msgid "Project HTML file:"
msgstr ""
#: strpas2jsdesign.pjsdprojectisawebbrowserpas2jsproject
msgid "Project is a Web Browser (pas2js) project"
msgstr ""
#: strpas2jsdesign.pjsdprojectneedsahttpserver
msgid "Project needs a HTTP server"
msgstr ""
#: strpas2jsdesign.pjsdresetcompilecommand
msgid "Reset Compile command"
msgstr ""
#: strpas2jsdesign.pjsdresetruncommand
msgid "Reset Run command"
msgstr ""
#: strpas2jsdesign.pjsdrunrtlwhenallpageresourcesarefullyloaded
msgid "Run RTL when all page resources are fully loaded"
msgstr ""
#: strpas2jsdesign.pjsdselectbrowserexecutable
msgid "Select browser executable"
msgstr ""
@ -62,10 +90,22 @@ msgstr ""
msgid "Server instances will be started with a port starting from this number, increasing per new project"
msgstr ""
#: strpas2jsdesign.pjsdstarthttpserveronport
msgid "Start HTTP Server on port"
msgstr ""
#: strpas2jsdesign.pjsdusebrowserconsoleunittodisplaywritelnoutput
msgid "Use Browser Console unit to display writeln() output"
msgstr ""
#: strpas2jsdesign.pjsdusethisbrowserwhenopeningtheurlorhtmlfileofawebbro
msgid "Use this browser when opening the URL or HTML file of a web browser project"
msgstr ""
#: strpas2jsdesign.pjsdusethisurltostartapplication
msgid "Use this URL to start application"
msgstr ""
#: strpas2jsdesign.pjsdwebappdescription
msgid "A pas2js program running in the browser"
msgstr "一个pas2js程序运行在浏览器"
@ -74,6 +114,10 @@ msgstr "一个pas2js程序运行在浏览器"
msgid "Web Browser Application"
msgstr "网页浏览器(Web Browser)应用程序"
#: strpas2jsdesign.pjsdwebprojectpas2js
msgid "Web Project (pas2js)"
msgstr ""
#: strpas2jsdesign.pjsdyoucanuseidemacroslikemakeexewithoutafullpathissea
#, object-pascal-format
msgid "You can use IDE macros like $MakeExe(). Without a full path, %s is searched in PATH."

View File

@ -10,47 +10,51 @@ object Pas2JSProjectOptionsFrame: TPas2JSProjectOptionsFrame
DesignTop = 400
object CBWebProject: TCheckBox
Left = 12
Height = 22
Height = 19
Top = 8
Width = 252
Width = 232
Caption = 'Project is a Web Browser (pas2js) project'
OnChange = CBWebProjectChange
TabOrder = 0
end
object LCBProjectHTMLFile: TLabel
AnchorSideLeft.Control = CBWebProject
AnchorSideTop.Control = CBWebProject
AnchorSideTop.Side = asrBottom
Left = 18
Height = 17
Top = 36
Width = 98
Left = 12
Height = 15
Top = 33
Width = 95
BorderSpacing.Top = 6
Caption = 'Project HTML file:'
ParentColor = False
end
object CBHTMLFile: TComboBox
AnchorSideLeft.Control = CBWebProject
AnchorSideTop.Control = LCBProjectHTMLFile
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 16
Height = 31
Top = 59
Width = 463
Left = 12
Height = 23
Top = 50
Width = 467
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 6
BorderSpacing.Top = 2
BorderSpacing.Right = 16
ItemHeight = 0
ItemHeight = 15
Style = csDropDownList
TabOrder = 1
end
object CBMaintainHTMLFile: TCheckBox
AnchorSideLeft.Control = CBWebProject
AnchorSideTop.Control = CBHTMLFile
AnchorSideTop.Side = asrBottom
Left = 12
Height = 22
Top = 90
Width = 131
Height = 19
Top = 79
Width = 124
BorderSpacing.Top = 6
Caption = 'Maintain HTML File'
OnChange = CBMaintainHTMLFileChange
TabOrder = 2
@ -60,9 +64,9 @@ object Pas2JSProjectOptionsFrame: TPas2JSProjectOptionsFrame
AnchorSideTop.Control = CBUseBrowserConsole
AnchorSideTop.Side = asrBottom
Left = 36
Height = 22
Top = 146
Width = 288
Height = 19
Top = 129
Width = 268
BorderSpacing.Top = 6
Caption = 'Run rtl when all page resources are fully loaded'
TabOrder = 3
@ -72,8 +76,8 @@ object Pas2JSProjectOptionsFrame: TPas2JSProjectOptionsFrame
AnchorSideTop.Control = RBStartServerAt
AnchorSideTop.Side = asrBottom
Left = 76
Height = 27
Top = 226
Height = 23
Top = 200
Width = 82
BorderSpacing.Left = 32
BorderSpacing.Top = 2
@ -87,9 +91,9 @@ object Pas2JSProjectOptionsFrame: TPas2JSProjectOptionsFrame
AnchorSideTop.Control = CBUseHTTPServer
AnchorSideTop.Side = asrBottom
Left = 44
Height = 22
Top = 202
Width = 167
Height = 19
Top = 179
Width = 154
BorderSpacing.Left = 32
BorderSpacing.Top = 6
Caption = 'Start HTTP Server on port'
@ -105,13 +109,13 @@ object Pas2JSProjectOptionsFrame: TPas2JSProjectOptionsFrame
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 76
Height = 29
Top = 283
Height = 23
Top = 246
Width = 403
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 6
BorderSpacing.Top = 2
BorderSpacing.Right = 16
ItemHeight = 0
ItemHeight = 15
TabOrder = 6
end
object RBUseURL: TRadioButton
@ -119,9 +123,9 @@ object Pas2JSProjectOptionsFrame: TPas2JSProjectOptionsFrame
AnchorSideTop.Control = SEPort
AnchorSideTop.Side = asrBottom
Left = 44
Height = 22
Top = 255
Width = 161
Height = 19
Top = 225
Width = 148
BorderSpacing.Top = 2
Caption = 'Use this URL to start app'
OnChange = RBUseURLChange
@ -132,9 +136,9 @@ object Pas2JSProjectOptionsFrame: TPas2JSProjectOptionsFrame
AnchorSideTop.Control = CBRunOnReady
AnchorSideTop.Side = asrBottom
Left = 12
Height = 22
Top = 174
Width = 183
Height = 19
Top = 154
Width = 168
BorderSpacing.Top = 6
Caption = 'Project needs a HTTP Server'
OnChange = CBUseHTTPServerChange
@ -145,30 +149,42 @@ object Pas2JSProjectOptionsFrame: TPas2JSProjectOptionsFrame
AnchorSideTop.Control = CBMaintainHTMLFile
AnchorSideTop.Side = asrBottom
Left = 36
Height = 22
Top = 118
Width = 312
Height = 19
Top = 104
Width = 294
BorderSpacing.Left = 24
BorderSpacing.Top = 6
Caption = 'Use Browser Console unit to display writeln() output'
TabOrder = 9
end
object BResetRunCommand: TButton
Left = 18
AnchorSideLeft.Control = CBWebProject
AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom
Left = 12
Height = 25
Top = 339
Width = 172
Top = 341
Width = 138
Anchors = [akLeft, akBottom]
AutoSize = True
BorderSpacing.Bottom = 6
Caption = 'Reset Run Command'
OnClick = BResetRunCommandClick
TabOrder = 10
end
object BResetCompileCommand: TButton
Left = 204
AnchorSideLeft.Control = BResetRunCommand
AnchorSideLeft.Side = asrBottom
AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom
Left = 156
Height = 25
Top = 339
Width = 172
Top = 341
Width = 160
Anchors = [akLeft, akBottom]
AutoSize = True
BorderSpacing.Left = 6
BorderSpacing.Bottom = 6
Caption = 'Reset compile Command'
OnClick = BResetCompileCommandClick
TabOrder = 11

View File

@ -39,7 +39,6 @@ type
procedure RBStartServerAtChange(Sender: TObject);
procedure RBUseURLChange(Sender: TObject);
private
FDialog: TAbstractOptionsEditorDialog;
procedure CheckAllControls(aEnabled: Boolean);
procedure CheckHTMLOptions(aEnabled: Boolean);
procedure CheckServerOptions(aEnabled: Boolean);
@ -61,7 +60,7 @@ Procedure SetDefaultNodeJSCompileOptions(CompOpts: TLazCompilerOptions);
implementation
uses pjsdsgnoptions, pjscontroller;
uses pjsdsgnoptions, pjscontroller, strpas2jsdesign;
Procedure ResetRunParams(RunParams : TAbstractRunParamsOptionsMode);
@ -138,13 +137,21 @@ end;
function TPas2JSProjectOptionsFrame.GetTitle: string;
begin
Result:='Web Project (pas2js)'
Result:=pjsdWebProjectPas2js;
end;
procedure TPas2JSProjectOptionsFrame.Setup(ADialog: TAbstractOptionsEditorDialog);
begin
// Do nothing
FDialog:=ADialog;
CBWebProject.Caption:=pjsdProjectIsAWebBrowserPas2jsProject;
LCBProjectHTMLFile.Caption:=pjsdProjectHTMLFile;
CBMaintainHTMLFile.Caption:=pjsdMaintainHTMLFile;
CBUseBrowserConsole.Caption:=pjsdUseBrowserConsoleUnitToDisplayWritelnOutput;
CBRunOnReady.Caption:=pjsdRunRTLWhenAllPageResourcesAreFullyLoaded;
CBUseHTTPServer.Caption:=pjsdProjectNeedsAHTTPServer;
RBStartServerAt.Caption:=pjsdStartHTTPServerOnPort;
RBUseURL.Caption:=pjsdUseThisURLToStartApplication;
BResetRunCommand.Caption:=pjsdResetRunCommand;
BResetCompileCommand.Caption:=pjsdResetCompileCommand;
end;
procedure TPas2JSProjectOptionsFrame.CBWebProjectChange(Sender: TObject);

View File

@ -28,7 +28,7 @@ Resourcestring
SStatusStopped = 'Stopped';
SStatusError = 'Error starting';
// Options frame
// IDE options frame
pjsdSelectPas2jsExecutable = 'Select pas2js executable';
pjsdSelectSimpleserverExecutable = 'Select simpleserver executable';
pjsdSelectNodeJSExecutable = 'Select Node.js executable';
@ -47,6 +47,22 @@ Resourcestring
+'when opening the URL or HTML file of a web browser project';
pjsdPathOfNodeJsExecutable = 'Path of Node.js executable';
// Project options frame
pjsdWebProjectPas2js = 'Web Project (pas2js)';
pjsdProjectIsAWebBrowserPas2jsProject = 'Project is a Web Browser (pas2js) '
+'project';
pjsdProjectHTMLFile = 'Project HTML file:';
pjsdMaintainHTMLFile = 'Maintain HTML file';
pjsdUseBrowserConsoleUnitToDisplayWritelnOutput = 'Use Browser Console unit '
+'to display writeln() output';
pjsdRunRTLWhenAllPageResourcesAreFullyLoaded = 'Run RTL when all page '
+'resources are fully loaded';
pjsdProjectNeedsAHTTPServer = 'Project needs a HTTP server';
pjsdStartHTTPServerOnPort = 'Start HTTP Server on port';
pjsdUseThisURLToStartApplication = 'Use this URL to start application';
pjsdResetRunCommand = 'Reset Run command';
pjsdResetCompileCommand = 'Reset Compile command';
implementation