lazarus/ide/frmcustomapplicationoptions.lfm

object CustomApplicationOptionsForm: TCustomApplicationOptionsForm
  Left = 386
  Height = 290
  Top = 242
  Width = 460
  HorzScrollBar.Page = 459
  VertScrollBar.Page = 289
  ActiveControl = EClassName
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'New console application'
  ClientHeight = 290
  ClientWidth = 460
  OnCreate = FormCreate
  Position = poScreenCenter
  object LEClassName: TLabel
    Left = 8
    Height = 23
    Top = 8
    Width = 227
    Alignment = taRightJustify
    AutoSize = False
    Caption = '&Application class name'
    FocusControl = EClassName
    Layout = tlCenter
    ParentColor = False
  end
  object LETitle: TLabel
    Left = 8
    Height = 23
    Top = 38
    Width = 227
    Alignment = taRightJustify
    AutoSize = False
    Caption = '&Title'
    FocusControl = ETitle
    Layout = tlCenter
    ParentColor = False
  end
  object BCancel: TButton
    Left = 288
    Height = 25
    Top = 261
    Width = 75
    Anchors = [akRight, akBottom]
    Cancel = True
    Caption = '&Cancel'
    ModalResult = 2
    TabOrder = 4
  end
  object BOK: TButton
    Left = 376
    Height = 25
    Top = 261
    Width = 75
    Anchors = [akRight, akBottom]
    Caption = '&OK'
    Default = True
    ModalResult = 1
    TabOrder = 3
  end
  object EClassName: TEdit
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    Left = 241
    Height = 23
    Top = 8
    Width = 213
    Anchors = [akTop, akLeft, akRight]
    AutoSelect = True
    BorderSpacing.Around = 6
    OnKeyPress = EClassNameKeyPress
    TabOrder = 0
    Text = 'TMyApplication'
  end
  object CGOptions: TCheckGroup
    Left = 8
    Height = 181
    Top = 72
    Width = 443
    Anchors = [akTop, akLeft, akRight, akBottom]
    AutoFill = True
    Caption = 'Code generation options'
    ChildSizing.LeftRightSpacing = 6
    ChildSizing.TopBottomSpacing = 6
    ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
    ChildSizing.EnlargeVertical = crsHomogenousChildResize
    ChildSizing.ShrinkHorizontal = crsScaleChilds
    ChildSizing.ShrinkVertical = crsScaleChilds
    ChildSizing.Layout = cclLeftToRightThenTopToBottom
    ChildSizing.ControlsPerLine = 1
    Items.Strings = (
      'Usage message (-h option)'
      'Stop on exception'
      'Constructor code'
      'Destructor code'
      'Check options'
    )
    TabOrder = 2
    Data = {
      050000000202020202
    }
  end
  object ETitle: TEdit
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    Left = 240
    Height = 23
    Top = 38
    Width = 214
    Anchors = [akTop, akLeft, akRight]
    AutoSelect = True
    BorderSpacing.Around = 6
    TabOrder = 1
    Text = 'My Application'
  end
end