lazarus-ccr/applications/lazstats/source_orig/scripteditorunit.lfm

object scripteditorfrm: Tscripteditorfrm
  Left = 224
  Height = 508
  Top = 121
  Width = 691
  Caption = 'MatMan Script Editor'
  ClientHeight = 508
  ClientWidth = 691
  OnShow = FormShow
  LCLVersion = '0.9.28.2'
  object Label1: TLabel
    Left = 10
    Height = 14
    Top = 56
    Width = 124
    Caption = 'Current Script File Name: '
    ParentColor = False
  end
  object Label2: TLabel
    Left = 65
    Height = 14
    Top = 81
    Width = 68
    Caption = 'Current Script'
    ParentColor = False
  end
  object Label3: TLabel
    Left = 456
    Height = 14
    Top = 224
    Width = 69
    Caption = 'Directory Files'
    ParentColor = False
  end
  object Label4: TLabel
    Left = 321
    Height = 14
    Top = 182
    Width = 32
    Caption = 'Label4'
    ParentColor = False
  end
  object Memo1: TMemo
    Left = 6
    Height = 32
    Top = 8
    Width = 674
    Lines.Strings = (
      'Your script is shown in the list to  your left.  Select a line by clicking on a line in the script and then click on one of the edit option buttons.'
      'When finished editing, click on the Save button.'
    )
    TabOrder = 0
  end
  object ScriptFileEdit: TEdit
    Left = 146
    Height = 21
    Top = 47
    Width = 534
    TabOrder = 1
    Text = 'ScriptFileEdit'
  end
  object ScriptList: TListBox
    Left = 9
    Height = 360
    Top = 96
    Width = 294
    ItemHeight = 0
    OnClick = ScriptListClick
    TabOrder = 2
  end
  object RadioGroup1: TRadioGroup
    Left = 321
    Height = 104
    Top = 72
    Width = 361
    AutoFill = True
    Caption = 'Editing 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
    ClientHeight = 86
    ClientWidth = 357
    Items.Strings = (
      'Delete the line'
      'Insert a new line prior to selected line'
      'Modify the current line'
      'Append another script'
    )
    OnClick = RadioGroup1Click
    TabOrder = 3
  end
  object FileListBox1: TFileListBox
    Left = 321
    Height = 217
    Top = 240
    Width = 359
    Directory = 'C:\Windows\system32'
    ItemHeight = 13
    OnDblClick = FileListBox1DblClick
    TabOrder = 4
  end
  object SaveBtn: TButton
    Left = 432
    Height = 27
    Top = 472
    Width = 74
    Caption = 'Save'
    OnClick = SaveBtnClick
    TabOrder = 5
  end
  object CancelBtn: TButton
    Left = 520
    Height = 27
    Top = 472
    Width = 74
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 6
  end
  object ReturnBtn: TButton
    Left = 608
    Height = 27
    Top = 472
    Width = 74
    Caption = 'Return'
    ModalResult = 1
    TabOrder = 7
  end
  object DirChangeBtn: TButton
    Left = 318
    Height = 28
    Top = 472
    Width = 100
    Caption = 'Change Directory'
    OnClick = DirChangeBtnClick
    TabOrder = 8
  end
  object LineEdit: TEdit
    Left = 327
    Height = 21
    Top = 199
    Width = 352
    OnKeyPress = LineEditKeyPress
    TabOrder = 9
    Text = 'LineEdit'
  end
  object SaveDialog1: TSaveDialog
    left = 24
    top = 464
  end
  object OpenDialog1: TOpenDialog
    left = 87
    top = 464
  end
  object SelectDirectoryDialog1: TSelectDirectoryDialog
    left = 184
    top = 466
  end
end