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

object ItemBankFrm: TItemBankFrm
  Left = 139
  Height = 565
  Top = 107
  Width = 346
  Caption = 'Item Banking'
  ClientHeight = 545
  ClientWidth = 346
  Menu = MainMenu1
  OnCreate = FormCreate
  OnShow = FormShow
  LCLVersion = '0.9.30.4'
  object Label1: TLabel
    Left = 10
    Height = 16
    Top = 40
    Width = 86
    Caption = 'No. Item Codes:'
    ParentColor = False
  end
  object NItemCodesText: TEdit
    Left = 156
    Height = 23
    Top = 32
    Width = 44
    TabOrder = 0
  end
  object BankNameLabel: TLabel
    Left = 8
    Height = 16
    Top = 8
    Width = 92
    Caption = 'Item Bank Name:'
    ParentColor = False
  end
  object BankNameText: TEdit
    Left = 112
    Height = 23
    Top = 0
    Width = 224
    TabOrder = 1
  end
  object NMCItemsLabel: TLabel
    Left = 8
    Height = 16
    Top = 72
    Width = 142
    Caption = 'No. Multiple Choice Items:'
    ParentColor = False
  end
  object NMCItemsText: TEdit
    Left = 156
    Height = 23
    Top = 64
    Width = 44
    TabOrder = 2
  end
  object TFItemsLabel: TLabel
    Left = 8
    Height = 16
    Top = 104
    Width = 113
    Caption = 'No. True-False Items:'
    ParentColor = False
  end
  object NTFItemsText: TEdit
    Left = 156
    Height = 23
    Top = 96
    Width = 44
    TabOrder = 3
  end
  object NMatchLabel: TLabel
    Left = 8
    Height = 16
    Top = 136
    Width = 109
    Caption = 'No. Matching Items:'
    ParentColor = False
  end
  object NMatchItemsText: TEdit
    Left = 156
    Height = 23
    Top = 128
    Width = 44
    TabOrder = 4
  end
  object NEssayLabel: TLabel
    Left = 8
    Height = 16
    Top = 167
    Width = 86
    Caption = 'No. Essay Items:'
    ParentColor = False
  end
  object NEssayText: TEdit
    Left = 156
    Height = 23
    Top = 160
    Width = 44
    TabOrder = 5
  end
  object FilesLabel: TLabel
    Left = 16
    Height = 16
    Top = 320
    Width = 24
    Caption = 'Files'
    ParentColor = False
  end
  object FileListBox1: TFileListBox
    Left = 16
    Height = 188
    Top = 344
    Width = 267
    Directory = 'C:\Users\wgmiller\Desktop'
    ItemHeight = 15
    TabOrder = 6
  end
  object Button1: TButton
    Left = 15
    Height = 19
    Top = 272
    Width = 305
    Caption = 'Click to Change Directory to Options Default Directory'
    OnClick = Button1Click
    TabOrder = 7
  end
  object DirectoryEdit1: TEdit
    Left = 16
    Height = 23
    Top = 296
    Width = 267
    TabOrder = 8
    Text = 'DirectoryEdit1'
  end
  object Label2: TLabel
    Left = 10
    Height = 16
    Top = 200
    Width = 79
    Caption = 'Test Specified?'
    ParentColor = False
  end
  object TestSpecifiedEdit: TEdit
    Left = 156
    Height = 23
    Top = 192
    Width = 44
    TabOrder = 9
  end
  object Label3: TLabel
    Left = 9
    Height = 16
    Top = 231
    Width = 74
    Caption = 'No. Specified:'
    ParentColor = False
  end
  object NSpecifiedEdit: TEdit
    Left = 157
    Height = 23
    Top = 226
    Width = 43
    TabOrder = 10
    Text = 'NSpecifiedEdit'
  end
  object MainMenu1: TMainMenu
    left = 272
    top = 72
    object MenuItem1: TMenuItem
      Caption = 'Item Bank'
      object OpenItemBank: TMenuItem
        Caption = 'Open an existing item bank'
        OnClick = OpenItemBankClick
      end
      object NewItemBank: TMenuItem
        Caption = 'Create a new item bank'
        OnClick = NewItemBankClick
      end
      object SaveBankMenu: TMenuItem
        Caption = 'Save Current Item Bank'
        OnClick = SaveBankMenuClick
      end
      object ExitThis: TMenuItem
        Caption = 'Exit this procedure'
        OnClick = ExitThisClick
      end
    end
    object Operations: TMenuItem
      Caption = 'Operations'
      object CreateCodes: TMenuItem
        Caption = 'Create Item Content Codes'
        OnClick = CreateCodesClick
      end
      object ShowCodes: TMenuItem
        Caption = 'Display all codes'
        OnClick = ShowCodesClick
      end
      object MCItems: TMenuItem
        Caption = 'Create or Edit Multiple Choice Items'
        OnClick = MCItemsClick
      end
      object TFItems: TMenuItem
        Caption = 'Create or Edit True-False Items'
        OnClick = TFItemsClick
      end
      object MatchingItems: TMenuItem
        Caption = 'Create or Edit Matching Items'
        OnClick = MatchingItemsClick
      end
      object EssayItems: TMenuItem
        Caption = 'Create or Edit Essay Items'
        OnClick = EssayItemsClick
      end
    end
    object TestOptions: TMenuItem
      Caption = 'Test Options'
      object TestSpecs: TMenuItem
        Caption = 'Specify a test''s Contents'
        OnClick = TestSpecsClick
      end
      object ListItems: TMenuItem
        Caption = 'List all test items'
        OnClick = ListItemsClick
      end
      object PrintTest: TMenuItem
        Caption = 'Print a test to administer'
        OnClick = PrintTestClick
      end
    end
  end
  object OpenDialog1: TOpenDialog
    left = 272
    top = 184
  end
  object SaveDialog1: TSaveDialog
    left = 272
    top = 128
  end
  object SelDir: TSelectDirectoryDialog
    left = 208
    top = 184
  end
end