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

object TestSpecsForm: TTestSpecsForm
  Left = 60
  Height = 635
  Top = 137
  Width = 1114
  Caption = 'Test Specification'
  ClientHeight = 635
  ClientWidth = 1114
  OnShow = FormShow
  LCLVersion = '0.9.30.4'
  object ReturnBtn: TButton
    Left = 984
    Height = 30
    Top = 593
    Width = 92
    Caption = 'Return'
    OnClick = ReturnBtnClick
    TabOrder = 0
  end
  object Label1: TLabel
    Left = 9
    Height = 16
    Top = 17
    Width = 131
    Caption = 'Specification File Name: '
    ParentColor = False
  end
  object SpecFileEdit: TEdit
    Left = 144
    Height = 23
    Top = 8
    Width = 393
    TabOrder = 1
    Text = 'SpecFileEdit'
  end
  object SelectChoiceBox: TCheckGroup
    Left = 7
    Height = 167
    Top = 73
    Width = 242
    AutoFill = True
    Caption = 'Selection 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
    Items.Strings = (
      'Multiple Choice items'
      'True or False items'
      'Essay items'
      'Matching items'
    )
    OnItemClick = SelectChoiceBoxItemClick
    TabOrder = 2
    Data = {
      0400000002020202
    }
  end
  object Label2: TLabel
    Left = 16
    Height = 16
    Top = 304
    Width = 179
    Caption = 'Number of Items of a Given Type:'
    ParentColor = False
  end
  object Label3: TLabel
    Left = 15
    Height = 16
    Top = 367
    Width = 68
    Caption = 'True or False'
    ParentColor = False
  end
  object Label4: TLabel
    Left = 16
    Height = 16
    Top = 336
    Width = 85
    Caption = 'Multiple Choice'
    ParentColor = False
  end
  object Label5: TLabel
    Left = 16
    Height = 16
    Top = 407
    Width = 52
    Caption = 'Matching'
    ParentColor = False
  end
  object Label6: TLabel
    Left = 16
    Height = 16
    Top = 447
    Width = 29
    Caption = 'Essay'
    ParentColor = False
  end
  object TFNoEdit: TEdit
    Left = 112
    Height = 23
    Top = 367
    Width = 54
    TabOrder = 3
    Text = 'TFNoEdit'
  end
  object EssayNoEdit: TEdit
    Left = 112
    Height = 23
    Top = 440
    Width = 54
    TabOrder = 4
    Text = 'Edit1'
  end
  object MatchNoEdit: TEdit
    Left = 112
    Height = 23
    Top = 400
    Width = 54
    TabOrder = 5
    Text = 'Edit1'
  end
  object MCNoEdit: TEdit
    Left = 112
    Height = 23
    Top = 329
    Width = 54
    TabOrder = 6
    Text = 'Edit1'
  end
  object TFItemNoLabel: TLabel
    Left = 328
    Height = 16
    Top = 47
    Width = 75
    Caption = 'Item Number:'
    ParentColor = False
  end
  object ItemNoEdit: TEdit
    Left = 431
    Height = 23
    Top = 40
    Width = 44
    TabOrder = 7
    Text = '1'
  end
  object ItemCodeLabel: TLabel
    Left = 497
    Height = 16
    Top = 47
    Width = 93
    Caption = 'Item Major Code:'
    ParentColor = False
  end
  object MajorCodeEdit: TEdit
    Left = 601
    Height = 23
    Top = 40
    Width = 41
    TabOrder = 8
    Text = '1'
  end
  object MinorCodeLabel: TLabel
    Left = 657
    Height = 16
    Top = 45
    Width = 94
    Caption = 'Item Minor Code:'
    ParentColor = False
  end
  object MinorCodeEdit: TEdit
    Left = 761
    Height = 23
    Top = 40
    Width = 45
    TabOrder = 9
    Text = '0'
  end
  object Panel1: TPanel
    Left = 264
    Height = 495
    Top = 73
    Width = 812
    BevelInner = bvRaised
    BorderStyle = bsSingle
    TabOrder = 10
  end
  object SelectItemBtn: TButton
    Left = 264
    Height = 30
    Top = 593
    Width = 112
    Caption = 'Select this item'
    OnClick = SelectItemBtnClick
    TabOrder = 11
  end
  object SkipBtn: TButton
    Left = 393
    Height = 32
    Top = 592
    Width = 105
    Caption = 'Skip this item'
    OnClick = SkipBtnClick
    TabOrder = 12
  end
  object Label7: TLabel
    Left = 824
    Height = 16
    Top = 45
    Width = 57
    Caption = 'Item Type:'
    ParentColor = False
  end
  object SelectedEdit: TEdit
    Left = 888
    Height = 23
    Top = 37
    Width = 183
    TabOrder = 13
    Text = 'SelectedEdit'
  end
  object Label8: TLabel
    Left = 16
    Height = 16
    Top = 514
    Width = 149
    Caption = 'Current no. items specified: '
    ParentColor = False
  end
  object NoItemsEdit: TEdit
    Left = 167
    Height = 23
    Top = 507
    Width = 46
    TabOrder = 14
    Text = 'NoItemsEdit'
  end
  object OpenDialog1: TOpenDialog
    left = 902
    top = 584
  end
  object SaveDialog1: TSaveDialog
    left = 808
    top = 587
  end
end