object Form1: TForm1
  Left = 5
  Top = 26
  Width = 786
  Height = 540
  Caption = 'Flash Cards by Sarai Software'
  Font.Color = clWindowText
  Font.Height = -16
  Font.Name = 'System'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  KeyPreview = True
  Menu = MainMenu1
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnResize = FormResize
  PixelsPerInch = 120
  TextHeight = 20
  object QCard: TPanel
    Left = 0
    Top = 41
    Width = 778
    Height = 451
    Align = alClient
    TabOrder = 0
    object TextEnglish: TDBText
      Left = 8
      Top = 155
      Width = 761
      Height = 125
      Alignment = taCenter
      DataField = 'English'
      DataSource = FrequencySource
      Font.Color = clBlack
      Font.Height = -27
      Font.Name = 'Times New Roman'
      Font.Style = []
      ParentFont = False
      Visible = False
      WordWrap = True
    end
    object TextGreek: TDBText
      Left = 8
      Top = 30
      Width = 769
      Height = 125
      Alignment = taCenter
      DataField = 'Language'
      DataSource = FrequencySource
      Font.Color = clBlack
      Font.Height = -27
      Font.Name = 'Greek Parse'
      Font.Style = []
      ParentFont = False
      WordWrap = True
    end
    object Label2: TLabel
      Left = 752
      Top = 8
      Width = 9
      Height = 9
      AutoSize = False
      Transparent = True
      OnDblClick = Label2DblClick
    end
    object TextFrequency2: TDBText
      Left = 96
      Top = 312
      Width = 30
      Height = 15
      AutoSize = True
      DataField = 'Frequency'
      DataSource = FrequencySource
      Font.Color = clBtnFace
      Font.Height = -13
      Font.Name = 'Times New Roman'
      Font.Style = []
      ParentFont = False
    end
    object QCardButtons: TPanel
      Left = 264
      Top = 316
      Width = 241
      Height = 41
      Caption = 'QCardButtons'
      TabOrder = 0
      Visible = False
      object SpeedButton3: TSpeedButton
        Left = 0
        Top = 0
        Width = 61
        Height = 41
        Caption = '<<'
        OnClick = SpeedButton3Click
      end
      object SpeedButton1: TSpeedButton
        Left = 60
        Top = 0
        Width = 61
        Height = 41
        Caption = '<'
        OnClick = SpeedButton1Click
      end
      object SpeedButton2: TSpeedButton
        Left = 120
        Top = 0
        Width = 61
        Height = 41
        Caption = '>'
        OnClick = SpeedButton2Click
      end
      object SpeedButton4: TSpeedButton
        Left = 180
        Top = 0
        Width = 61
        Height = 41
        Caption = '>>'
        OnClick = SpeedButton4Click
      end
    end
    object StatusBar1: TStatusBar
      Left = 1
      Top = 426
      Width = 776
      Height = 24
      Hint = 'Card '
      Font.Color = clNavy
      Font.Height = -20
      Font.Name = 'Times New Roman'
      Font.Style = []
      Panels = <
        item
          Text = 'RecID'
          Width = 120
        end
        item
          Text = 'Frequency'
          Width = 100
        end>
      ParentFont = False
      ParentShowHint = False
      ShowHint = False
      SimplePanel = False
      SizeGrip = False
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 778
    Height = 41
    Align = alTop
    Alignment = taRightJustify
    Font.Color = clWindowText
    Font.Height = -22
    Font.Name = 'TimesNewRoman'
    Font.Style = []
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 1
    object FrequencyCards: TSpeedButton
      Left = 0
      Top = 0
      Width = 41
      Height = 41
      Hint = 'Open'
      Font.Color = clBlack
      Font.Height = -33
      Font.Name = 'Greek'
      Font.Style = [fsBold]
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333FF3333333333333C0C333333333333F777F3333333333CC0F0C3
        333333333777377F33333333C30F0F0C333333337F737377F333333C00FFF0F0
        C33333F7773337377F333CC0FFFFFF0F0C3337773F33337377F3C30F0FFFFFF0
        F0C37F7373F33337377F00FFF0FFFFFF0F0C7733373F333373770FFFFF0FFFFF
        F0F073F33373F333373730FFFFF0FFFFFF03373F33373F333F73330FFFFF0FFF
        00333373F33373FF77333330FFFFF000333333373F333777333333330FFF0333
        3333333373FF7333333333333000333333333333377733333333333333333333
        33333333333333333333333333333333333333333333333333330000}
      Layout = blGlyphRight
      NumGlyphs = 2
      ParentFont = False
      OnClick = Open1Click
    end
    object FontButton: TSpeedButton
      Left = 40
      Top = 0
      Width = 41
      Height = 41
      Hint = 'Change the font.'
      Glyph.Data = {
        A2030000424DA2030000000000007600000028000000380000001D0000000100
        0400000000002C030000000000000000000010000000100000006B0000001578
        1F00525252005A5A00007B8400007B524A008C5A0000A510080000635A000063
        6300006B6B0000736B00080873008080800000089C00FFFFFF00BBBBBBBBBBBB
        BBBBBBBBBBBBBBBBBFFBBBBFFFFBBBBFFBBBFFBFFBBBB77BBBB4444BBBBEEBBB
        EEB11BBBDDFBBBDDDDDFBBDDFBBDDFDDFBBBB77BBB444444BBBEEBBBEEB11BBB
        DDFBBDDDDDDDFBDDFBBDDFDDFBBBB77BB44BBBB44BBEEBBBEEB11BBBDDFBDDBB
        BBDDDFDDFBBDDFDDFBBBB77B44BBBBBB44BEEBBEEEB11BBBDDFDDFBBBBBDDFDD
        FBDDDFDDFBBBB77B44BBBBBB44BEEBEEEEB11BBBDDFDDFBBBBBDDFDDFDDDDFDD
        FBBBB77B44BBBBBB44BEEBEEEEB11BBBDDFDDFBBBBBDDFDDFDDDDFDDFBBBB77B
        44BBBBBB44BEEEEBEEB11BBBDDFDDFBBBBBDDFDDDDBDDFDDFBBBB77B44BBBBBB
        44BEEEEBEEB11BBBDDFDDFBBBBBDDFDDDDBDDFDDFBBBB77B44BBBBBB44BEEEBB
        EEB11BBBDDFDDFBBBBBDDBDDDBBDDFDDFBBBB77BB44BBBB44BBEEEBBEEB11BBB
        DDFBDDFFFFFDBBDDDBBDDFDDFBBBB77BBB444444BBBEEBBBEEB11BBBDDFBBDDD
        DDDBBBDDBBBDDFDDFBBBB77BBBB4444BBBBEBBBBEEB11BBBDDFBBBDDDDBBBBDB
        BBBDDBDDFBBBB77BBBBBBBBBBBBBBBBBBBB11BBBDDFBBBBBBBBBBBBBBBBBBBDD
        FBBBB77BBBBBBBBBBBBBBBBBBBB11BBBDDFFFFFFFFFFFBBBBBBBBBDDFBBBB777
        777777777BBBBBBBBBB11BBBDDDDDDDDDDDDFBBBBBBBBBDDFBBBB77777777777
        7BBBBBBBBBB11BBBDDDDDDDDDDDDBBBBBBBBBBDDFBBBB77BBBBBBBBBBBBBBBBB
        BBB11BBBDDFBBBBBBBBBBBBBBBBBBBDDFBBBB77BBBBBBBBBBBBBBBBBBBB11BBB
        DDFBBBBBBBBBBBBBBBBBBBDDFFFFB77BBBBBBBBBBBBBBBBB1111111BDDFBBBBB
        BBBBBBBBBBBDDDDDDDDFB77BBBBBBBBBBBBBBBBB1111111BDDFBBBBBBBBBBBBB
        BBBDDDDDDDDBB77BBBBBBBBBBBBBBBBBBBBBBBBBDDFBBBBBBBBBBBBBBBBBBBBB
        BBBBB77BBBBBBBBBBBBBBBBBBBBBBBBBDDFBBBBBBBBBBBBBBBBBBBBBBBBBB77B
        BBBBBBBBBBBBBBBBBBBBBBBBDDFBBBBBBBBBBBBBBBBBBBBBBBBBB77BBBBBBBBB
        BBBBBBBBBBBBBBBBDDFBBBBBBBBBBBBBBBBBBBBBBBBBB77BBBBBBBBBBBBBBBBB
        BBBBBBBBDDFFFFFFFFFFFFFFFFFFBBBBBBBBB7777777777777777777BBBBBBBB
        DDDDDDDDDDDDDDDDDDDFBBBBBBBBB7777777777777777777BBBBBBBBDDDDDDDD
        DDDDDDDDDDDBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB
        BBBBBBBBBBBB}
      NumGlyphs = 2
      OnClick = FontButtonClick
    end
    object ButtonAdd: TSpeedButton
      Left = 80
      Top = 0
      Width = 41
      Height = 41
      Hint = 'Add/Edit custom word.'
      AllowAllUp = True
      Enabled = False
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
        000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
        00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
        F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
        0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
        FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
        FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
        0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
        00333377737FFFFF7733333033000000033333373377777773330000}
      NumGlyphs = 2
      OnClick = ButtonAddClick
    end
    object FrequencyComboBox: TComboBox
      Left = 232
      Top = 4
      Width = 289
      Height = 33
      Style = csDropDownList
      Color = clWhite
      Font.Color = clMaroon
      Font.Height = -22
      Font.Name = 'Times New Roman'
      Font.Style = []
      ItemHeight = 25
      ParentFont = False
      ParentShowHint = False
      ShowHint = False
      TabOrder = 0
      OnChange = FrequencyComboBoxChange
    end
  end
  object FrequencySource: TDataSource
    DataSet = FrequencyTable
    OnDataChange = FrequencySourceDataChange
    Left = 704
    Top = 248
  end
  object FrequencyTable: TTable
    Active = True
    AfterPost = FrequencyTableAfterPost
    AfterDelete = FrequencyTableAfterDelete
    DatabaseName = 'FLASH32'
    TableName = 'cardsfrq.DB'
    Left = 672
    Top = 248
  end
  object MainMenu1: TMainMenu
    Left = 656
    Top = 281
    object File1: TMenuItem
      Caption = 'F&ile'
      ShortCut = 0
      object New1: TMenuItem
        Caption = '&New...'
        ShortCut = 0
        OnClick = New1Click
      end
      object Open1: TMenuItem
        Caption = '&Open...'
        ShortCut = 0
        OnClick = Open1Click
      end
      object N2: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object Exit1: TMenuItem
        Caption = 'E&xit'
        ShortCut = 0
        OnClick = Exit1Click
      end
    end
    object CardSet1: TMenuItem
      Caption = 'C&ard Set'
      ShortCut = 0
      object Frequency1: TMenuItem
        Caption = 'NT &Frequency'
        ShortCut = 0
        OnClick = Frequency1Click
      end
    end
    object Sort1: TMenuItem
      Caption = '&Sort List'
      ShortCut = 0
      object Alphabetcally1: TMenuItem
        Caption = '&Alphabetically'
        ShortCut = 0
        OnClick = Alphabetically1Click
      end
      object ShowGreek1: TMenuItem
        Caption = 'S&how Greek'
        ShortCut = 0
        OnClick = ShowGreek1Click
      end
      object ShowFrequency1: TMenuItem
        Caption = 'Show &Frequency'
        ShortCut = 0
        OnClick = ShowFrequency1Click
      end
    end
    object Tools1: TMenuItem
      Caption = '&Tools'
      ShortCut = 0
      object Font1: TMenuItem
        Caption = 'F&ont'
        ShortCut = 0
        OnClick = FontButtonClick
      end
      object AddEditCustomCards1: TMenuItem
        Caption = '&Add/Edit Custom Cards'
        Enabled = False
        ShortCut = 0
        OnClick = ButtonAddClick
      end
    end
    object Help1: TMenuItem
      Caption = 'H&elp'
      ShortCut = 0
      object Contents1: TMenuItem
        Caption = 'C&ontents'
        ShortCut = 0
        OnClick = Contents1Click
      end
      object N1: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object About1: TMenuItem
        Caption = 'A&bout'
        ShortCut = 0
        OnClick = About1Click
      end
    end
  end
  object FontDialog1: TFontDialog
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'System'
    Font.Style = []
    MinFontSize = 0
    MaxFontSize = 0
    Options = []
    Left = 688
    Top = 281
  end
  object OpenDialog1: TOpenDialog
    DefaultExt = '*.SDB'
    FileEditStyle = fsComboBox
    Filter = 'Card Set *.SDB|*.SDB'
    Options = [ofHideReadOnly, ofFileMustExist]
    Title = 'Open'
    Left = 720
    Top = 281
  end
  object SaveDialog1: TSaveDialog
    DefaultExt = '*.SDB'
    FileEditStyle = fsComboBox
    Filter = 'Card Set  *.SDB|*.SDB'
    Options = [ofOverwritePrompt, ofHideReadOnly, ofFileMustExist]
    Title = 'Save'
    Left = 640
    Top = 313
  end
end