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

object GradebookFrm: TGradebookFrm
  Left = 22
  Height = 541
  Top = 86
  Width = 956
  Caption = 'Gradebook'
  ClientHeight = 522
  ClientWidth = 956
  Menu = MainMenu1
  OnCreate = FormCreate
  OnShow = FormShow
  LCLVersion = '0.9.28.2'
  object Label1: TLabel
    Left = 46
    Height = 25
    Top = 13
    Width = 247
    Caption = 'YOUR GRADEBOOK FOR:'
    Font.CharSet = ANSI_CHARSET
    Font.Color = clBlack
    Font.Height = -21
    Font.Name = 'Times New Roman'
    Font.Pitch = fpVariable
    Font.Quality = fqDraft
    Font.Style = [fsBold, fsItalic]
    ParentColor = False
    ParentFont = False
  end
  object Label2: TLabel
    Left = 8
    Height = 14
    Top = 48
    Width = 21
    Caption = 'File:'
    ParentColor = False
  end
  object Label3: TLabel
    Left = 56
    Height = 14
    Top = 80
    Width = 179
    Caption = 'Directory (click folder icon to change)'
    ParentColor = False
  end
  object FileNameEdit: TEdit
    Left = 40
    Height = 21
    Top = 46
    Width = 252
    TabOrder = 0
    Text = 'FileNameEdit'
  end
  object DirectoryEdit1: TDirectoryEdit
    Left = 8
    Height = 21
    Top = 104
    Width = 284
    Directory = 'C:'
    ShowHidden = False
    ButtonWidth = 23
    NumGlyphs = 0
    TabOrder = 1
    OnChange = DirectoryEdit1Change
  end
  object FileListBox1: TFileListBox
    Left = 7
    Height = 293
    Top = 145
    Width = 287
    Directory = 'C:\Windows\system32'
    ItemHeight = 13
    TabOrder = 2
  end
  object ResetBtn: TButton
    Left = 8
    Height = 29
    Top = 447
    Width = 98
    Caption = 'Start New'
    TabOrder = 3
  end
  object ExitBtn: TButton
    Left = 9
    Height = 29
    Top = 480
    Width = 97
    Caption = 'Exit'
    ModalResult = 1
    OnClick = ExitBtnClick
    TabOrder = 4
  end
  object Grid: TStringGrid
    Left = 320
    Height = 504
    Top = 0
    Width = 628
    ColCount = 58
    FixedCols = 0
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing, goTabs, goSmoothScroll]
    RowCount = 41
    TabOrder = 5
    OnExit = GridExit
  end
  object RadioGroup1: TRadioGroup
    Left = 129
    Height = 61
    Top = 447
    Width = 163
    AutoFill = True
    Caption = 'Name Protection:'
    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 = 43
    ClientWidth = 159
    ItemIndex = 1
    Items.Strings = (
      'Turn ON'
      'Turn OFF'
    )
    OnClick = RadioGroup1Click
    TabOrder = 6
  end
  object MainMenu1: TMainMenu
    left = 304
    object FilesMenu: TMenuItem
      Caption = 'Files'
      object NewGBMnu: TMenuItem
        Caption = 'New Grade Book'
        OnClick = NewGBMnuClick
      end
      object OpenGBMnu: TMenuItem
        Caption = 'Open Existing Grade Book'
        OnClick = OpenGBMnuClick
      end
      object SaveGBMnu: TMenuItem
        Caption = 'Save Grade Book'
        OnClick = SaveGBMnuClick
      end
      object ExitMnu: TMenuItem
        Caption = 'Exit'
        OnClick = ExitMnuClick
      end
    end
    object EditMnu: TMenuItem
      Caption = 'Edit'
      object DelRowMnu: TMenuItem
        Caption = 'Delete Current Row'
        OnClick = DelRowMnuClick
      end
    end
    object ComputeMenu: TMenuItem
      Caption = 'Compute'
      object TestAnalMnu: TMenuItem
        Caption = 'Analyze a Test'
        OnClick = TestAnalMnuClick
      end
      object CompScrMnu: TMenuItem
        Caption = 'Calc. Composite Score'
        OnClick = CompScrMnuClick
      end
    end
    object ReportsMenu: TMenuItem
      Caption = 'Reports'
      object StudRptsMnu: TMenuItem
        Caption = 'Individual Student Reports'
        OnClick = StudRptsMnuClick
      end
      object ClassRptMnu: TMenuItem
        Caption = 'Class Report'
        OnClick = ClassRptMnuClick
      end
    end
    object HelpMenu: TMenuItem
      Caption = 'Help'
      Visible = False
    end
  end
  object SaveDialog1: TSaveDialog
    left = 189
    top = 1
  end
  object OpenDialog1: TOpenDialog
    left = 258
    top = 1
  end
end