mirror of
				https://gitlab.com/freepascal.org/lazarus/lazarus.git
				synced 2025-11-04 09:04:11 +01:00 
			
		
		
		
	
		
			
				
	
	
		
			192 lines
		
	
	
		
			4.9 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
			
		
		
	
	
			192 lines
		
	
	
		
			4.9 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
object XMLRederForm: TXMLRederForm
 | 
						|
  Left = 312
 | 
						|
  Height = 381
 | 
						|
  Top = 119
 | 
						|
  Width = 732
 | 
						|
  ActiveControl = Panel1
 | 
						|
  Caption = 'XML reader test'
 | 
						|
  ClientHeight = 381
 | 
						|
  ClientWidth = 732
 | 
						|
  OnClose = FormClose
 | 
						|
  OnCreate = FormCreate
 | 
						|
  Position = poScreenCenter
 | 
						|
  LCLVersion = '1.1'
 | 
						|
  object TreeView1: TTreeView
 | 
						|
    Left = 0
 | 
						|
    Height = 315
 | 
						|
    Top = 66
 | 
						|
    Width = 342
 | 
						|
    Align = alLeft
 | 
						|
    AutoExpand = True
 | 
						|
    ReadOnly = True
 | 
						|
    TabOrder = 0
 | 
						|
    OnClick = TreeView1Click
 | 
						|
    Options = [tvoAutoExpand, tvoAutoItemHeight, tvoHideSelection, tvoKeepCollapsedNodes, tvoReadOnly, tvoShowButtons, tvoShowLines, tvoShowRoot, tvoToolTips]
 | 
						|
  end
 | 
						|
  object Panel1: TPanel
 | 
						|
    Left = 0
 | 
						|
    Height = 66
 | 
						|
    Top = 0
 | 
						|
    Width = 732
 | 
						|
    Align = alTop
 | 
						|
    AutoSize = True
 | 
						|
    ClientHeight = 66
 | 
						|
    ClientWidth = 732
 | 
						|
    TabOrder = 1
 | 
						|
    object BitBtn1: TBitBtn
 | 
						|
      AnchorSideTop.Control = Label1
 | 
						|
      AnchorSideTop.Side = asrBottom
 | 
						|
      AnchorSideRight.Control = Panel1
 | 
						|
      AnchorSideRight.Side = asrBottom
 | 
						|
      Left = 650
 | 
						|
      Height = 29
 | 
						|
      Top = 30
 | 
						|
      Width = 75
 | 
						|
      Anchors = [akTop, akRight]
 | 
						|
      AutoSize = True
 | 
						|
      BorderSpacing.Around = 6
 | 
						|
      Caption = 'Load'
 | 
						|
      Glyph.Data = {
 | 
						|
        4E010000424D4E01000000000000760000002800000012000000120000000100
 | 
						|
        040000000000D800000000000000000000000000000000000000000000000000
 | 
						|
        8000008000000080800080000000800080008080000080808000C0C0C0000000
 | 
						|
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEEEEEEEEE
 | 
						|
        EEEEEE000000EEEEEEEEEEEEEEEEEE000000EE00000000000EEEEE000000EE00
 | 
						|
        3333333330EEEE000000EE0B03333333330EEE000000EE0FB03333333330EE00
 | 
						|
        0000EE0BFB03333333330E000000EE0FBFB00000000000000000EE0BFBFBFBFB
 | 
						|
        0EEEEE000000EE0FBFBFBFBF0EEEEE000000EE0BFB0000000EEEEE000000EEE0
 | 
						|
        00EEEEEEEE000E000000EEEEEEEEEEEEEEE00E000000EEEEEEEEEE0EEE0E0E00
 | 
						|
        0000EEEEEEEEEEE000EEEE000000EEEEEEEEEEEEEEEEEE000000EEEEEEEEEEEE
 | 
						|
        EEEEEE000000EEEEEEEEEEEEEEEEEE000000
 | 
						|
      }
 | 
						|
      OnClick = BitBtn1Click
 | 
						|
      TabOrder = 0
 | 
						|
    end
 | 
						|
    object Label1: TLabel
 | 
						|
      AnchorSideLeft.Control = Panel1
 | 
						|
      AnchorSideTop.Control = Panel1
 | 
						|
      Left = 7
 | 
						|
      Height = 17
 | 
						|
      Top = 7
 | 
						|
      Width = 61
 | 
						|
      BorderSpacing.Around = 6
 | 
						|
      Caption = 'File name'
 | 
						|
      ParentColor = False
 | 
						|
    end
 | 
						|
    object FileNameEdit1: TFileNameEdit
 | 
						|
      AnchorSideLeft.Control = Label1
 | 
						|
      AnchorSideTop.Control = Label1
 | 
						|
      AnchorSideTop.Side = asrBottom
 | 
						|
      Left = 13
 | 
						|
      Height = 25
 | 
						|
      Top = 30
 | 
						|
      Width = 620
 | 
						|
      FileName = 'test.xml'
 | 
						|
      DialogOptions = []
 | 
						|
      FilterIndex = 0
 | 
						|
      HideDirectories = False
 | 
						|
      ButtonWidth = 23
 | 
						|
      NumGlyphs = 1
 | 
						|
      Anchors = [akTop, akLeft, akRight]
 | 
						|
      BorderSpacing.Left = 6
 | 
						|
      BorderSpacing.Top = 6
 | 
						|
      BorderSpacing.Bottom = 6
 | 
						|
      MaxLength = 0
 | 
						|
      TabOrder = 1
 | 
						|
    end
 | 
						|
  end
 | 
						|
  object Splitter1: TSplitter
 | 
						|
    Left = 342
 | 
						|
    Height = 315
 | 
						|
    Top = 66
 | 
						|
    Width = 5
 | 
						|
  end
 | 
						|
  object Panel2: TPanel
 | 
						|
    Left = 347
 | 
						|
    Height = 315
 | 
						|
    Top = 66
 | 
						|
    Width = 385
 | 
						|
    Align = alClient
 | 
						|
    Caption = 'Panel2'
 | 
						|
    ClientHeight = 315
 | 
						|
    ClientWidth = 385
 | 
						|
    TabOrder = 3
 | 
						|
    object ListView1: TListView
 | 
						|
      AnchorSideTop.Control = Edit2
 | 
						|
      AnchorSideTop.Side = asrBottom
 | 
						|
      Left = 1
 | 
						|
      Height = 199
 | 
						|
      Top = 115
 | 
						|
      Width = 383
 | 
						|
      Align = alBottom
 | 
						|
      Anchors = [akTop, akLeft, akRight, akBottom]
 | 
						|
      BorderSpacing.Top = 6
 | 
						|
      Columns = <      
 | 
						|
        item
 | 
						|
          Caption = 'Name'
 | 
						|
          Width = 100
 | 
						|
        end      
 | 
						|
        item
 | 
						|
          Caption = 'Value'
 | 
						|
          Width = 350
 | 
						|
        end>
 | 
						|
      SortType = stText
 | 
						|
      TabOrder = 0
 | 
						|
      ViewStyle = vsReport
 | 
						|
    end
 | 
						|
    object Label2: TLabel
 | 
						|
      AnchorSideLeft.Control = Panel2
 | 
						|
      AnchorSideTop.Control = Panel2
 | 
						|
      Left = 7
 | 
						|
      Height = 17
 | 
						|
      Top = 7
 | 
						|
      Width = 75
 | 
						|
      BorderSpacing.Around = 6
 | 
						|
      Caption = 'Node name'
 | 
						|
      ParentColor = False
 | 
						|
    end
 | 
						|
    object Label3: TLabel
 | 
						|
      AnchorSideLeft.Control = Panel2
 | 
						|
      AnchorSideTop.Control = Edit1
 | 
						|
      AnchorSideTop.Side = asrBottom
 | 
						|
      Left = 7
 | 
						|
      Height = 17
 | 
						|
      Top = 61
 | 
						|
      Width = 72
 | 
						|
      BorderSpacing.Around = 6
 | 
						|
      Caption = 'Node value'
 | 
						|
      ParentColor = False
 | 
						|
    end
 | 
						|
    object Edit1: TEdit
 | 
						|
      AnchorSideLeft.Control = Label2
 | 
						|
      AnchorSideTop.Control = Label2
 | 
						|
      AnchorSideTop.Side = asrBottom
 | 
						|
      AnchorSideRight.Control = Panel2
 | 
						|
      AnchorSideRight.Side = asrBottom
 | 
						|
      Left = 13
 | 
						|
      Height = 25
 | 
						|
      Top = 30
 | 
						|
      Width = 365
 | 
						|
      Anchors = [akTop, akLeft, akRight]
 | 
						|
      BorderSpacing.Around = 6
 | 
						|
      TabOrder = 1
 | 
						|
      Text = 'Edit1'
 | 
						|
    end
 | 
						|
    object Edit2: TEdit
 | 
						|
      AnchorSideLeft.Control = Label3
 | 
						|
      AnchorSideTop.Control = Label3
 | 
						|
      AnchorSideTop.Side = asrBottom
 | 
						|
      AnchorSideRight.Control = Panel2
 | 
						|
      AnchorSideRight.Side = asrBottom
 | 
						|
      Left = 13
 | 
						|
      Height = 25
 | 
						|
      Top = 84
 | 
						|
      Width = 365
 | 
						|
      Anchors = [akTop, akLeft, akRight]
 | 
						|
      BorderSpacing.Around = 6
 | 
						|
      TabOrder = 2
 | 
						|
      Text = 'Edit2'
 | 
						|
    end
 | 
						|
  end
 | 
						|
end
 |