object GridSortFilterDemo: TGridSortFilterDemo
  Left = 192
  Top = 122
  Caption = 'New - Integrated sorting and filtering in caption'
  ClientHeight = 421
  ClientWidth = 717
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object wwDBRichEdit1: TwwDBRichEdit
    Left = 16
    Top = 496
    Width = 441
    Height = 113
    AutoURLDetect = False
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    GutterWidth = 3
    HideSelection = False
    ParentFont = False
    PrintJobName = 'Project1 - Embarcadero RAD Studio 2010 - Unit1 [Built]'
    TabOrder = 0
    EditorOptions = [reoShowSaveExit, reoShowPrint, reoShowPrintPreview, reoShowPageSetup, reoShowFormatBar, reoShowToolBar, reoShowStatusBar, reoShowHints, reoShowRuler, reoShowInsertObject, reoCloseOnEscape, reoFlatButtons, reoShowSpellCheck, reoShowMainMenuIcons, reoShowZoomCombo]
    EditorCaption = 'Edit Rich Text'
    EditorPosition.Left = 0
    EditorPosition.Top = 0
    EditorPosition.Width = 0
    EditorPosition.Height = 0
    MeasurementUnits = muInches
    PrintMargins.Top = 1.000000000000000000
    PrintMargins.Bottom = 1.000000000000000000
    PrintMargins.Left = 1.000000000000000000
    PrintMargins.Right = 1.000000000000000000
    PrintHeader.VertMargin = 0.500000000000000000
    PrintHeader.Font.Charset = DEFAULT_CHARSET
    PrintHeader.Font.Color = clWindowText
    PrintHeader.Font.Height = -11
    PrintHeader.Font.Name = 'Tahoma'
    PrintHeader.Font.Style = []
    PrintFooter.VertMargin = 0.500000000000000000
    PrintFooter.Font.Charset = DEFAULT_CHARSET
    PrintFooter.Font.Color = clWindowText
    PrintFooter.Font.Height = -11
    PrintFooter.Font.Name = 'Tahoma'
    PrintFooter.Font.Style = []
    RichEditVersion = 2
    Data = {
      0B0500007B5C727466315C616E73695C616E7369637067313235325C64656666
      305C6465666C616E67313033337B5C666F6E7474626C7B5C66305C666E696C5C
      6663686172736574302054696D6573204E657720526F6D616E3B7D7B5C66315C
      666E696C5C666368617273657430204D532053616E732053657269663B7D7D0D
      0A5C766965776B696E64345C7563315C706172645C66305C6673323220437265
      6174696E6720616E20696E2D6D656D6F7279207461626C652063616E20626520
      6163636F6D706C6973686564207573696E672074686520666F6C6C6F77696E67
      2073746570732E5C7061720D0A5C706172647B5C706E746578745C663120312E
      5C7461627D7B5C2A5C706E5C706E6C766C626F64795C706E66315C706E696E64
      656E74305C706E7374617274315C706E6465637B5C706E747874612E7D7D0D0A
      5C66692D3336305C6C693336302044726F7020696E20612054436C69656E7444
      6174615365742F5444617461536F7572636520696E746F20796F757220666F72
      6D2C20616E642061737369676E2074686520646174617365742070726F706572
      7479206F66207468652064617461736F7572636520746F2074686520636C6965
      6E74646174617365742E5C66315C667331365C7061720D0A5C66305C66733232
      7B5C706E746578745C663120322E5C7461627D446566696E652074686520636F
      6C756D6E73207573696E672074686520436C69656E7444617461536574277320
      4669656C64446566732070726F70657274795C66315C667331365C7061720D0A
      5C66305C667332327B5C706E746578745C663120332E5C7461627D496620796F
      752077616E7420636C69636B61626C6520636F6C756D6E206865616465727320
      776974682064657363656E64696E6720696E64657865732061732077656C6C2C
      207468656E2061646420696E6465786573207573696E672074686520496E6465
      78446566732070726F70657274792E2020596F7520646F206E6F74206E656564
      20746F2061646420617363656E64696E6720696E646578657320666F72207468
      6520636F6C756D6E732061732074686573652073686F756C6420776F726B2061
      6C72656164792E204265207375726520746F20736574205469746C6542757474
      6F6E7320746F207472756520736F2074686174207469746C6520627574746F6E
      732061726520656E61626C65642E5C66315C667331365C7061720D0A5C66305C
      667332327B5C706E746578745C663120342E5C7461627D5768656E20796F7520
      61726520646F6E6520646566696E696E6720746865206669656C64732C20796F
      752063616E20726967687420636C69636B206F6E2074686520436C69656E7444
      6174615365742C20616E6420636C69636B206F6E204372656174654461746153
      65742E5C66315C667331365C7061720D0A5C66305C667332327B5C706E746578
      745C663120352E5C7461627D41737369676E2074686520677269642773206461
      7461736F757263652070726F706572747920746F207468652064617461736F75
      72636520726566657272696E6720746F20796F757220636C69656E7464617461
      7365742E5C66315C667331365C7061720D0A5C66305C667332327B5C706E7465
      78745C663120362E5C7461627D4E6F7720796F752063616E20636F6E66696775
      726520796F75722067726964207769746820616C6C2074686520636170616269
      6C6974696573206F66206120626F756E642064617461736F757263652E5C6631
      5C667331365C7061720D0A7D0D0A00}
  end
  object PageControl1: TPageControl
    Left = 8
    Top = 8
    Width = 697
    Height = 361
    ActivePage = TabSheet1
    TabOrder = 1
    object TabSheet1: TTabSheet
      Caption = 'In-memory ClientDataSet'
      object wwDBGrid3: TwwDBGrid
        Left = 3
        Top = 7
        Width = 683
        Height = 314
        LineStyle = glsSingle
        Selected.Strings = (
          'Company'#9'30'#9'Company'
          'OrderNo'#9'10'#9'OrderNo'
          'ShipVIA'#9'10'#9'ShipVIA'
          'ShipDate'#9'18'#9'ShipDate'
          'SaleDate'#9'18'#9'SaleDate'
          'EmpNo'#9'10'#9'EmpNo'
          'CustNo'#9'10'#9'CustNo'
          'Phone'#9'15'#9'Phone'
          'FAX'#9'15'#9'FAX'
          'TaxRate'#9'10'#9'TaxRate'
          'Contact'#9'20'#9'Contact'
          'LastInvoiceDate'#9'18'#9'LastInvoiceDate'
          'CustNo_1'#9'10'#9'CustNo_1')
        IniAttributes.FileName = 'delphi32.ini.ini'
        IniAttributes.Delimiter = ';;'
        IniAttributes.UnicodeIniFile = False
        TitleColor = clWindow
        FixedCols = 1
        ShowHorzScrollBar = True
        Ctl3D = False
        DataSource = InMemoryDataSource
        ParentCtl3D = False
        TabOrder = 0
        TitleAlignment = taCenter
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        TitleLines = 1
        TitleButtons = True
        UseTFields = False
        LineColors.DataColor = cl3DLight
        TitleMenuAttributes.Options = [sfoSortAscending, sfoSortDescending, sfoFilter, sfoGrouping, sfoSelectColumns, sfoCreateIndexes, sfoAutoTitleButtonSort, sfoClientCursor]
        TitleMenuAttributes.MenuEnabled = True
        OnAddSelectColumn = wwDBGrid3AddSelectColumn
        GroupFieldName = 'Company'
        PaintOptions.BackgroundBitmap.Data = {
          [encoded data, 9408 characters]
          0000E1000000E1000000E1000000E1000000E1000000E1000000E1000000}
        PaintOptions.BackgroundDrawStyle = bdsStretch
        PaintOptions.AlternatingRowRegions = [arrDataColumns, arrActiveDataColumn]
        PaintOptions.AlternatingRowColor = clTeal
        PaintOptions.BackgroundOptions = [coBlendFixedRow, coBlendFixedColumn]
      end
    end
    object TabSheet2: TTabSheet
      Caption = 'Query using ClientDataSet'
      ImageIndex = 1
      object wwDBGrid2: TwwDBGrid
        Left = 3
        Top = 16
        Width = 646
        Height = 273
        Selected.Strings = (
          'CustomerID'#9'5'#9'CustomerID'#9#9
          'CompanyName'#9'40'#9'CompanyName'#9#9
          'ContactName'#9'30'#9'ContactName'#9#9
          'ContactTitle'#9'30'#9'ContactTitle'#9#9
          'Address'#9'60'#9'Address'#9#9
          'City'#9'15'#9'City'#9#9
          'Region'#9'15'#9'Region'#9#9
          'PostalCode'#9'10'#9'PostalCode'#9#9
          'Country'#9'15'#9'Country'#9#9
          'Phone'#9'24'#9'Phone'#9#9
          'Fax'#9'24'#9'Fax'#9#9)
        IniAttributes.FileName = 'delphi32.ini.ini'
        IniAttributes.Delimiter = ';;'
        IniAttributes.UnicodeIniFile = False
        TitleColor = clBtnFace
        FixedCols = 0
        ShowHorzScrollBar = True
        DataSource = DataSourceQuery1
        TabOrder = 0
        TitleAlignment = taLeftJustify
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        TitleLines = 1
        TitleButtons = True
        TitleMenuAttributes.Options = [sfoSortAscending, sfoSortDescending, sfoFilter, sfoGrouping, sfoCreateIndexes, sfoAutoTitleButtonSort, sfoClientCursor]
        TitleMenuAttributes.MenuEnabled = True
      end
    end
    object TQuery: TTabSheet
      Caption = 'Query'
      ImageIndex = 3
      object wwDBGrid4: TwwDBGrid
        Left = 3
        Top = 3
        Width = 678
        Height = 303
        ControlInfoInDataset = False
        Selected.Strings = (
          'CustomerID'#9'5'#9'CustomerID'#9'F'
          'City'#9'25'#9'City'
          'Address'#9'60'#9'Address'#9'F'
          'CompanyName'#9'40'#9'CompanyName'#9'F'
          'ContactName'#9'30'#9'ContactName'#9'F'
          'ContactTitle'#9'30'#9'ContactTitle'#9'F'
          'Country'#9'15'#9'Country'#9'F'
          'Fax'#9'24'#9'Fax'#9'F'
          'Phone'#9'24'#9'Phone'#9'F'
          'PostalCode'#9'10'#9'PostalCode'#9'F'
          'Region'#9'15'#9'Region'#9'F')
        MemoAttributes = [mSizeable, mWordWrap, mGridShow]
        IniAttributes.FileName = 'delphi32.ini.ini'
        IniAttributes.Delimiter = ';;'
        IniAttributes.UnicodeIniFile = False
        TitleColor = clBtnFace
        FixedCols = 0
        ShowHorzScrollBar = True
        DataSource = DataSourceQuery2
        TabOrder = 0
        TitleAlignment = taLeftJustify
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        TitleLines = 1
        TitleButtons = False
        UseTFields = False
        TitleMenuAttributes.Options = [sfoSortAscending, sfoFilter, sfoGrouping, sfoCreateIndexes, sfoAutoTitleButtonSort]
        TitleMenuAttributes.MenuEnabled = True
        OnBeforeMenuSort = wwDBGrid4BeforeSort
        OnCanSort = wwDBGrid4CanSort
        OnQuerySortField = wwDBGrid4QuerySortField
      end
    end
  end
  object InMemoryClientDataSet: TClientDataSet
    Active = True
    Aggregates = <>
    AggregatesActive = False
    Constraints = <>
    DisableStringTrim = False
    FieldDefs = <
      item
        Name = 'Company'
        DataType = ftString
        Size = 30
      end
      item
        Name = 'OrderNo'
        DataType = ftFloat
      end
      item
        Name = 'SaleDate'
        DataType = ftDateTime
      end
      item
        Name = 'ShipDate'
        DataType = ftDateTime
      end
      item
        Name = 'EmpNo'
        DataType = ftInteger
      end
      item
        Name = 'ShipToContact'
        DataType = ftString
        Size = 20
      end
      item
        Name = 'ShipToAddr1'
        DataType = ftString
        Size = 30
      end
      item
        Name = 'ShipToAddr2'
        DataType = ftString
        Size = 30
      end
      item
        Name = 'ShipToCity'
        DataType = ftString
        Size = 15
      end
      item
        Name = 'ShipToState'
        DataType = ftString
        Size = 20
      end
      item
        Name = 'ShipToZip'
        DataType = ftString
        Size = 10
      end
      item
        Name = 'ShipToCountry'
        DataType = ftString
        Size = 20
      end
      item
        Name = 'ShipToPhone'
        DataType = ftString
        Size = 15
      end
      item
        Name = 'ShipVIA'
        DataType = ftString
        Size = 7
      end
      item
        Name = 'PO'
        DataType = ftString
        Size = 15
      end
      item
        Name = 'Terms'
        DataType = ftString
        Size = 6
      end
      item
        Name = 'PaymentMethod'
        DataType = ftString
        Size = 7
      end
      item
        Name = 'ItemsTotal'
        DataType = ftCurrency
      end
      item
        Name = 'TaxRate_1'
        DataType = ftFloat
      end
      item
        Name = 'Freight'
        DataType = ftCurrency
      end
      item
        Name = 'AmountPaid'
        DataType = ftCurrency
      end
      item
        Name = 'CustNo'
        DataType = ftFloat
      end
      item
        Name = 'Addr1'
        DataType = ftString
        Size = 30
      end
      item
        Name = 'Addr2'
        DataType = ftString
        Size = 30
      end
      item
        Name = 'City'
        DataType = ftString
        Size = 15
      end
      item
        Name = 'State'
        DataType = ftString
        Size = 20
      end
      item
        Name = 'Zip'
        DataType = ftString
        Size = 10
      end
      item
        Name = 'Country'
        DataType = ftString
        Size = 20
      end
      item
        Name = 'Phone'
        DataType = ftString
        Size = 15
      end
      item
        Name = 'FAX'
        DataType = ftString
        Size = 15
      end
      item
        Name = 'TaxRate'
        DataType = ftFloat
      end
      item
        Name = 'Contact'
        DataType = ftString
        Size = 20
      end
      item
        Name = 'LastInvoiceDate'
        DataType = ftDateTime
      end
      item
        Name = 'CustNo_1'
        DataType = ftFloat
      end>
    IndexDefs = <
      item
        Name = 'DEFAULT_ORDER'
      end
      item
        Name = 'CHANGEINDEX'
      end
      item
        Name = 'ClientDataSet1Index3'
        Fields = 'FirstName;LastName'
        Options = [ixDescending, ixCaseInsensitive]
      end>
    IndexFieldNames = 'Company'
    FetchOnDemand = True
    ObjectView = True
    Params = <>
    ReadOnly = False
    StoreDefs = True
    Left = 40
    Top = 352
    Data = {
      [encoded data, 91776 characters]
      000D4C6F75697365204672616E6B7300446FBD72A0CC42000000008038C340}
  end
  object DataSourceQuery2: TDataSource
    DataSet = ADOQuery2
    Left = 288
    Top = 368
  end
  object InMemoryDataSource: TDataSource
    DataSet = InMemoryClientDataSet
    Left = 8
    Top = 352
  end
  object DataSourceQuery1: TDataSource
    DataSet = ClientDataSetQuery1
    Left = 104
    Top = 352
  end
  object ClientDataSetQuery1: TClientDataSet
    Aggregates = <>
    AggregatesActive = False
    Constraints = <>
    DisableStringTrim = False
    FieldDefs = <
      item
        Name = 'CustomerID'
        DataType = ftWideString
        Size = 5
      end
      item
        Name = 'CompanyName'
        DataType = ftWideString
        Size = 40
      end
      item
        Name = 'ContactName'
        DataType = ftWideString
        Size = 30
      end
      item
        Name = 'ContactTitle'
        DataType = ftWideString
        Size = 30
      end
      item
        Name = 'Address'
        DataType = ftWideString
        Size = 60
      end
      item
        Name = 'City'
        DataType = ftWideString
        Size = 15
      end
      item
        Name = 'Region'
        DataType = ftWideString
        Size = 15
      end
      item
        Name = 'PostalCode'
        DataType = ftWideString
        Size = 10
      end
      item
        Name = 'Country'
        DataType = ftWideString
        Size = 15
      end
      item
        Name = 'Phone'
        DataType = ftWideString
        Size = 24
      end
      item
        Name = 'Fax'
        DataType = ftWideString
        Size = 24
      end>
    IndexDefs = <>
    FetchOnDemand = True
    ObjectView = True
    Params = <>
    ProviderName = 'DataSetProviderQuery1'
    ReadOnly = False
    StoreDefs = False
    Left = 136
    Top = 352
  end
  object DataSetProviderQuery1: TDataSetProvider
    DataSet = ADOQuery1
    Left = 168
    Top = 352
  end
  object ADOQuery1: TADOQuery
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=..\db\nwind.mdb;Per' +
      'sist Security Info=False'#9
    CursorType = ctStatic
    CommandTimeout = 30
    ParamCheck = True
    Parameters = <>
    Prepared = False
    SQL.Strings = (
      'Select * from Customers')
    Left = 200
    Top = 352
  end
  object ADOQuery2: TADOQuery
    AutoCalcFields = False
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=..\db\nwind.mdb;Per' +
      'sist Security Info=False'#9
    CursorType = ctStatic
    CommandTimeout = 30
    ParamCheck = True
    Parameters = <>
    Prepared = False
    SQL.Strings = (
      'Select * from Customers')
    Left = 328
    Top = 368
  end
end
