lazarus/components/fpdebug/test/dwarfviewer/unit1.lfm

object Form1: TForm1
  Left = 24
  Height = 440
  Top = 428
  Width = 687
  AllowDropFiles = True
  Caption = 'test fp'
  ClientHeight = 440
  ClientWidth = 687
  LCLVersion = '3.99.0.0'
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnDropFiles = FormDropFiles
  object FileNameEdit1: TFileNameEdit
    AnchorSideLeft.Control = Owner
    AnchorSideTop.Control = Owner
    AnchorSideRight.Control = btnLoad
    Left = 3
    Height = 23
    Top = 3
    Width = 532
    FilterIndex = 0
    HideDirectories = False
    ButtonWidth = 23
    NumGlyphs = 1
    Anchors = [akTop, akLeft, akRight]
    BorderSpacing.Right = 3
    BorderSpacing.Bottom = 3
    BorderSpacing.Around = 3
    MaxLength = 0
    TabOrder = 0
  end
  object btnLoad: TButton
    AnchorSideTop.Control = FileNameEdit1
    AnchorSideTop.Side = asrCenter
    AnchorSideRight.Control = btnUnload
    Left = 573
    Height = 25
    Top = 2
    Width = 75
    Anchors = [akTop, akRight]
    BorderSpacing.Left = 35
    BorderSpacing.Bottom = 3
    BorderSpacing.Around = 3
    Caption = 'load'
    TabOrder = 1
    OnClick = btnLoadClick
  end
  object CompUnitListBox: TListBox
    AnchorSideLeft.Control = Owner
    AnchorSideTop.Control = btnLines
    AnchorSideTop.Side = asrBottom
    AnchorSideBottom.Control = StatusBar1
    Left = 3
    Height = 322
    Top = 92
    Width = 244
    Anchors = [akTop, akLeft, akBottom]
    BorderSpacing.Top = 3
    BorderSpacing.Right = 3
    BorderSpacing.Around = 3
    ItemHeight = 0
    TabOrder = 2
  end
  object btnShowUnit: TButton
    AnchorSideLeft.Control = Owner
    AnchorSideTop.Control = btnLoad
    AnchorSideTop.Side = asrBottom
    Left = 3
    Height = 25
    Top = 33
    Width = 79
    BorderSpacing.Around = 3
    Caption = 'Show Symbols'
    TabOrder = 3
    OnClick = btnShowUnitClick
  end
  object btnCopyOne: TButton
    AnchorSideLeft.Control = btnShowUnit
    AnchorSideLeft.Side = asrBottom
    AnchorSideTop.Control = btnShowUnit
    AnchorSideTop.Side = asrCenter
    AnchorSideRight.Control = CompUnitListBox
    AnchorSideRight.Side = asrBottom
    Left = 166
    Height = 25
    Top = 33
    Width = 75
    Anchors = [akTop, akRight]
    BorderSpacing.Left = 6
    BorderSpacing.Around = 6
    Caption = 'Copy'
    TabOrder = 4
    OnClick = btnCopyOneClick
  end
  object btnCopyAll: TButton
    AnchorSideLeft.Control = btnCopyOne
    AnchorSideLeft.Side = asrBottom
    AnchorSideTop.Control = btnCopyOne
    AnchorSideTop.Side = asrBottom
    AnchorSideRight.Control = CompUnitListBox
    AnchorSideRight.Side = asrBottom
    Left = 166
    Height = 25
    Top = 64
    Width = 75
    Anchors = [akTop, akRight]
    BorderSpacing.Around = 6
    Caption = 'Copy Incl'
    TabOrder = 5
    OnClick = btnCopyAllClick
  end
  object StatusBar1: TStatusBar
    Left = 0
    Height = 23
    Top = 417
    Width = 687
    Panels = <>
  end
  object btnLines: TButton
    AnchorSideLeft.Control = Owner
    AnchorSideTop.Control = btnShowUnit
    AnchorSideTop.Side = asrBottom
    Left = 3
    Height = 25
    Top = 61
    Width = 75
    BorderSpacing.Around = 3
    Caption = 'Show Lines'
    TabOrder = 7
    OnClick = btnLinesClick
  end
  object btnUnload: TButton
    AnchorSideTop.Control = FileNameEdit1
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    Left = 651
    Height = 25
    Hint = 'Unload'
    Top = 3
    Width = 33
    Anchors = [akTop, akRight]
    AutoSize = True
    BorderSpacing.Right = 3
    Caption = 'X'
    TabOrder = 8
    OnClick = btnUnloadClick
  end
  object VStringTree: TLazVirtualStringTree
    AnchorSideLeft.Control = CompUnitListBox
    AnchorSideLeft.Side = asrBottom
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    AnchorSideBottom.Control = StatusBar1
    Left = 253
    Height = 384
    Top = 33
    Width = 434
    Anchors = [akTop, akLeft, akRight, akBottom]
    DefaultText = 'Node'
    Header.AutoSizeIndex = 0
    Header.Columns = <>
    Header.MainColumn = -1
    NodeDataSize = 32
    TabOrder = 9
    OnDblClick = VStringTreeDblClick
    OnFreeNode = VStringTreeFreeNode
    OnGetText = VStringTreeGetText
    OnInitNode = VStringTreeInitNode
    OnNewText = VStringTreeNewText
    OnNodeDblClick = VStringTreeNodeDblClick
  end
end