object Form1: TForm1
  Left = 0
  Top = 0
  Caption = 'TagEdit6 demo 2'
  ClientHeight = 341
  ClientWidth = 700
  Color = clBtnFace
  Constraints.MinHeight = 350
  Constraints.MinWidth = 700
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Segoe UI'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnCreate = FormCreate
  DesignSize = (
    700
    341)
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 24
    Top = 8
    Width = 205
    Height = 37
    Caption = 'Test your English!'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -27
    Font.Name = 'Segoe UI'
    Font.Style = []
    ParentFont = False
  end
  object Label2: TLabel
    Left = 24
    Top = 47
    Width = 641
    Height = 59
    AutoSize = False
    Caption = 
      'This is an exercise to practise the order of adjectives in Engli' +
      'sh.  The simple rule is that the adjectives should come before t' +
      'he noun and be in the order of the most general to most specific' +
      '. But can you remember the exact order?'
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -13
    Font.Name = 'Segoe UI'
    Font.Style = []
    ParentFont = False
    WordWrap = True
  end
  object Label3: TLabel
    Left = 24
    Top = 215
    Width = 641
    Height = 65
    AutoSize = False
    Caption = 
      'In the randomly arranged tag list, drag the adjective words out ' +
      'of the list and drop them in the correct order. Notice how the m' +
      'ouse cursor changes depending on your action.  Click the '#39'Try Ag' +
      'ain'#39' button to have another go. Good luck! '
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -13
    Font.Name = 'Segoe UI'
    Font.Style = []
    ParentFont = False
    WordWrap = True
  end
  object Label4: TLabel
    Left = 24
    Top = 196
    Width = 69
    Height = 15
    Caption = 'Instructions:'
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -12
    Font.Name = 'Segoe UI'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object SadFaceImage: TImage
    Left = 296
    Top = 139
    Width = 48
    Height = 48
    Hint = 'Sorry, it'#39's not quite correct.'
    ParentShowHint = False
    Picture.Data = {
      [encoded data, 11200 characters]
      44AE426082}
    ShowHint = True
    Stretch = True
  end
  object HappyfaceImage: TImage
    Left = 312
    Top = 139
    Width = 48
    Height = 48
    Hint = 'Yes, You'#39're got it!'
    ParentShowHint = False
    Picture.Data = {
      [encoded data, 10752 characters]
      44AE426082}
    ShowHint = True
    Stretch = True
    Visible = False
  end
  object GreenTickImage: TImage
    Left = 498
    Top = 143
    Width = 48
    Height = 48
    Picture.Data = {
      0954506E67496D61676589504E470D0A1A0A0000000D49484452000000300000
      002E08060000006EDE9A6C000000017352474200AECE1CE90000000467414D41
      0000B18F0BFC6105000000097048597300000EC300000EC301C76FA864000000
      1874455874536F667477617265007061696E742E6E657420342E312E338D24FD
      67000003B04944415478DAED986B48145114C7CF8C51A6B9A95922D28384D0B0
      40506A3335EC296A54420A2269F4DAB55D8D3595FA20F6F8B09BAE66DA0B7B18
      2451F6221F6D16F4B23428D252282CC82CAA0F3DCD5D5DB7D32C519673679D95
      D99911FAEFB77376EEFC7F30F7DC730F8588309A45FD07F80FC0AD73374AB1EB
      DD33E8FED009E6FE2FE0E9AE80E2ACEB94AC01CEDE30E2FDB67AB0587B81827F
      BCC2E2F014488AD5C8174057B61CCD961E622E3C6409AC4F2CA486C66503A036
      2C608C50C4DC8C8060C84D3B464CCA02C091791FAFC9B0577589E27A5672806D
      254BB0CF6A26E6DCC78D07E3904D2B2B80C2CA147CFFF1353147D36E509E739B
      1A6E0DC9004ED616E2838E6BC41C32BF43B9F786352F2980CAA0440A68A2FD88
      D9CB2123A140BE00D925B1D86FED23E6A6F9CF82FC752778999704C058ADC6CE
      EE56626E82C744306CADE76D5E12001553322942C9A4280A2AB6DF75CABCE800
      9AA268B4FDB0B1E2F64DBB326A13C429D3E50BA03FB51E5F318D1949A1414A50
      2715396D5E5400B52192F822DF89FEB067F3851199170D405B1C8303B60156DC
      8D39AC0EF038AC2405283DA3C1E75D8F081984833C0F2B4901547AE6C0A2D807
      56C88C08D0AC2D953780B67811F3E95859712FA6DEEB9DACF7A20354D4E8B0FD
      6533FB8523ACF7A20370F5F831616B2079A94EDE0079E5F1F8ADF7332BEEEF3B
      150A369C11CCBC4B00AA4D06BCDB7A9915A7699AE9EFEF086ADE25005BF4F391
      A6DC86449169133220316AA3F800176F56604BBB093E7E7B0B0A8F4950A43571
      9AE0BA61054E09829DE9A704373F2C00E95B56CE8987B4B81D2C33F54DC7B1B6
      A912866EDC316E63A04C77CB25E61D02641963D13AC0BE74B88FF500637623CB
      908669176C847661D9BC545815A31617E0CA9DA3D870BF8AF800E9BE5A7C7A0B
      BE78F384F55F3FEF00D8B5A9C665E63901ECE3BD9B0FCF733E143C3D1CB4C9FB
      FF18235D52843EB09C02B08BABFDFDA5C1462C73DF4224AD113937115257E44B
      07C0D584FD96C2D3172CFDBDD06FB5B0725E1EDE4CAF53E772F30E01B697C5E1
      77CBD7112D7A30B74914F30E01AAEA7763CBD3AB4E2F3833301472528F480F60
      17D704814B34B371CB45D8B8BC01D4062593A4792F161DB61A5296E6C807C058
      ADC2CEEE365E0B798E57C03E4D83A8E68705B0CBD1EC7E50C2DC6F5D02B0AD64
      31F6114AE5DFF2F2F4017D66AD3C01EA9826ADAEE91867FE07DAE0705EB324E6
      7901D8F56B20FB1880D52E807D1C08090B85EFF30505B0CBD45C850F3A1AA1C7
      FC8929973404F805815680B188680072D5A807F809DB61CBB4A16EC981000000
      0049454E44AE426082}
    Visible = False
  end
  object Label5: TLabel
    Left = 24
    Top = 444
    Width = 641
    Height = 38
    AutoSize = False
    Caption = 
      'The grid shows, broadly, the order of the adjectives; of course,' +
      ' being English there are exceptions! (for example, the adjective' +
      ' '#39'little'#39').  As well as the answer to the puzzle, other examples' +
      ' are given. '
    Font.Charset = ANSI_CHARSET
    Font.Color = clMaroon
    Font.Height = -13
    Font.Name = 'Segoe UI'
    Font.Style = []
    ParentFont = False
    WordWrap = True
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 322
    Width = 700
    Height = 19
    Panels = <
      item
        Width = 100
      end
      item
        Width = 250
      end
      item
        Width = 200
      end>
  end
  object tagWords: TNxTagsEdit6
    Left = 136
    Top = 112
    Width = 426
    Height = 25
    Anchors = [akLeft, akTop, akRight]
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Segoe UI'
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    StyleOptions = []
    TabOrder = 1
    OnMouseDown = tagWordsMouseDown
    OnMouseMove = tagWordsMouseMove
    OnMouseUp = tagWordsMouseUp
    Tags.Strings = (
      'NxTagsEdit61')
    Separators = ' ,;|'
    OnGetTagColor = tagWordsGetTagColor
    OnTagDelete = tagWordsTagDelete
  end
  object btnTryAgain: TNxButton6
    Left = 568
    Top = 112
    Width = 75
    Height = 25
    Anchors = [akTop, akRight]
    TabOrder = 2
    TabStop = False
    OnClick = btnTryAgainClick
    Caption = 'Try Again'
    EnableDblClick = False
  end
  object btnSolution: TNxButton6
    Left = 38
    Top = 284
    Width = 113
    Height = 25
    Anchors = [akTop, akRight]
    TabOrder = 3
    TabStop = False
    OnClick = btnSolutionClick
    Caption = 'See Solution'
    EnableDblClick = False
  end
  object NextGrid61: TNextGrid6
    Left = 8
    Top = 341
    Width = 684
    Height = 97
    Color = clCream
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Segoe UI'
    Font.Style = []
    ParentColor = False
    ParentFont = False
    TabOrder = 4
    ActiveView = NxReportGridView61
    ActiveViewIndex = 0
    ReadOnly = True
    ScrollBars = [sbHorizontal, sbVertical]
    SelectFullRow = True
    SelectionColor = 55295
    object NxReportGridView61: TNxReportGridView6
      ColumnMoving = False
      GridLines = True
    end
    object NxTextColumn61: TNxTextColumn6
      Color = clCream
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Segoe UI'
      Font.Style = []
      Footer.Font.Charset = DEFAULT_CHARSET
      Footer.Font.Color = clWindowText
      Footer.Font.Height = -11
      Footer.Font.Name = 'Tahoma'
      Footer.Font.Style = []
      Footer.FormatMask = '#,##0.00'
      Header.Caption = 'Opinion'
      Header.Font.Charset = ANSI_CHARSET
      Header.Font.Color = clWindowText
      Header.Font.Height = -11
      Header.Font.Name = 'Segoe UI'
      Header.Font.Style = [fsBold]
      Index = 0
      ParentColor = False
      PlaceholderText = 'Text Text'
      Position = 0
      Width = 70
    end
    object NxTextColumn62: TNxTextColumn6
      Color = clCream
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Segoe UI'
      Font.Style = []
      Footer.Font.Charset = DEFAULT_CHARSET
      Footer.Font.Color = clWindowText
      Footer.Font.Height = -11
      Footer.Font.Name = 'Tahoma'
      Footer.Font.Style = []
      Footer.FormatMask = '#,##0.00'
      Header.Caption = 'Size'
      Header.Font.Charset = ANSI_CHARSET
      Header.Font.Color = clWindowText
      Header.Font.Height = -11
      Header.Font.Name = 'Segoe UI'
      Header.Font.Style = [fsBold]
      Index = 1
      ParentColor = False
      PlaceholderText = 'Text Text'
      Position = 1
      Width = 70
    end
    object NxTextColumn63: TNxTextColumn6
      Color = clCream
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Segoe UI'
      Font.Style = []
      Footer.Font.Charset = DEFAULT_CHARSET
      Footer.Font.Color = clWindowText
      Footer.Font.Height = -11
      Footer.Font.Name = 'Tahoma'
      Footer.Font.Style = []
      Footer.FormatMask = '#,##0.00'
      Header.Caption = 'Age'
      Header.Font.Charset = ANSI_CHARSET
      Header.Font.Color = clWindowText
      Header.Font.Height = -11
      Header.Font.Name = 'Segoe UI'
      Header.Font.Style = [fsBold]
      Index = 2
      ParentColor = False
      PlaceholderText = 'Text Text'
      Position = 2
      Width = 70
    end
    object NxTextColumn64: TNxTextColumn6
      Color = clCream
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Segoe UI'
      Font.Style = []
      Footer.Font.Charset = DEFAULT_CHARSET
      Footer.Font.Color = clWindowText
      Footer.Font.Height = -11
      Footer.Font.Name = 'Tahoma'
      Footer.Font.Style = []
      Footer.FormatMask = '#,##0.00'
      Header.Caption = 'Shape'
      Header.Font.Charset = ANSI_CHARSET
      Header.Font.Color = clWindowText
      Header.Font.Height = -11
      Header.Font.Name = 'Segoe UI'
      Header.Font.Style = [fsBold]
      Index = 3
      ParentColor = False
      PlaceholderText = 'Text Text'
      Position = 3
      Width = 70
    end
    object NxTextColumn65: TNxTextColumn6
      Color = clCream
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Segoe UI'
      Font.Style = []
      Footer.Font.Charset = DEFAULT_CHARSET
      Footer.Font.Color = clWindowText
      Footer.Font.Height = -11
      Footer.Font.Name = 'Tahoma'
      Footer.Font.Style = []
      Footer.FormatMask = '#,##0.00'
      Header.Caption = 'Colour'
      Header.Font.Charset = ANSI_CHARSET
      Header.Font.Color = clWindowText
      Header.Font.Height = -11
      Header.Font.Name = 'Segoe UI'
      Header.Font.Style = [fsBold]
      Index = 4
      ParentColor = False
      PlaceholderText = 'Text Text'
      Position = 4
      Width = 70
    end
    object NxTextColumn66: TNxTextColumn6
      Color = clCream
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Segoe UI'
      Font.Style = []
      Footer.Font.Charset = DEFAULT_CHARSET
      Footer.Font.Color = clWindowText
      Footer.Font.Height = -11
      Footer.Font.Name = 'Tahoma'
      Footer.Font.Style = []
      Footer.FormatMask = '#,##0.00'
      Header.Caption = 'Origin'
      Header.Font.Charset = ANSI_CHARSET
      Header.Font.Color = clWindowText
      Header.Font.Height = -11
      Header.Font.Name = 'Segoe UI'
      Header.Font.Style = [fsBold]
      Index = 5
      ParentColor = False
      PlaceholderText = 'Text Text'
      Position = 5
      Width = 70
    end
    object NxTextColumn67: TNxTextColumn6
      Color = clCream
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Segoe UI'
      Font.Style = []
      Footer.Font.Charset = DEFAULT_CHARSET
      Footer.Font.Color = clWindowText
      Footer.Font.Height = -11
      Footer.Font.Name = 'Tahoma'
      Footer.Font.Style = []
      Footer.FormatMask = '#,##0.00'
      Header.Caption = 'Very Specific'
      Header.Font.Charset = ANSI_CHARSET
      Header.Font.Color = clWindowText
      Header.Font.Height = -11
      Header.Font.Name = 'Segoe UI'
      Header.Font.Style = [fsBold]
      Index = 6
      ParentColor = False
      PlaceholderText = 'Text Text'
      Position = 6
      Width = 90
    end
    object NxTextColumn68: TNxTextColumn6
      Color = clCream
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Segoe UI'
      Font.Style = []
      Footer.Font.Charset = DEFAULT_CHARSET
      Footer.Font.Color = clWindowText
      Footer.Font.Height = -11
      Footer.Font.Name = 'Tahoma'
      Footer.Font.Style = []
      Footer.FormatMask = '#,##0.00'
      Header.Caption = 'Purpose'
      Header.Font.Charset = ANSI_CHARSET
      Header.Font.Color = clWindowText
      Header.Font.Height = -11
      Header.Font.Name = 'Segoe UI'
      Header.Font.Style = [fsBold]
      Index = 7
      ParentColor = False
      PlaceholderText = 'Text Text'
      Position = 7
      Width = 70
    end
    object NxTextColumn69: TNxTextColumn6
      Color = 14745599
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Segoe UI'
      Font.Style = []
      Footer.Font.Charset = DEFAULT_CHARSET
      Footer.Font.Color = clWindowText
      Footer.Font.Height = -11
      Footer.Font.Name = 'Tahoma'
      Footer.Font.Style = []
      Footer.FormatMask = '#,##0.00'
      Header.Caption = 'Noun'
      Header.Font.Charset = ANSI_CHARSET
      Header.Font.Color = clWindowText
      Header.Font.Height = -11
      Header.Font.Name = 'Segoe UI'
      Header.Font.Style = [fsBold]
      Index = 8
      ParentColor = False
      PlaceholderText = 'Text Text'
      Position = 8
      Width = 70
    end
  end
end
