lazarus/debugger/pseudoterminaldlg.lfm

object PseudoConsoleDlg: TPseudoConsoleDlg
  Left = 438
  Height = 480
  Top = 321
  Width = 800
  Caption = 'Console'
  ClientHeight = 480
  ClientWidth = 800
  DockSite = True
  OnResize = FormResize
  LCLVersion = '1.9.0.0'
  object PageControl1: TPageControl
    Left = 0
    Height = 460
    Top = 0
    Width = 800
    ActivePage = TabSheetRaw
    Align = alClient
    TabIndex = 1
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = 'Formatted'
      ClientHeight = 430
      ClientWidth = 790
      TabVisible = False
      object Panel1: TPanel
        Left = 470
        Height = 430
        Top = 0
        Width = 160
        Align = alRight
        Caption = 'Panel1'
        TabOrder = 0
      end
    end
    object TabSheetRaw: TTabSheet
      Caption = 'Raw Output'
      ClientHeight = 430
      ClientWidth = 790
      object PairSplitterRaw: TPairSplitter
        Left = 0
        Height = 430
        Top = 0
        Width = 790
        Align = alClient
        Position = 600
        object PairSplitterRawLeft: TPairSplitterSide
          Cursor = crArrow
          Left = 0
          Height = 430
          Top = 0
          Width = 600
          ClientWidth = 600
          ClientHeight = 430
          Constraints.MinWidth = 200
          object Memo1: TMemo
            Left = 4
            Height = 422
            Top = 4
            Width = 592
            Align = alClient
            BorderSpacing.Around = 4
            Font.Name = 'Monospace'
            OnUTF8KeyPress = Memo1UTF8KeyPress
            ParentFont = False
            ReadOnly = True
            ScrollBars = ssAutoBoth
            TabOrder = 0
            WantTabs = True
          end
        end
        object PairSplitterRawRight: TPairSplitterSide
          Cursor = crArrow
          Left = 605
          Height = 430
          Top = 0
          Width = 200
          ClientWidth = 200
          ClientHeight = 430
          Constraints.MinWidth = 200
          OnResize = PairSplitterRawRightResize
          object RadioGroupRight: TRadioGroup
            Left = 0
            Height = 103
            Top = 0
            Width = 200
            Align = alTop
            AutoFill = True
            AutoSize = True
            Caption = 'Output Style'
            ChildSizing.LeftRightSpacing = 6
            ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
            ChildSizing.EnlargeVertical = crsHomogenousChildResize
            ChildSizing.ShrinkHorizontal = crsScaleChilds
            ChildSizing.ShrinkVertical = crsScaleChilds
            ChildSizing.Layout = cclLeftToRightThenTopToBottom
            ChildSizing.ControlsPerLine = 1
            ClientHeight = 84
            ClientWidth = 198
            ItemIndex = 0
            Items.Strings = (
              'Unformatted'
              'C0 as Control Pictures'
              'C0 as ISO 2047'
              'Hex + ASCII'
            )
            OnSelectionChanged = RadioGroupRightSelectionChanged
            TabOrder = 1
          end
          object PanelRightBelowRG: TPanel
            Left = 0
            Height = 327
            Top = 103
            Width = 200
            Align = alClient
            BevelOuter = bvNone
            ClientHeight = 327
            ClientWidth = 200
            TabOrder = 0
            object CheckGroupRight: TCheckGroup
              Left = 0
              Height = 73
              Top = 0
              Width = 200
              Align = alTop
              AutoFill = True
              AutoSize = True
              Caption = 'Decorations'
              ChildSizing.LeftRightSpacing = 6
              ChildSizing.TopBottomSpacing = 6
              ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
              ChildSizing.EnlargeVertical = crsHomogenousChildResize
              ChildSizing.ShrinkHorizontal = crsScaleChilds
              ChildSizing.ShrinkVertical = crsScaleChilds
              ChildSizing.Layout = cclLeftToRightThenTopToBottom
              ChildSizing.ControlsPerLine = 1
              ClientHeight = 54
              ClientWidth = 198
              Enabled = False
              Items.Strings = (
                'Line numbers'
                'C1 as C0 + Underbar'
              )
              TabOrder = 1
              Data = {
                020000000202
              }
            end
            object PanelRightBelowCG: TPanel
              Left = 0
              Height = 254
              Top = 73
              Width = 200
              Align = alClient
              BevelOuter = bvNone
              ClientHeight = 254
              ClientWidth = 200
              TabOrder = 0
              object GroupBoxRight: TGroupBox
                Left = 0
                Height = 64
                Top = 0
                Width = 200
                Align = alTop
                Caption = 'Line limit'
                ClientHeight = 45
                ClientWidth = 198
                TabOrder = 0
                object MaskEdit1: TMaskEdit
                  Left = 9
                  Height = 30
                  Top = 0
                  Width = 128
                  CharCase = ecNormal
                  MaxLength = 7
                  TabOrder = 0
                  EditMask = '#######'
                  Text = '5000   '
                  SpaceChar = '_'
                end
              end
            end
          end
        end
      end
    end
  end
  object StatusBar1: TStatusBar
    Left = 0
    Height = 20
    Top = 460
    Width = 800
    Panels = <    
      item
        Text = '    dumb'
        Width = 160
      end    
      item
        Text = '00 x 00 chars'
        Width = 160
      end    
      item
        Text = '000 x 000 pixels'
        Width = 160
      end    
      item
        Text = 'Not resized'
        Width = 160
      end>
    SimplePanel = False
  end
end