mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-27 23:23:49 +02:00
209 lines
5.2 KiB
Plaintext
209 lines
5.2 KiB
Plaintext
object WebBrowserProjectOptionsForm: TWebBrowserProjectOptionsForm
|
|
Left = 431
|
|
Height = 538
|
|
Top = 310
|
|
Width = 635
|
|
Caption = 'Pas2JS Browser project options'
|
|
ClientHeight = 538
|
|
ClientWidth = 635
|
|
DesignTimePPI = 120
|
|
OnCreate = FormCreate
|
|
OnShow = FormShow
|
|
Position = poScreenCenter
|
|
object CBCreateHTML: TCheckBox
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = Owner
|
|
Left = 8
|
|
Height = 24
|
|
Top = 8
|
|
Width = 186
|
|
BorderSpacing.Left = 8
|
|
BorderSpacing.Top = 8
|
|
Caption = 'Create initial HTML page'
|
|
Checked = True
|
|
OnChange = CBCreateHTMLChange
|
|
State = cbChecked
|
|
TabOrder = 0
|
|
end
|
|
object CBUseBrowserApp: TCheckBox
|
|
AnchorSideLeft.Control = CBCreateHTML
|
|
AnchorSideTop.Control = cbShowUncaughtExceptions
|
|
AnchorSideTop.Side = asrBottom
|
|
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 = edtWasmProgram
|
|
AnchorSideTop.Side = asrBottom
|
|
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 = 8
|
|
Height = 38
|
|
Top = 492
|
|
Width = 619
|
|
BorderSpacing.Around = 8
|
|
OKButton.Name = 'OKButton'
|
|
OKButton.DefaultCaption = True
|
|
HelpButton.Name = 'HelpButton'
|
|
HelpButton.DefaultCaption = True
|
|
CloseButton.Name = 'CloseButton'
|
|
CloseButton.DefaultCaption = True
|
|
CancelButton.Name = 'CancelButton'
|
|
CancelButton.DefaultCaption = True
|
|
TabOrder = 3
|
|
ShowButtons = [pbOK, pbCancel]
|
|
end
|
|
object SEPort: TSpinEdit
|
|
AnchorSideLeft.Control = edtWasmProgram
|
|
AnchorSideTop.Control = RBStartServerAt
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 88
|
|
Height = 28
|
|
Top = 332
|
|
Width = 160
|
|
BorderSpacing.Top = 8
|
|
MaxValue = 65354
|
|
MinValue = 1024
|
|
TabOrder = 4
|
|
Value = 3000
|
|
end
|
|
object CBUseHTTPServer: TCheckBox
|
|
AnchorSideLeft.Control = CBCreateHTML
|
|
AnchorSideTop.Control = CBUseBrowserConsole
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 8
|
|
Height = 24
|
|
Top = 268
|
|
Width = 206
|
|
BorderSpacing.Top = 8
|
|
Caption = 'Project needs a HTTP Server'
|
|
OnChange = CBUseHTTPServerChange
|
|
TabOrder = 5
|
|
end
|
|
object RBStartServerAt: TRadioButton
|
|
AnchorSideLeft.Control = CBCreateHTML
|
|
AnchorSideTop.Control = CBUseHTTPServer
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 48
|
|
Height = 24
|
|
Top = 300
|
|
Width = 189
|
|
BorderSpacing.Left = 40
|
|
BorderSpacing.Top = 8
|
|
Caption = 'Start HTTP Server on port'
|
|
Checked = True
|
|
TabOrder = 6
|
|
TabStop = True
|
|
end
|
|
object RBUseURL: TRadioButton
|
|
AnchorSideLeft.Control = RBStartServerAt
|
|
AnchorSideTop.Control = SEPort
|
|
AnchorSideTop.Side = asrBottom
|
|
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 = edtWasmProgram
|
|
AnchorSideTop.Control = RBUseURL
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = edtWasmProgram
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 88
|
|
Height = 28
|
|
Top = 394
|
|
Width = 539
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Top = 8
|
|
BorderSpacing.Bottom = 8
|
|
ItemHeight = 20
|
|
TabOrder = 8
|
|
end
|
|
object CBMaintainPage: TCheckBox
|
|
AnchorSideLeft.Control = CBCreateHTML
|
|
AnchorSideTop.Control = CBCreateHTML
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 8
|
|
Height = 24
|
|
Top = 40
|
|
Width = 159
|
|
BorderSpacing.Top = 8
|
|
Caption = 'Maintain HTML Page'
|
|
TabOrder = 9
|
|
end
|
|
object CBRunOnReady: TCheckBox
|
|
AnchorSideLeft.Control = CBCreateHTML
|
|
AnchorSideTop.Control = CBMaintainPage
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 8
|
|
Height = 24
|
|
Top = 72
|
|
Width = 335
|
|
BorderSpacing.Top = 8
|
|
Caption = 'Run rtl when all page resources are fully loaded'
|
|
TabOrder = 10
|
|
end
|
|
object cbShowUncaughtExceptions: TCheckBox
|
|
AnchorSideLeft.Control = CBRunOnReady
|
|
AnchorSideTop.Control = CBRunOnReady
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 8
|
|
Height = 24
|
|
Top = 104
|
|
Width = 237
|
|
BorderSpacing.Top = 8
|
|
Caption = 'Let rtl show uncaught exceptions'
|
|
TabOrder = 11
|
|
end
|
|
object CBUseWASI: TCheckBox
|
|
AnchorSideLeft.Control = CBCreateHTML
|
|
AnchorSideTop.Control = CBUseBrowserApp
|
|
AnchorSideTop.Side = asrBottom
|
|
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
|
|
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 = 40
|
|
BorderSpacing.Top = 8
|
|
BorderSpacing.Right = 8
|
|
Enabled = False
|
|
TabOrder = 13
|
|
TextHint = 'Name of your webassembly file'
|
|
end
|
|
end
|