mirror of
				https://gitlab.com/freepascal.org/lazarus/lazarus.git
				synced 2025-11-04 07:59:43 +01:00 
			
		
		
		
	
		
			
				
	
	
		
			177 lines
		
	
	
		
			4.1 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
			
		
		
	
	
			177 lines
		
	
	
		
			4.1 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
object HeapTrcViewForm: THeapTrcViewForm
 | 
						|
  Left = 440
 | 
						|
  Height = 516
 | 
						|
  Top = 302
 | 
						|
  Width = 689
 | 
						|
  Caption = 'HeapTrcViewForm'
 | 
						|
  ClientHeight = 516
 | 
						|
  ClientWidth = 689
 | 
						|
  FormStyle = fsStayOnTop
 | 
						|
  OnCreate = FormCreate
 | 
						|
  OnDestroy = FormDestroy
 | 
						|
  LCLVersion = '1.1'
 | 
						|
  object lblTrcFile: TLabel
 | 
						|
    AnchorSideLeft.Control = Owner
 | 
						|
    AnchorSideTop.Side = asrCenter
 | 
						|
    Left = 6
 | 
						|
    Height = 14
 | 
						|
    Top = 9
 | 
						|
    Width = 35
 | 
						|
    BorderSpacing.Left = 6
 | 
						|
    Caption = '.trc file'
 | 
						|
    ParentColor = False
 | 
						|
  end
 | 
						|
  object btnUpdate: TButton
 | 
						|
    AnchorSideLeft.Control = Owner
 | 
						|
    AnchorSideTop.Side = asrBottom
 | 
						|
    Left = 6
 | 
						|
    Height = 23
 | 
						|
    Top = 40
 | 
						|
    Width = 61
 | 
						|
    AutoSize = True
 | 
						|
    BorderSpacing.Left = 6
 | 
						|
    BorderSpacing.Top = 12
 | 
						|
    Caption = 'Update'
 | 
						|
    OnClick = btnUpdateClick
 | 
						|
    TabOrder = 0
 | 
						|
  end
 | 
						|
  object chkStayOnTop: TCheckBox
 | 
						|
    AnchorSideTop.Control = btnUpdate
 | 
						|
    AnchorSideTop.Side = asrCenter
 | 
						|
    AnchorSideRight.Control = Owner
 | 
						|
    AnchorSideRight.Side = asrBottom
 | 
						|
    Left = 609
 | 
						|
    Height = 17
 | 
						|
    Top = 43
 | 
						|
    Width = 74
 | 
						|
    Anchors = [akTop, akRight]
 | 
						|
    BorderSpacing.Right = 6
 | 
						|
    Caption = 'Stay on top'
 | 
						|
    OnChange = chkStayOnTopChange
 | 
						|
    TabOrder = 1
 | 
						|
  end
 | 
						|
  object btnBrowse: TButton
 | 
						|
    AnchorSideTop.Side = asrCenter
 | 
						|
    Left = 645
 | 
						|
    Height = 20
 | 
						|
    Top = 9
 | 
						|
    Width = 38
 | 
						|
    Anchors = [akTop, akRight]
 | 
						|
    BorderSpacing.Right = 6
 | 
						|
    Caption = '...'
 | 
						|
    OnClick = btnBrowseClick
 | 
						|
    TabOrder = 2
 | 
						|
  end
 | 
						|
  object chkUseRaw: TCheckBox
 | 
						|
    AnchorSideLeft.Control = BtnResolve
 | 
						|
    AnchorSideLeft.Side = asrBottom
 | 
						|
    AnchorSideTop.Control = btnUpdate
 | 
						|
    AnchorSideTop.Side = asrCenter
 | 
						|
    Left = 266
 | 
						|
    Height = 17
 | 
						|
    Top = 43
 | 
						|
    Width = 86
 | 
						|
    BorderSpacing.Left = 6
 | 
						|
    Caption = 'Raw leak data'
 | 
						|
    Checked = True
 | 
						|
    OnChange = chkUseRawChange
 | 
						|
    State = cbChecked
 | 
						|
    TabOrder = 3
 | 
						|
  end
 | 
						|
  object ctrlPanel: TPanel
 | 
						|
    AnchorSideLeft.Control = Owner
 | 
						|
    AnchorSideTop.Control = btnUpdate
 | 
						|
    AnchorSideTop.Side = asrBottom
 | 
						|
    AnchorSideRight.Control = Owner
 | 
						|
    AnchorSideRight.Side = asrBottom
 | 
						|
    AnchorSideBottom.Control = Owner
 | 
						|
    AnchorSideBottom.Side = asrBottom
 | 
						|
    Left = 6
 | 
						|
    Height = 441
 | 
						|
    Top = 69
 | 
						|
    Width = 677
 | 
						|
    Anchors = [akTop, akLeft, akRight, akBottom]
 | 
						|
    BorderSpacing.Around = 6
 | 
						|
    BevelOuter = bvNone
 | 
						|
    ClientHeight = 441
 | 
						|
    ClientWidth = 677
 | 
						|
    TabOrder = 4
 | 
						|
    object trvTraceInfo: TTreeView
 | 
						|
      AnchorSideTop.Side = asrBottom
 | 
						|
      Left = 0
 | 
						|
      Height = 349
 | 
						|
      Top = 6
 | 
						|
      Width = 677
 | 
						|
      Align = alClient
 | 
						|
      BorderSpacing.Top = 6
 | 
						|
      DefaultItemHeight = 16
 | 
						|
      ReadOnly = True
 | 
						|
      TabOrder = 0
 | 
						|
      OnDblClick = trvTraceInfoDblClick
 | 
						|
      Options = [tvoAutoItemHeight, tvoHideSelection, tvoKeepCollapsedNodes, tvoReadOnly, tvoShowButtons, tvoShowLines, tvoShowRoot, tvoToolTips]
 | 
						|
    end
 | 
						|
    object memoSummary: TMemo
 | 
						|
      Left = 0
 | 
						|
      Height = 81
 | 
						|
      Top = 360
 | 
						|
      Width = 677
 | 
						|
      Align = alBottom
 | 
						|
      ReadOnly = True
 | 
						|
      ScrollBars = ssVertical
 | 
						|
      TabOrder = 1
 | 
						|
    end
 | 
						|
    object splitter: TSplitter
 | 
						|
      Cursor = crVSplit
 | 
						|
      Left = 0
 | 
						|
      Height = 5
 | 
						|
      Top = 355
 | 
						|
      Width = 677
 | 
						|
      Align = alBottom
 | 
						|
      ResizeAnchor = akBottom
 | 
						|
    end
 | 
						|
  end
 | 
						|
  object btnClipboard: TButton
 | 
						|
    AnchorSideLeft.Control = btnUpdate
 | 
						|
    AnchorSideLeft.Side = asrBottom
 | 
						|
    AnchorSideTop.Control = btnUpdate
 | 
						|
    Left = 73
 | 
						|
    Height = 23
 | 
						|
    Top = 40
 | 
						|
    Width = 101
 | 
						|
    AutoSize = True
 | 
						|
    BorderSpacing.Left = 6
 | 
						|
    Caption = 'Paste Clipboard'
 | 
						|
    OnClick = btnClipboardClick
 | 
						|
    TabOrder = 5
 | 
						|
  end
 | 
						|
  object edtTrcFileName: TComboBox
 | 
						|
    AnchorSideLeft.Control = lblTrcFile
 | 
						|
    AnchorSideLeft.Side = asrBottom
 | 
						|
    AnchorSideRight.Control = btnBrowse
 | 
						|
    Left = 47
 | 
						|
    Height = 21
 | 
						|
    Top = 8
 | 
						|
    Width = 592
 | 
						|
    Anchors = [akTop, akLeft, akRight]
 | 
						|
    BorderSpacing.Left = 6
 | 
						|
    BorderSpacing.Right = 6
 | 
						|
    ItemHeight = 13
 | 
						|
    TabOrder = 6
 | 
						|
  end
 | 
						|
  object BtnResolve: TButton
 | 
						|
    AnchorSideLeft.Control = btnClipboard
 | 
						|
    AnchorSideLeft.Side = asrBottom
 | 
						|
    AnchorSideTop.Control = btnUpdate
 | 
						|
    AnchorSideTop.Side = asrCenter
 | 
						|
    Left = 180
 | 
						|
    Height = 23
 | 
						|
    Top = 40
 | 
						|
    Width = 80
 | 
						|
    AutoSize = True
 | 
						|
    BorderSpacing.Left = 6
 | 
						|
    Caption = 'BtnResolve'
 | 
						|
    OnClick = BtnResolveClick
 | 
						|
    TabOrder = 7
 | 
						|
  end
 | 
						|
end
 |