Chip 2003 January/Chip_2003-01_cd1.bin/zkuste/delphi/kolekce/d567/FLEXCEL.ZIP/Demo/FlDemo/UFlDemo.dfm

Text File | 2002-10-09 | 37.9 KB | 1,382 lines

object Main: TMain
  Left = 75
  Top = 106
  Width = 845
  Height = 529
  Caption = 'FlexCel Component Suite Demo'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 837
    Height = 483
    Align = alClient
    BevelOuter = bvNone
    TabOrder = 0
    object Splitter1: TSplitter
      Left = 233
      Top = 38
      Width = 3
      Height = 445
      Cursor = crHSplit
    end
    object ListDemos: TTreeView
      Left = 0
      Top = 38
      Width = 233
      Height = 445
      Align = alLeft
      HideSelection = False
      Indent = 19
      ReadOnly = True
      TabOrder = 0
      OnChange = ListDemosChange
      Items.Data = {
        020000001E0000000000000000000000FFFFFFFFFFFFFFFF0000000002000000
        0544656D6F731F0000000100000001000000FFFFFFFFFFFFFFFF000000000D00
        0000065265706F7274310000000300000003000000FFFFFFFFFFFFFFFF000000
        000000000018566572792073696D706C652064656D6F20284E6F204442293300
        00000300000003000000FFFFFFFFFFFFFFFF00000000000000001A4172726179
        206F662076617269616E74732020284E6F204442292B00000003000000030000
        00FFFFFFFFFFFFFFFF000000000000000012496D6167652044656D6F20284E6F
        20444229220000000300000000000000FFFFFFFFFFFFFFFF0000000000000000
        094462207265706F72742F0000000300000003000000FFFFFFFFFFFFFFFF0000
        000000000000164D756C7469706C65204D61737465722D44657461696C280000
        000300000003000000FFFFFFFFFFFFFFFF00000000000000000F4D756C746970
        6C6520736865657473240000000300000003000000FFFFFFFFFFFFFFFF000000
        00000000000B5069766F74205461626C651F0000000300000003000000FFFFFF
        FFFFFFFFFF0000000000000000064368617274732C0000000300000003000000
        FFFFFFFFFFFFFFFF000000000000000013496D6167657320616E6420636F6D6D
        656E7473330000000300000003000000FFFFFFFFFFFFFFFF0000000000000000
        1A496D6167657320616E64206D756C7469706C65207368656574732400000003
        00000003000000FFFFFFFFFFFFFFFF00000000000000000B437573746F6D2064
        6174612D0000000300000003000000FFFFFFFFFFFFFFFF000000000000000014
        53696465206279205369646520436F6C756D6E73300000000000000000000000
        FFFFFFFFFFFFFFFF0000000000000000174D656D6F7279204461746173657473
        20284E6F204442291F0000000200000002000000FFFFFFFFFFFFFFFF00000000
        0200000006496D706F7274220000000400000004000000FFFFFFFFFFFFFFFF00
        0000000000000009526561642066696C65240000000400000004000000FFFFFF
        FFFFFFFFFF00000000000000000B4372656174652066696C6531000000050000
        0005000000FFFFFFFFFFFFFFFF000000000000000018536F6D6520776F726473
        2061626F757420466C657843656C}
    end
    object Tabs: TPageControl
      Left = 236
      Top = 38
      Width = 601
      Height = 445
      ActivePage = TabSheet11
      Align = alClient
      TabOrder = 1
      TabPosition = tpBottom
      object TabSheet1: TTabSheet
        Caption = '1'
        object Panel2: TPanel
          Left = 0
          Top = 0
          Width = 593
          Height = 417
          Align = alClient
          BevelOuter = bvLowered
          Color = clWindow
          TabOrder = 0
          object TxtWelcome: TRichEdit
            Left = 1
            Top = 1
            Width = 591
            Height = 415
            Align = alClient
            ReadOnly = True
            ScrollBars = ssBoth
            TabOrder = 0
          end
        end
      end
      object TabSheet2: TTabSheet
        Caption = '2'
        ImageIndex = 1
        object Panel3: TPanel
          Left = 0
          Top = 0
          Width = 593
          Height = 417
          Align = alClient
          BevelOuter = bvLowered
          Color = clWindow
          TabOrder = 0
          object TPanel
            Left = 1
            Top = 1
            Width = 591
            Height = 32
            Align = alTop
            Color = clHighlight
            TabOrder = 0
            object Label3: TLabel
              Left = 9
              Top = 8
              Width = 41
              Height = 16
              Caption = 'Report'
              Color = clHighlight
              Font.Charset = ANSI_CHARSET
              Font.Color = clHighlightText
              Font.Height = -13
              Font.Name = 'Arial'
              Font.Style = [fsBold, fsItalic]
              ParentColor = False
              ParentFont = False
            end
          end
          object TxtReport: TRichEdit
            Left = 1
            Top = 33
            Width = 591
            Height = 383
            Align = alClient
            ReadOnly = True
            ScrollBars = ssBoth
            TabOrder = 1
          end
        end
      end
      object TabSheet3: TTabSheet
        Tag = 1
        Caption = '3'
        ImageIndex = 2
        object Panel4: TPanel
          Left = 0
          Top = 0
          Width = 593
          Height = 417
          Align = alClient
          BevelOuter = bvLowered
          Color = clWindow
          TabOrder = 0
          object TPanel
            Left = 1
            Top = 1
            Width = 591
            Height = 32
            Align = alTop
            Color = clHighlight
            TabOrder = 0
            object Label2: TLabel
              Left = 9
              Top = 8
              Width = 162
              Height = 16
              Caption = 'Very simple demo (no DB)'
              Color = clHighlight
              Font.Charset = ANSI_CHARSET
              Font.Color = clHighlightText
              Font.Height = -13
              Font.Name = 'Arial'
              Font.Style = [fsBold, fsItalic]
              ParentColor = False
              ParentFont = False
            end
          end
          object TxtSimpleDemo: TRichEdit
            Left = 1
            Top = 33
            Width = 591
            Height = 383
            Align = alClient
            ReadOnly = True
            ScrollBars = ssBoth
            TabOrder = 1
          end
        end
      end
      object TabSheet4: TTabSheet
        Tag = 2
        Caption = '4'
        ImageIndex = 3
        object Panel5: TPanel
          Left = 0
          Top = 0
          Width = 593
          Height = 417
          Align = alClient
          BevelOuter = bvLowered
          Color = clWindow
          TabOrder = 0
          object TPanel
            Left = 1
            Top = 1
            Width = 591
            Height = 32
            Align = alTop
            Color = clHighlight
            TabOrder = 0
            object Label1: TLabel
              Left = 9
              Top = 8
              Width = 153
              Height = 16
              Caption = 'Array of variants (No DB)'
              Color = clHighlight
              Font.Charset = ANSI_CHARSET
              Font.Color = clHighlightText
              Font.Height = -13
              Font.Name = 'Arial'
              Font.Style = [fsBold, fsItalic]
              ParentColor = False
              ParentFont = False
            end
          end
          object TxtVarArr: TRichEdit
            Left = 1
            Top = 33
            Width = 591
            Height = 215
            Align = alClient
            ReadOnly = True
            ScrollBars = ssBoth
            TabOrder = 1
          end
          object Panel6: TPanel
            Left = 1
            Top = 248
            Width = 591
            Height = 168
            Align = alBottom
            BevelOuter = bvNone
            Color = 10672861
            TabOrder = 2
            object Label4: TLabel
              Left = 16
              Top = 8
              Width = 203
              Height = 13
              Caption = 'Fill in the values you want to send to Excel:'
            end
            object PageControl1: TPageControl
              Left = 16
              Top = 24
              Width = 561
              Height = 137
              ActivePage = TabSheet15
              Anchors = [akLeft, akTop, akRight]
              TabOrder = 0
              TabPosition = tpBottom
              object TabSheet15: TTabSheet
                Caption = 'Sheet 1'
                object GridVarArray1: TStringGrid
                  Left = 8
                  Top = 0
                  Width = 329
                  Height = 105
                  DefaultRowHeight = 18
                  Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing]
                  ScrollBars = ssNone
                  TabOrder = 0
                end
              end
              object TabSheet16: TTabSheet
                Caption = 'Sheet2'
                ImageIndex = 1
                object GridVarArray2: TStringGrid
                  Left = 8
                  Top = 0
                  Width = 329
                  Height = 105
                  DefaultRowHeight = 18
                  Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing]
                  ScrollBars = ssNone
                  TabOrder = 0
                end
              end
            end
          end
        end
      end
      object TabSheet14: TTabSheet
        Tag = 3
        Caption = '5'
        ImageIndex = 5
        object Panel18: TPanel
          Left = 0
          Top = 0
          Width = 593
          Height = 417
          Align = alClient
          BevelOuter = bvLowered
          Color = clWindow
          TabOrder = 0
          object TPanel
            Left = 1
            Top = 1
            Width = 591
            Height = 32
            Align = alTop
            Color = clHighlight
            TabOrder = 0
            object Label17: TLabel
              Left = 9
              Top = 8
              Width = 127
              Height = 16
              Caption = 'Image demo (No DB)'
              Color = clHighlight
              Font.Charset = ANSI_CHARSET
              Font.Color = clHighlightText
              Font.Height = -13
              Font.Name = 'Arial'
              Font.Style = [fsBold, fsItalic]
              ParentColor = False
              ParentFont = False
            end
          end
          object TxtImgDemo: TRichEdit
            Left = 1
            Top = 33
            Width = 591
            Height = 327
            Align = alClient
            ReadOnly = True
            ScrollBars = ssBoth
            TabOrder = 1
          end
          object Panel19: TPanel
            Left = 1
            Top = 360
            Width = 591
            Height = 56
            Align = alBottom
            BevelOuter = bvNone
            Color = 10672861
            TabOrder = 2
            object Label18: TLabel
              Left = 16
              Top = 8
              Width = 98
              Height = 13
              Caption = 'File to send to Excel:'
            end
            object edMyImage: TEdit
              Left = 16
              Top = 24
              Width = 574
              Height = 21
              Anchors = [akLeft, akTop, akRight]
              TabOrder = 0
            end
            object btnOpenMyImage: TButton
              Left = 602
              Top = 23
              Width = 25
              Height = 25
              Anchors = [akTop, akRight]
              Caption = '...'
              TabOrder = 1
              OnClick = btnOpenMyImageClick
            end
          end
        end
      end
      object TabSheet5: TTabSheet
        Tag = 4
        Caption = '6'
        ImageIndex = 4
        object Panel7: TPanel
          Left = 0
          Top = 0
          Width = 593
          Height = 417
          Align = alClient
          BevelOuter = bvLowered
          Color = clWindow
          TabOrder = 0
          object TPanel
            Left = 1
            Top = 1
            Width = 591
            Height = 32
            Align = alTop
            Color = clHighlight
            TabOrder = 0
            object Label5: TLabel
              Left = 9
              Top = 8
              Width = 58
              Height = 16
              Caption = 'Db report'
              Color = clHighlight
              Font.Charset = ANSI_CHARSET
              Font.Color = clHighlightText
              Font.Height = -13
              Font.Name = 'Arial'
              Font.Style = [fsBold, fsItalic]
              ParentColor = False
              ParentFont = False
            end
          end
          object TxtDbDemo: TRichEdit
            Left = 1
            Top = 33
            Width = 591
            Height = 324
            Align = alClient
            ReadOnly = True
            ScrollBars = ssBoth
            TabOrder = 1
          end
          object Panel8: TPanel
            Left = 1
            Top = 357
            Width = 591
            Height = 59
            Align = alBottom
            BevelOuter = bvNone
            Color = 10672861
            TabOrder = 2
            object Label6: TLabel
              Left = 16
              Top = 8
              Width = 79
              Height = 13
              Caption = 'Select customer:'
            end
            object DBLookupComboBox1: TDBLookupComboBox
              Left = 16
              Top = 24
              Width = 281
              Height = 21
              KeyField = 'CustNo'
              ListField = 'Company'
              ListSource = DemoData.DsCust
              TabOrder = 0
            end
          end
        end
      end
      object TabSheet6: TTabSheet
        Tag = 5
        Caption = '7'
        ImageIndex = 5
        object Panel9: TPanel
          Left = 0
          Top = 0
          Width = 593
          Height = 417
          Align = alClient
          BevelOuter = bvLowered
          Color = clWindow
          TabOrder = 0
          object TPanel
            Left = 1
            Top = 1
            Width = 591
            Height = 32
            Align = alTop
            Color = clHighlight
            TabOrder = 0
            object Label7: TLabel
              Left = 9
              Top = 8
              Width = 139
              Height = 16
              Caption = 'Multiple Master- Detail'
              Color = clHighlight
              Font.Charset = ANSI_CHARSET
              Font.Color = clHighlightText
              Font.Height = -13
              Font.Name = 'Arial'
              Font.Style = [fsBold, fsItalic]
              ParentColor = False
              ParentFont = False
            end
          end
          object TxtMultMast: TRichEdit
            Left = 1
            Top = 33
            Width = 591
            Height = 383
            Align = alClient
            ReadOnly = True
            ScrollBars = ssBoth
            TabOrder = 1
          end
        end
      end
      object TabSheet7: TTabSheet
        Tag = 6
        Caption = '8'
        ImageIndex = 6
        object Panel10: TPanel
          Left = 0
          Top = 0
          Width = 593
          Height = 417
          Align = alClient
          BevelOuter = bvLowered
          Color = clWindow
          TabOrder = 0
          object TPanel
            Left = 1
            Top = 1
            Width = 591
            Height = 32
            Align = alTop
            Color = clHighlight
            TabOrder = 0
            object Label8: TLabel
              Left = 9
              Top = 8
              Width = 93
              Height = 16
              Caption = 'Multiple sheets'
              Color = clHighlight
              Font.Charset = ANSI_CHARSET
              Font.Color = clHighlightText
              Font.Height = -13
              Font.Name = 'Arial'
              Font.Style = [fsBold, fsItalic]
              ParentColor = False
              ParentFont = False
            end
          end
          object TxtSheets: TRichEdit
            Left = 1
            Top = 33
            Width = 591
            Height = 383
            Align = alClient
            ReadOnly = True
            ScrollBars = ssBoth
            TabOrder = 1
          end
        end
      end
      object TabSheet8: TTabSheet
        Tag = 7
        Caption = '9'
        ImageIndex = 7
        object Panel12: TPanel
          Left = 0
          Top = 0
          Width = 593
          Height = 417
          Align = alClient
          BevelOuter = bvLowered
          Color = clWindow
          TabOrder = 0
          object TPanel
            Left = 1
            Top = 1
            Width = 591
            Height = 32
            Align = alTop
            Color = clHighlight
            TabOrder = 0
            object Label10: TLabel
              Left = 9
              Top = 8
              Width = 69
              Height = 16
              Caption = 'Pivot Table'
              Color = clHighlight
              Font.Charset = ANSI_CHARSET
              Font.Color = clHighlightText
              Font.Height = -13
              Font.Name = 'Arial'
              Font.Style = [fsBold, fsItalic]
              ParentColor = False
              ParentFont = False
            end
          end
          object TxtPivot: TRichEdit
            Left = 1
            Top = 33
            Width = 591
            Height = 383
            Align = alClient
            ReadOnly = True
            ScrollBars = ssBoth
            TabOrder = 1
          end
        end
      end
      object TabSheet17: TTabSheet
        Tag = 8
        Caption = '10'
        ImageIndex = 14
        object Panel16: TPanel
          Left = 0
          Top = 0
          Width = 593
          Height = 417
          Align = alClient
          BevelOuter = bvLowered
          Color = clWindow
          TabOrder = 0
          object TPanel
            Left = 1
            Top = 1
            Width = 591
            Height = 32
            Align = alTop
            Color = clHighlight
            TabOrder = 0
            object Label15: TLabel
              Left = 9
              Top = 8
              Width = 39
              Height = 16
              Caption = 'Charts'
              Color = clHighlight
              Font.Charset = ANSI_CHARSET
              Font.Color = clHighlightText
              Font.Height = -13
              Font.Name = 'Arial'
              Font.Style = [fsBold, fsItalic]
              ParentColor = False
              ParentFont = False
            end
          end
          object TxtCharts: TRichEdit
            Left = 1
            Top = 33
            Width = 591
            Height = 383
            Align = alClient
            ReadOnly = True
            ScrollBars = ssBoth
            TabOrder = 1
          end
        end
      end
      object TabSheet9: TTabSheet
        Tag = 9
        Caption = '11'
        ImageIndex = 8
        object Panel11: TPanel
          Left = 0
          Top = 0
          Width = 593
          Height = 417
          Align = alClient
          BevelOuter = bvLowered
          Color = clWindow
          TabOrder = 0
          object TPanel
            Left = 1
            Top = 1
            Width = 591
            Height = 32
            Align = alTop
            Color = clHighlight
            TabOrder = 0
            object Label9: TLabel
              Left = 9
              Top = 8
              Width = 138
              Height = 16
              Caption = 'Images and comments'
              Color = clHighlight
              Font.Charset = ANSI_CHARSET
              Font.Color = clHighlightText
              Font.Height = -13
              Font.Name = 'Arial'
              Font.Style = [fsBold, fsItalic]
              ParentColor = False
              ParentFont = False
            end
          end
          object TxtFishFacts: TRichEdit
            Left = 1
            Top = 33
            Width = 591
            Height = 383
            Align = alClient
            ReadOnly = True
            ScrollBars = ssBoth
            TabOrder = 1
          end
        end
      end
      object TabSheet10: TTabSheet
        Tag = 10
        Caption = '12'
        ImageIndex = 9
        object Panel13: TPanel
          Left = 0
          Top = 0
          Width = 593
          Height = 417
          Align = alClient
          BevelOuter = bvLowered
          Color = clWindow
          TabOrder = 0
          object TPanel
            Left = 1
            Top = 1
            Width = 591
            Height = 32
            Align = alTop
            Color = clHighlight
            TabOrder = 0
            object Label11: TLabel
              Left = 9
              Top = 8
              Width = 167
              Height = 16
              Caption = 'Images and multiple sheets'
              Color = clHighlight
              Font.Charset = ANSI_CHARSET
              Font.Color = clHighlightText
              Font.Height = -13
              Font.Name = 'Arial'
              Font.Style = [fsBold, fsItalic]
              ParentColor = False
              ParentFont = False
            end
          end
          object TxtEvents: TRichEdit
            Left = 1
            Top = 33
            Width = 591
            Height = 383
            Align = alClient
            ReadOnly = True
            ScrollBars = ssBoth
            TabOrder = 1
          end
        end
      end
      object TabSheet11: TTabSheet
        Tag = 11
        Caption = '13'
        ImageIndex = 10
        object Panel14: TPanel
          Left = 0
          Top = 0
          Width = 593
          Height = 417
          Align = alClient
          BevelOuter = bvLowered
          Color = clWindow
          TabOrder = 0
          object TPanel
            Left = 1
            Top = 1
            Width = 591
            Height = 32
            Align = alTop
            Color = clHighlight
            TabOrder = 0
            object Label12: TLabel
              Left = 9
              Top = 8
              Width = 77
              Height = 16
              Caption = 'Custom data'
              Color = clHighlight
              Font.Charset = ANSI_CHARSET
              Font.Color = clHighlightText
              Font.Height = -13
              Font.Name = 'Arial'
              Font.Style = [fsBold, fsItalic]
              ParentColor = False
              ParentFont = False
            end
          end
          object TxtCustom: TRichEdit
            Left = 1
            Top = 33
            Width = 591
            Height = 207
            Align = alClient
            ReadOnly = True
            ScrollBars = ssBoth
            TabOrder = 1
          end
          object TPanel
            Left = 1
            Top = 240
            Width = 591
            Height = 176
            Align = alBottom
            Color = 10672861
            TabOrder = 2
            object Label13: TLabel
              Left = 16
              Top = 16
              Width = 49
              Height = 13
              Caption = 'Enter SQL'
            end
            object edSQL: TMemo
              Left = 16
              Top = 40
              Width = 545
              Height = 105
              Anchors = [akLeft, akTop, akRight, akBottom]
              ScrollBars = ssVertical
              TabOrder = 0
            end
          end
        end
      end
      object TabSheet18: TTabSheet
        Tag = 12
        Caption = '14'
        ImageIndex = 15
        object TxtSideBySide: TRichEdit
          Left = 0
          Top = 32
          Width = 593
          Height = 385
          Align = alClient
          ReadOnly = True
          ScrollBars = ssBoth
          TabOrder = 0
        end
        object TPanel
          Left = 0
          Top = 0
          Width = 593
          Height = 32
          Align = alTop
          Color = clHighlight
          TabOrder = 1
          object Label19: TLabel
            Left = 9
            Top = 8
            Width = 133
            Height = 16
            Caption = 'Side by side columns'
            Color = clHighlight
            Font.Charset = ANSI_CHARSET
            Font.Color = clHighlightText
            Font.Height = -13
            Font.Name = 'Arial'
            Font.Style = [fsBold, fsItalic]
            ParentColor = False
            ParentFont = False
          end
        end
      end
      object TabSheet19: TTabSheet
        Tag = 13
        Caption = '15'
        ImageIndex = 17
        object TxtMemory: TRichEdit
          Left = 0
          Top = 32
          Width = 593
          Height = 217
          Align = alClient
          ReadOnly = True
          ScrollBars = ssBoth
          TabOrder = 0
        end
        object TPanel
          Left = 0
          Top = 0
          Width = 593
          Height = 32
          Align = alTop
          Color = clHighlight
          TabOrder = 1
          object Label21: TLabel
            Left = 9
            Top = 8
            Width = 117
            Height = 16
            Caption = 'In-Memory DataSet'
            Color = clHighlight
            Font.Charset = ANSI_CHARSET
            Font.Color = clHighlightText
            Font.Height = -13
            Font.Name = 'Arial'
            Font.Style = [fsBold, fsItalic]
            ParentColor = False
            ParentFont = False
          end
        end
        object Panel21: TPanel
          Left = 0
          Top = 249
          Width = 593
          Height = 168
          Align = alBottom
          BevelOuter = bvNone
          Color = 10672861
          TabOrder = 2
          object Label22: TLabel
            Left = 16
            Top = 8
            Width = 203
            Height = 13
            Caption = 'Fill in the values you want to send to Excel:'
          end
          object GridMemory: TStringGrid
            Left = 16
            Top = 24
            Width = 557
            Height = 129
            Anchors = [akLeft, akTop, akRight, akBottom]
            ColCount = 4
            DefaultRowHeight = 18
            RowCount = 15
            Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing]
            ScrollBars = ssVertical
            TabOrder = 0
            ColWidths = (
              64
              158
              148
              64)
          end
        end
      end
      object TabSheet12: TTabSheet
        Caption = '-'
        ImageIndex = 11
        object Panel17: TPanel
          Left = 0
          Top = 0
          Width = 593
          Height = 417
          Align = alClient
          BevelOuter = bvLowered
          Color = clWindow
          TabOrder = 0
          object TPanel
            Left = 1
            Top = 1
            Width = 591
            Height = 32
            Align = alTop
            Color = clHighlight
            TabOrder = 0
            object Label16: TLabel
              Left = 9
              Top = 8
              Width = 40
              Height = 16
              Caption = 'Import'
              Color = clHighlight
              Font.Charset = ANSI_CHARSET
              Font.Color = clHighlightText
              Font.Height = -13
              Font.Name = 'Arial'
              Font.Style = [fsBold, fsItalic]
              ParentColor = False
              ParentFont = False
            end
          end
          object TxtImport: TRichEdit
            Left = 1
            Top = 33
            Width = 591
            Height = 383
            Align = alClient
            ReadOnly = True
            ScrollBars = ssBoth
            TabOrder = 1
          end
        end
      end
      object TabSheet13: TTabSheet
        Tag = 100
        Caption = '100'
        ImageIndex = 12
        object Panel15: TPanel
          Left = 0
          Top = 0
          Width = 593
          Height = 417
          Align = alClient
          BevelOuter = bvLowered
          Color = clWindow
          TabOrder = 0
          object TPanel
            Left = 1
            Top = 1
            Width = 591
            Height = 32
            Align = alTop
            Color = clHighlight
            TabOrder = 0
            object Label14: TLabel
              Left = 9
              Top = 8
              Width = 54
              Height = 16
              Caption = 'Read file'
              Color = clHighlight
              Font.Charset = ANSI_CHARSET
              Font.Color = clHighlightText
              Font.Height = -13
              Font.Name = 'Arial'
              Font.Style = [fsBold, fsItalic]
              ParentColor = False
              ParentFont = False
            end
          end
          object TxtReadFile: TRichEdit
            Left = 1
            Top = 33
            Width = 591
            Height = 383
            Align = alClient
            ReadOnly = True
            ScrollBars = ssBoth
            TabOrder = 1
          end
        end
      end
      object TabSheet20: TTabSheet
        Tag = 101
        Caption = '101'
        ImageIndex = 18
        object Panel22: TPanel
          Left = 0
          Top = 0
          Width = 593
          Height = 417
          Align = alClient
          BevelOuter = bvLowered
          Color = clWindow
          TabOrder = 0
          object TPanel
            Left = 1
            Top = 1
            Width = 591
            Height = 32
            Align = alTop
            Color = clHighlight
            TabOrder = 0
            object Label23: TLabel
              Left = 9
              Top = 8
              Width = 62
              Height = 16
              Caption = 'Create file'
              Color = clHighlight
              Font.Charset = ANSI_CHARSET
              Font.Color = clHighlightText
              Font.Height = -13
              Font.Name = 'Arial'
              Font.Style = [fsBold, fsItalic]
              ParentColor = False
              ParentFont = False
            end
          end
          object TxtCreateFile: TRichEdit
            Left = 1
            Top = 33
            Width = 591
            Height = 383
            Align = alClient
            ReadOnly = True
            ScrollBars = ssBoth
            TabOrder = 1
          end
        end
      end
      object about: TTabSheet
        Caption = 'About'
        ImageIndex = 16
        object Panel20: TPanel
          Left = 0
          Top = 0
          Width = 593
          Height = 417
          Align = alClient
          BevelOuter = bvLowered
          Color = clWindow
          TabOrder = 0
          object TPanel
            Left = 1
            Top = 1
            Width = 591
            Height = 32
            Align = alTop
            Color = clHighlight
            TabOrder = 0
            object Label20: TLabel
              Left = 9
              Top = 8
              Width = 134
              Height = 16
              Caption = 'Some boring words...'
              Color = clHighlight
              Font.Charset = ANSI_CHARSET
              Font.Color = clHighlightText
              Font.Height = -13
              Font.Name = 'Arial'
              Font.Style = [fsBold, fsItalic]
              ParentColor = False
              ParentFont = False
            end
          end
          object TxtAbout: TRichEdit
            Left = 1
            Top = 33
            Width = 591
            Height = 383
            Align = alClient
            ReadOnly = True
            ScrollBars = ssBoth
            TabOrder = 1
          end
        end
      end
    end
    object ToolBar: TToolBar
      Left = 0
      Top = 0
      Width = 837
      Height = 38
      AutoSize = True
      ButtonHeight = 36
      ButtonWidth = 82
      Caption = 'ToolBar'
      DisabledImages = DemoData.ImageList2
      Flat = True
      HotImages = DemoData.ImageList3
      Images = DemoData.ImageList1
      ParentShowHint = False
      ShowCaptions = True
      ShowHint = True
      TabOrder = 2
      object BtnUseNative: TToolButton
        Left = 0
        Top = 0
        Action = ActionUseNative
        Down = True
        Grouped = True
        Style = tbsCheck
      end
      object BtnUseOle: TToolButton
        Left = 82
        Top = 0
        Action = ActionUseOle
        Grouped = True
        Style = tbsCheck
      end
      object ToolButton5: TToolButton
        Left = 164
        Top = 0
        Width = 8
        Caption = 'ToolButton5'
        ImageIndex = 13
        Style = tbsSeparator
      end
      object ToolButton3: TToolButton
        Left = 172
        Top = 0
        Action = ActionFastCount
        Style = tbsCheck
      end
      object BtnHTML: TToolButton
        Left = 254
        Top = 0
        Action = ActionHtml
        Style = tbsCheck
      end
      object BtnProtect: TToolButton
        Left = 336
        Top = 0
        Action = ActionProtect
        Style = tbsCheck
      end
      object BtnUseTStore: TToolButton
        Left = 418
        Top = 0
        Action = ActionUseTStore
        Style = tbsCheck
      end
      object ToolButton2: TToolButton
        Left = 500
        Top = 0
        Width = 8
        Caption = 'ToolButton2'
        ImageIndex = 14
        Style = tbsSeparator
      end
      object BtnReport: TToolButton
        Left = 508
        Top = 0
        Action = ActionReport
        DropdownMenu = PopReport
        Style = tbsDropDown
      end
      object BtnViewTemplate: TToolButton
        Left = 603
        Top = 0
        Action = ActionViewTemplateExcel
        DropdownMenu = PopViewTemplate
        Style = tbsDropDown
      end
      object ToolButton1: TToolButton
        Left = 698
        Top = 0
        Width = 8
        Caption = 'ToolButton1'
        ImageIndex = 13
        Style = tbsSeparator
      end
      object BtnClose: TToolButton
        Left = 706
        Top = 0
        Action = ActionClose
      end
    end
  end
  object StatusBar: TStatusBar
    Left = 0
    Top = 483
    Width = 837
    Height = 19
    Panels = <>
    SimplePanel = True
  end
  object ActionList: TActionList
    Images = DemoData.ImageList1
    Left = 248
    Top = 88
    object ActionUseNative: TAction
      Category = 'Adapter'
      Caption = 'Native Adapter'
      ImageIndex = 6
      OnExecute = ActionUseNativeExecute
    end
    object ActionAutoPrint: TAction
      Category = 'File'
      Caption = 'Print...'
      ImageIndex = 13
      OnExecute = ActionAutoPrintExecute
      OnUpdate = ActionHtmlUpdate
    end
    object ActionClose: TAction
      Category = 'File'
      Caption = 'Close'
      Hint = 'Quits the Application'
      ImageIndex = 12
      OnExecute = ActionCloseExecute
    end
    object ActionReport: TAction
      Category = 'File'
      Caption = 'Report !'
      Hint = 'Runs the selected report'
      ImageIndex = 13
      ShortCut = 120
      OnExecute = ActionReportExecute
      OnUpdate = ActionReportUpdate
    end
    object ActionUseOle: TAction
      Category = 'Adapter'
      Caption = 'Ole Adapter'
      ImageIndex = 5
      OnExecute = ActionUseOleExecute
    end
    object ActionHtml: TAction
      Category = 'Options'
      Caption = 'Export to HTML'
      ImageIndex = 9
      OnUpdate = ActionHtmlUpdate
    end
    object ActionProtect: TAction
      Category = 'Options'
      Caption = 'Protect'
      ImageIndex = 4
      OnUpdate = ActionHtmlUpdate
    end
    object ActionViewTemplateExcel: TAction
      Category = 'File'
      Caption = 'View Template'
      ImageIndex = 3
      OnExecute = ActionViewTemplateExcelExecute
      OnUpdate = ActionViewTemplateExcelUpdate
    end
    object ActionUseTStore: TAction
      Category = 'Options'
      Caption = 'Template Store'
      ImageIndex = 7
      OnExecute = ActionUseTStoreExecute
    end
    object ActionPreview: TAction
      Category = 'Options'
      Caption = 'Preview'
      ImageIndex = 14
      OnExecute = ActionPreviewExecute
      OnUpdate = ActionPreviewUpdate
    end
    object ActionViewTemplateInternal: TAction
      Category = 'File'
      Caption = 'Edit Template'
      ImageIndex = 14
      OnExecute = ActionViewTemplateInternalExecute
    end
    object ActionTestAll: TAction
      Category = 'File'
      Caption = 'Test All...'
      ImageIndex = 15
      OnExecute = ActionTestAllExecute
    end
    object ActionFastCount: TAction
      Category = 'Options'
      Caption = 'Fast Count'
      ImageIndex = 19
      OnExecute = ActionFastCountExecute
    end
  end
  object PopViewTemplate: TPopupMenu
    Images = DemoData.ImageList1
    Left = 640
    Top = 212
    object VievwithExcel1: TMenuItem
      Action = ActionViewTemplateExcel
    end
    object Openwithinternaleditor1: TMenuItem
      Action = ActionViewTemplateInternal
    end
  end
  object PopReport: TPopupMenu
    Images = DemoData.ImageList1
    Left = 248
    Top = 124
    object MenuItem1: TMenuItem
      Action = ActionReport
    end
    object MenuItem2: TMenuItem
      Action = ActionPreview
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object PrintWARNING1: TMenuItem
      Action = ActionAutoPrint
    end
    object TestAll1: TMenuItem
      Action = ActionTestAll
    end
  end
  object PopupMenu1: TPopupMenu
    Images = DemoData.ImageList1
    Left = 248
    Top = 164
    object MenuItem3: TMenuItem
      Action = ActionViewTemplateExcel
    end
    object MenuItem4: TMenuItem
      Action = ActionViewTemplateInternal
    end
  end
end