lazarus/components/pas2js/frmpas2jsbrowserprojectoptions.lfm

object WebBrowserProjectOptionsForm: TWebBrowserProjectOptionsForm
  Left = 431
  Height = 383
  Top = 310
  Width = 491
  Caption = 'Pas2JS Browser project options'
  ClientHeight = 383
  ClientWidth = 491
  OnCreate = FormCreate
  OnShow = FormShow
  Position = poScreenCenter
  LCLVersion = '2.1.0.0'
  object CBCreateHTML: TCheckBox
    AnchorSideLeft.Control = Owner
    AnchorSideTop.Control = Owner
    Left = 6
    Height = 23
    Top = 6
    Width = 164
    BorderSpacing.Left = 6
    BorderSpacing.Top = 6
    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 = 6
    Height = 23
    Top = 122
    Width = 200
    BorderSpacing.Top = 6
    Caption = 'Use Browser Application object'
    TabOrder = 1
  end
  object CBUseBrowserConsole: TCheckBox
    AnchorSideLeft.Control = CBCreateHTML
    AnchorSideTop.Control = CBUseBrowserApp
    AnchorSideTop.Side = asrBottom
    Left = 6
    Height = 23
    Top = 151
    Width = 314
    BorderSpacing.Top = 6
    Caption = 'Use Browser Console unit to display writeln() output'
    TabOrder = 2
  end
  object BPHelpOptions: TButtonPanel
    Left = 6
    Height = 39
    Top = 338
    Width = 479
    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 = RBStartServerAt
    AnchorSideTop.Control = RBStartServerAt
    AnchorSideTop.Side = asrBottom
    Left = 70
    Height = 29
    Top = 234
    Width = 75
    BorderSpacing.Left = 32
    BorderSpacing.Top = 2
    MaxValue = 65354
    MinValue = 1024
    TabOrder = 4
    Value = 3000
  end
  object CBUseHTTPServer: TCheckBox
    AnchorSideLeft.Control = CBCreateHTML
    AnchorSideTop.Control = CBUseBrowserConsole
    AnchorSideTop.Side = asrBottom
    Left = 6
    Height = 23
    Top = 180
    Width = 185
    BorderSpacing.Top = 6
    Caption = 'Project needs a HTTP Server'
    OnChange = CBUseHTTPServerChange
    TabOrder = 5
  end
  object RBStartServerAt: TRadioButton
    AnchorSideLeft.Control = CBCreateHTML
    AnchorSideTop.Control = CBUseHTTPServer
    AnchorSideTop.Side = asrBottom
    Left = 38
    Height = 23
    Top = 209
    Width = 169
    BorderSpacing.Left = 32
    BorderSpacing.Top = 6
    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 = 38
    Height = 23
    Top = 265
    Width = 163
    BorderSpacing.Top = 2
    Caption = 'Use this URL to start app'
    TabOrder = 7
  end
  object CBServerURL: TComboBox
    AnchorSideLeft.Control = SEPort
    AnchorSideTop.Control = RBUseURL
    AnchorSideTop.Side = asrBottom
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    Left = 70
    Height = 29
    Top = 290
    Width = 409
    Anchors = [akTop, akLeft, akRight]
    BorderSpacing.Top = 2
    BorderSpacing.Right = 12
    ItemHeight = 0
    TabOrder = 8
  end
  object CBMaintainPage: TCheckBox
    AnchorSideLeft.Control = CBCreateHTML
    AnchorSideTop.Control = CBCreateHTML
    AnchorSideTop.Side = asrBottom
    Left = 6
    Height = 23
    Top = 35
    Width = 142
    BorderSpacing.Top = 6
    Caption = 'Maintain HTML Page'
    TabOrder = 9
  end
  object CBRunOnReady: TCheckBox
    AnchorSideLeft.Control = CBCreateHTML
    AnchorSideTop.Control = CBMaintainPage
    AnchorSideTop.Side = asrBottom
    Left = 6
    Height = 23
    Top = 64
    Width = 290
    BorderSpacing.Top = 6
    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 = 6
    Height = 23
    Top = 93
    Width = 208
    BorderSpacing.Top = 6
    Caption = 'Let rtl show uncaught exceptions'
    TabOrder = 11
  end
end