fuqexportxlsdemo.dfm

Advanced.Export.Component.v4.01.rar,delphi 第三方控件

            Series = <
              item
                DataColumn = 'AREA'
                Title = 'Country Area'
              end>
            Style = xcsLine
            Title = 'Country Area'
          end>
        DataSet = Table1
        Header.Strings = (
          
            'We are glad to present a new version of the TQExport3XLS compone' +
            'nt '
          'Welcome to'
          '')
        Captions.Strings = (
          '')
        Footer.Strings = (
          ''
          ''
          ''
          'This file was generated by'#9'EMS Quick Export Component Suite 3.0')
        Formats.DateFormat = 'dd/MM/yyyy'
        Formats.DateTimeFormat = 'dd/MM/yyyy h:mm'
        Formats.CurrencyFormat = '00.00'#1088'.'
        ColumnsWidth.Strings = (
          'NAME=30'
          'AREA=15'
          'POPULATION=20')
      end
      item
        Title = 'DBGrid'
        Options.PageFooter = 'Page &P of &N'
        Options.SheetTitle = 'Sheet 1'
        Options.HeaderFormat.Font.Size = 14
        Options.HeaderFormat.Font.Style = [xfsBold]
        Options.HeaderFormat.Font.Name = 'Tahoma'
        Options.CaptionsFormat.Font.Size = 16
        Options.CaptionsFormat.Font.Style = [xfsBold]
        Options.CaptionsFormat.Font.Color = clrWhite
        Options.CaptionsFormat.Font.Name = 'Impact'
        Options.CaptionsFormat.Fill.Background = clrDarkYellow
        Options.CaptionsFormat.Fill.Pattern = ptSolid
        Options.CaptionsFormat.Alignment.Horizontal = halCenter
        Options.AggregateFormat.Font.Size = 12
        Options.AggregateFormat.Font.Color = clrWhite
        Options.AggregateFormat.Font.Name = 'Impact'
        Options.AggregateFormat.Fill.Background = clrDarkYellow
        Options.AggregateFormat.Fill.Pattern = ptSolid
        Options.HyperlinkFormat.Font.Color = clrBlue
        Options.HyperlinkFormat.Font.Underline = fulSingle
        Options.NoteFormat.Alignment.Horizontal = halLeft
        Options.NoteFormat.Alignment.Vertical = valTop
        Options.NoteFormat.Font.Size = 8
        Options.NoteFormat.Font.Style = [xfsBold]
        Options.NoteFormat.Font.Name = 'Tahoma'
        FieldFormats = <
          item
            FieldName = 'AREA'
            Aggregate = aggSum
          end
          item
            FieldName = 'POPULATION'
            Aggregate = aggAvg
          end>
        StripStyles = <
          item
            Fill.Background = clrGray40Percent
            Fill.Pattern = ptSolid
          end
          item
            Font.Color = clrSeaGreen
            Fill.Background = clrGray25Percent
            Fill.Pattern = ptSolid
          end>
        StripType = ssCol
        Hyperlinks = <
          item
            Row = 2
            Col = 2
            Title = 'www.quickexport.net'
            Target = 'www.quickexport.net'
            Format.Font.Size = 14
            Format.Font.Style = [xfsBold]
            Format.Font.Color = clrBlue
            Format.Font.Underline = fulSingle
            Format.Font.Name = 'Tahoma'
          end>
        Notes = <
          item
            Row = 1
            Col = 1
            Lines.Strings = (
              'We hope you will like new features of the '
              'QuickExport component suite.')
            Format.Alignment.Horizontal = halLeft
            Format.Alignment.Vertical = valTop
            Format.BackgroundColor = clGray
            Format.ForegroundColor = clSilver
            Format.FillType = nftGradient
            Format.Font.Size = 12
            Format.Font.Style = [xfsBold]
            Format.Font.Color = clrGreen
            Format.Font.Name = 'Arial Black'
          end>
        Charts = <
          item
            CategoryLabelsColumn = 'NAME'
            Position.AutoPosition.Placement = cpRight
            Position.AutoPosition.Height = 18
            Position.AutoPosition.Left = 1
            Position.AutoPosition.Top = 4
            Position.AutoPosition.Width = 6
            Series = <
              item
                DataColumn = 'POPULATION'
                Title = 'Population'
              end>
            Style = xcsPie
            Title = 'Population'
          end>
        ExportSource = esDBGrid
        DBGrid = DBGrid2
        Header.Strings = (
          
            'We are glad to present a new version of the TQExport3XLS compone' +
            'nt '
          'Welcome to'
          '')
        Footer.Strings = (
          ''
          ''
          ''
          'This file was generated by'#9'EMS Quick Export Component Suite 3.0')
        Formats.DateFormat = 'dd/MM/yyyy'
        Formats.DateTimeFormat = 'dd/MM/yyyy h:mm'
        Formats.CurrencyFormat = '00.00$'
        Formats.NullString = 'null'
        ColumnsWidth.Strings = (
          'NAME=30'
          'AREA=15'
          'POPULATION=20')
      end
      item
        Title = 'ListView'
        Options.PageFooter = 'Page &P of &N'
        Options.SheetTitle = 'Sheet 1'
        Options.HeaderFormat.Font.Size = 14
        Options.HeaderFormat.Font.Style = [xfsBold]
        Options.HeaderFormat.Font.Name = 'Tahoma'
        Options.CaptionsFormat.Font.Size = 16
        Options.CaptionsFormat.Font.Style = [xfsBold]
        Options.CaptionsFormat.Font.Color = clrWhite
        Options.CaptionsFormat.Font.Name = 'Impact'
        Options.CaptionsFormat.Fill.Background = clrDarkRed
        Options.CaptionsFormat.Fill.Pattern = ptSolid
        Options.CaptionsFormat.Alignment.Horizontal = halCenter
        Options.AggregateFormat.Font.Size = 12
        Options.AggregateFormat.Font.Color = clrWhite
        Options.AggregateFormat.Font.Name = 'Impact'
        Options.AggregateFormat.Fill.Background = clrDarkRed
        Options.AggregateFormat.Fill.Pattern = ptSolid
        Options.HyperlinkFormat.Font.Color = clrBlue
        Options.HyperlinkFormat.Font.Underline = fulSingle
        Options.NoteFormat.Alignment.Horizontal = halLeft
        Options.NoteFormat.Alignment.Vertical = valTop
        Options.NoteFormat.Font.Size = 8
        Options.NoteFormat.Font.Style = [xfsBold]
        Options.NoteFormat.Font.Name = 'Tahoma'
        FieldFormats = <
          item
            Fill.Background = clrTan
            Fill.Pattern = ptSolid
            FieldName = 'Name'
          end
          item
            Fill.Background = clrGold
            Fill.Pattern = ptSolid
            FieldName = 'Capital'
          end
          item
            Fill.Background = clrLightYellow
            Fill.Pattern = ptSolid
            FieldName = 'Continent'
          end
          item
            Fill.Background = clrGold
            Fill.Pattern = ptSolid
            FieldName = 'Area'
            Aggregate = aggMax
          end
          item
            Fill.Background = clrTan
            Fill.Pattern = ptSolid
            FieldName = 'Population'
            Aggregate = aggMin
          end>
        StripStyles = <>
        Hyperlinks = <
          item
            Row = 2
            Col = 2
            Title = 'www.quickexport.net'
            Target = 'www.quickexport.net'
            Format.Font.Size = 14
            Format.Font.Style = [xfsBold]
            Format.Font.Color = clrBlue
            Format.Font.Underline = fulSingle
            Format.Font.Name = 'Tahoma'
          end>
        Notes = <
          item
            Row = 1
            Col = 1
            Lines.Strings = (
              'We hope you will like new features of the '
              'QuickExport component suite.')
            Format.Alignment.Horizontal = halLeft
            Format.Alignment.Vertical = valTop
            Format.BackgroundColor = 52479
            Format.ForegroundColor = 10079487
            Format.FillType = nftGradient
            Format.Font.Size = 12
            Format.Font.Style = [xfsBold]
            Format.Font.Color = clrDarkRed
            Format.Font.Name = 'Arial Black'
            Format.Gradient = ngrVertical
          end>
        Charts = <>
        ExportSource = esListView
        ListView = ListView1
        Header.Strings = (
          
            'We are glad to present a new version of the TQExport3XLS compone' +
            'nt '
          'Welcome to'
          '')
        Footer.Strings = (
          ''
          ''
          ''
          'This file was generated by'#9'EMS Quick Export Component Suite 3.0')
        Formats.CurrencyFormat = '00.00$'
        Formats.NullString = 'null'
        ColumnsWidth.Strings = (
          'NAME=30'
          'AREA=15'
          'CONTINENT=15'
          'POPULATION=20')
        AutoCalcStrType = True
      end
      item
        Title = 'StringGrid'
        Options.PageFooter = 'Page &P of &N'
        Options.SheetTitle = 'Sheet 1'
        Options.HeaderFormat.Font.Size = 14
        Options.HeaderFormat.Font.Style = [xfsBold]
        Options.HeaderFormat.Font.Name = 'Tahoma'
        Options.CaptionsFormat.Font.Size = 16
        Options.CaptionsFormat.Font.Style = [xfsBold]
        Options.CaptionsFormat.Font.Color = clrWhite
        Options.CaptionsFormat.Font.Name = 'Impact'
        Options.CaptionsFormat.Fill.Background = clrBlack
        Options.CaptionsFormat.Fill.Pattern = ptSolid
        Options.CaptionsFormat.Alignment.Horizontal = halCenter
        Options.AggregateFormat.Font.Size = 12
        Options.AggregateFormat.Font.Color = clrWhite
        Options.AggregateFormat.Font.Name = 'Impact'
        Options.AggregateFormat.Fill.Background = clrBlack
        Options.AggregateFormat.Fill.Pattern = ptSolid
        Options.HyperlinkFormat.Font.Color = clrBlue
        Options.HyperlinkFormat.Font.Underline = fulSingle
        Options.NoteFormat.Alignment.Horizontal = halLeft
        Options.NoteFormat.Alignment.Vertical = valTop
        Options.NoteFormat.Font.Size = 8
        Options.NoteFormat.Font.Style = [xfsBold]
        Options.NoteFormat.Font.Name = 'Tahoma'
        FieldFormats = <
          item
            FieldName = '3'
            Aggregate = aggSum
          end
          item
            FieldName = '4'
            Aggregate = aggAvg
          end>
        StripStyles = <>
        Hyperlinks = <
          item
            Row = 2
            Col = 2
            Title = 'www.quickexport.net'
            Target = 'www.quickexport.net'
            Format.Font.Size = 14
            Format.Font.Style = [xfsBold]
            Format.Font.Color = clrBlue
            Format.Font.Underline = fulSingle
            Format.Font.Name = 'Tahoma'
          end>
        Notes = <
          item
            Row = 1
            Col = 1
            Lines.Strings = (
              'We hope you will like new features of the '
              'QuickExport component suite.')
            Format.Alignment.Horizontal = halLeft
            Format.Alignment.Vertical = valTop
            Format.BackgroundColor = 16764057
            Format.ForegroundColor = 52479
            Format.FillType = nftGradient
            Format.Font.Size = 12
            Format.Font.Style = [xfsBold]
            Format.Font.Name = 'Arial Black'
          end>
        Charts = <>
        ExportSource = esStringGrid
        StringGrid = StringGrid1
        Header.Strings = (
          
            'We are glad to present a new version of the TQExport3XLS compone' +
            'nt '
          'Welcome to'
          '')
        Captions.Strings = (
          '')
        Footer.Strings = (
          ''
          ''
          ''
          'This file was generated by'#9'EMS Quick Export Component Suite 3.0')
        Formats.CurrencyFormat = '00.00$'
        Formats.NullString = 'null'
        ColumnsWidth.Strings = (
          '0=30'
          '3=15'
          '4=20')
        AutoCalcStrType = True
        CaptionRow = 0
      end>
    OnGetHeaderParams = QExportXLS1GetHeaderParams
    OnGetDataParams = QExportXLS1GetDataParams
    OnGetFooterParams = QExportXLS1GetFooterParams
    Left = 166
    Top = 136
  end
end