PC World Komputer 1997 May/Pcwk0597.iso/delphi/cbsuite.lzh/SU1SRC.ZIP/DEMO02.DFM/DEMO02.txt

Text File | 1997-01-18 | 26KB | 1,106 lines

object FBDemo02: TFBDemo02
  Left = 547
  Top = 280
  Width = 345
  Height = 259
  HorzScrollBar.Position = 64
  ActiveControl = Panel1
  Caption = 'FBDemo02'
  Font.Color = clWindowText
  Font.Height = -14
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  PixelsPerInch = 120
  Position = poScreenCenter
  OnCreate = FormCreate
  TextHeight = 16
  object Panel1: TPanel
    Left = -64
    Top = 0
    Width = 992
    Height = 50
    Align = alTop
    TabOrder = 0
    object DBNavigator: TDBNavigator
      Left = 10
      Top = 10
      Width = 281
      Height = 31
      DataSource = DataSource1
      Ctl3D = False
      ParentCtl3D = False
      TabOrder = 0
    end
    object Button1: TButton
      Left = 688
      Top = 9
      Width = 75
      Height = 25
      Caption = 'Button1'
      TabOrder = 1
      OnClick = Button1Click
    end
  end
  object CBReport1: TCBReport
    Left = -64
    Top = 48
    Width = 992
    Height = 1403
    Font.Color = clWindowText
    Font.Height = 16
    Font.Name = 'Arial'
    Font.Style = []
    Color = 15794175
    ParentFont = False
    About = 'Version 5.32'
    AboutRegistered = 'TOM SNIDER'
    Bands.Master = Master
    Bands.Detail = CBDetailBand1
    Bands.Title = Title
    Bands.PageHeader = PageHeader
    Bands.PageFooter = PageFooter
    Viewer.BkColor = 11234567
    Viewer.Heading = 'BandIt Viewer'
    Viewer.ShowCancelDialog = True
    Viewer.MinimizeRunForm = False
    Viewer.ZoomPercentage = 100.000000000000000000
    Page.FrameStyle = frThin
    Page.MarginLeft = 0.400000000000000000
    Page.MarginTop = 0.400000000000000000
    Page.MarginRight = 0.400000000000000000
    Page.PaperSize = A4
    OutputTo = poViewer
    Orientation = Default
    Units = poInches
    Copies = 1
    LineSpacing = 2.500000000000000000
    RewindBeforePrint = True
    object Master: TCBBand
      Left = 49
      Top = 153
      Width = 894
      Height = 166
      Align = alTop
      Color = clWhite
      Frame.Color = clSilver
      Frame.Left = frNone
      Frame.Right = frNone
      Frame.Top = frSingleThin
      Frame.Bottom = frSingleThin
      ForceNewPage = False
      BandType = cbMaster
      DataSource = DataSource1
      object Label35: TLabel
        Left = 8
        Top = 18
        Width = 75
        Height = 20
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'CustNo'
      end
      object Label36: TLabel
        Left = 16
        Top = 44
        Width = 67
        Height = 20
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'Company'
      end
      object Label37: TLabel
        Left = 32
        Top = 70
        Width = 51
        Height = 20
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'Addr1'
      end
      object Label38: TLabel
        Left = 40
        Top = 96
        Width = 43
        Height = 20
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'Addr2'
      end
      object Label39: TLabel
        Left = 48
        Top = 122
        Width = 35
        Height = 20
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'City'
      end
      object Label40: TLabel
        Left = 376
        Top = 20
        Width = 35
        Height = 20
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'State'
      end
      object Label41: TLabel
        Left = 376
        Top = 46
        Width = 35
        Height = 20
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'Zip'
      end
      object Label42: TLabel
        Left = 360
        Top = 72
        Width = 51
        Height = 20
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'Country'
      end
      object Label43: TLabel
        Left = 360
        Top = 98
        Width = 51
        Height = 20
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'Phone'
      end
      object Label44: TLabel
        Left = 302
        Top = 124
        Width = 109
        Height = 20
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'FAX'
      end
      object Label45: TLabel
        Left = 590
        Top = 22
        Width = 109
        Height = 20
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'TaxRate'
      end
      object Label46: TLabel
        Left = 590
        Top = 48
        Width = 109
        Height = 20
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'Contact'
      end
      object Label47: TLabel
        Left = 590
        Top = 74
        Width = 109
        Height = 20
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'LastInvoiceDate'
      end
      object DBEdit1: TDBEdit
        Left = 89
        Top = 14
        Width = 91
        Height = 24
        DataField = 'CustNo'
        DataSource = DataSource1
        MaxLength = 0
        TabOrder = 0
      end
      object DBEdit2: TDBEdit
        Left = 89
        Top = 40
        Width = 231
        Height = 24
        DataField = 'Company'
        DataSource = DataSource1
        MaxLength = 30
        TabOrder = 1
      end
      object DBEdit3: TDBEdit
        Left = 89
        Top = 66
        Width = 231
        Height = 24
        DataField = 'Addr1'
        DataSource = DataSource1
        MaxLength = 30
        TabOrder = 2
      end
      object DBEdit4: TDBEdit
        Left = 89
        Top = 92
        Width = 231
        Height = 24
        DataField = 'Addr2'
        DataSource = DataSource1
        MaxLength = 30
        TabOrder = 3
      end
      object DBEdit5: TDBEdit
        Left = 89
        Top = 118
        Width = 126
        Height = 24
        DataField = 'City'
        DataSource = DataSource1
        MaxLength = 15
        TabOrder = 4
      end
      object DBEdit6: TDBEdit
        Left = 417
        Top = 16
        Width = 161
        Height = 24
        DataField = 'State'
        DataSource = DataSource1
        MaxLength = 20
        TabOrder = 5
      end
      object DBEdit7: TDBEdit
        Left = 417
        Top = 42
        Width = 91
        Height = 24
        DataField = 'Zip'
        DataSource = DataSource1
        MaxLength = 10
        TabOrder = 6
      end
      object DBEdit8: TDBEdit
        Left = 417
        Top = 68
        Width = 161
        Height = 24
        DataField = 'Country'
        DataSource = DataSource1
        MaxLength = 20
        TabOrder = 7
      end
      object DBEdit9: TDBEdit
        Left = 417
        Top = 94
        Width = 126
        Height = 24
        DataField = 'Phone'
        DataSource = DataSource1
        MaxLength = 15
        TabOrder = 8
      end
      object DBEdit10: TDBEdit
        Left = 417
        Top = 120
        Width = 126
        Height = 24
        DataField = 'FAX'
        DataSource = DataSource1
        MaxLength = 15
        TabOrder = 9
      end
      object DBEdit11: TDBEdit
        Left = 705
        Top = 18
        Width = 91
        Height = 24
        DataField = 'TaxRate'
        DataSource = DataSource1
        MaxLength = 0
        TabOrder = 10
      end
      object DBEdit12: TDBEdit
        Left = 705
        Top = 44
        Width = 161
        Height = 24
        DataField = 'Contact'
        DataSource = DataSource1
        MaxLength = 20
        TabOrder = 11
      end
      object DBEdit13: TDBEdit
        Left = 705
        Top = 70
        Width = 168
        Height = 24
        DataField = 'LastInvoiceDate'
        DataSource = DataSource1
        MaxLength = 0
        TabOrder = 12
      end
    end
    object PageHeader: TCBBand
      Left = 49
      Top = 49
      Width = 894
      Height = 41
      Align = alTop
      Color = clWhite
      Frame.Color = clBlack
      Frame.Left = frNone
      Frame.Right = frNone
      Frame.Top = frDoubleThickThin
      Frame.Bottom = frNone
      ForceNewPage = False
      BandType = cbPageHeader
      object CB_Label2: TCB_Label
        Left = 364
        Top = 8
        Width = 166
        Height = 32
        Caption = 'Page Header'
        Font.Color = clBlue
        Font.Height = -27
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
        About = 'Version 5.32'
        Style = stRaised
        ShadowOffset = 5
      end
    end
    object Title: TCBBand
      Left = 49
      Top = 90
      Width = 894
      Height = 63
      Align = alTop
      Color = clWhite
      Frame.Color = clBlack
      Frame.Left = frDoubleThin
      Frame.Right = frDoubleThin
      Frame.Top = frDoubleThin
      Frame.Bottom = frDoubleThin
      ForceNewPage = False
      BandType = cbTitle
      object CB_Label1: TCB_Label
        Left = 311
        Top = 16
        Width = 272
        Height = 32
        Caption = 'Master - Detail Demo'
        Font.Color = clRed
        Font.Height = -27
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
        About = 'Version 5.32'
        Style = stRaised
        ShadowOffset = 5
      end
    end
    object CBDetailBand1: TCBDetailBand
      Left = 49
      Top = 319
      Width = 894
      Height = 136
      Align = alTop
      Color = clWhite
      Frame.Color = clSilver
      Frame.Left = frSingleThin
      Frame.Right = frSingleThin
      Frame.Top = frSingleThin
      Frame.Bottom = frSingleThin
      ForceNewPage = False
      BandType = cbDetail
      DataSource = DataSource2
      DetailFooterBand = DetailFooter
      object Label14: TLabel
        Left = 16
        Top = 7
        Width = 89
        Height = 20
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'OrderNo'
        FocusControl = EditOrderNo
        Font.Color = clTeal
        Font.Height = -15
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
      end
      object Label16: TLabel
        Left = 350
        Top = 7
        Width = 110
        Height = 20
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'SaleDate'
        FocusControl = EditSaleDate
        Font.Color = clTeal
        Font.Height = -15
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
      end
      object Label17: TLabel
        Left = 350
        Top = 33
        Width = 110
        Height = 20
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'ShipDate'
        FocusControl = EditShipDate
        Font.Color = clTeal
        Font.Height = -15
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
      end
      object Label18: TLabel
        Left = 46
        Top = 33
        Width = 59
        Height = 20
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'EmpNo'
        FocusControl = EditEmpNo
        Font.Color = clTeal
        Font.Height = -15
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
      end
      object Label19: TLabel
        Left = 5
        Top = 59
        Width = 100
        Height = 20
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'ShipToContact'
        FocusControl = EditShipToContact
        Font.Color = clTeal
        Font.Height = -15
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
      end
      object Label20: TLabel
        Left = 14
        Top = 85
        Width = 91
        Height = 20
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'ShipToAddr1'
        FocusControl = EditShipToAddr
        Font.Color = clTeal
        Font.Height = -15
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
      end
      object Label21: TLabel
        Left = 16
        Top = 111
        Width = 89
        Height = 20
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'ShipToAddr2'
        FocusControl = EditShipToAddr2
        Font.Color = clTeal
        Font.Height = -15
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
      end
      object Label28: TLabel
        Left = 350
        Top = 59
        Width = 110
        Height = 20
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'PO'
        FocusControl = EditPO
        Font.Color = clTeal
        Font.Height = -15
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
      end
      object Label29: TLabel
        Left = 350
        Top = 85
        Width = 110
        Height = 20
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'Terms'
        FocusControl = EditTerms
        Font.Color = clTeal
        Font.Height = -15
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
      end
      object Label30: TLabel
        Left = 350
        Top = 111
        Width = 110
        Height = 20
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'PaymentMethod'
        FocusControl = EditPaymentMethod
        Font.Color = clTeal
        Font.Height = -15
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
      end
      object Label31: TLabel
        Left = 638
        Top = 7
        Width = 110
        Height = 20
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'ItemsTotal'
        FocusControl = EditItemsTotal
        Font.Color = clTeal
        Font.Height = -15
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
      end
      object Label32: TLabel
        Left = 638
        Top = 33
        Width = 110
        Height = 20
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'TaxRate'
        FocusControl = EditTaxRate2
        Font.Color = clTeal
        Font.Height = -15
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
      end
      object Label33: TLabel
        Left = 638
        Top = 59
        Width = 110
        Height = 20
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'Freight'
        FocusControl = EditFreight
        Font.Color = clTeal
        Font.Height = -15
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
      end
      object Label34: TLabel
        Left = 638
        Top = 85
        Width = 110
        Height = 20
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'AmountPaid'
        FocusControl = EditAmountPaid
        Font.Color = clTeal
        Font.Height = -15
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
      end
      object EditOrderNo: TDBEdit
        Left = 114
        Top = 5
        Width = 91
        Height = 24
        DataField = 'OrderNo'
        DataSource = DataSource2
        MaxLength = 0
        TabOrder = 0
      end
      object EditSaleDate: TDBEdit
        Left = 466
        Top = 5
        Width = 168
        Height = 24
        DataField = 'SaleDate'
        DataSource = DataSource2
        MaxLength = 0
        TabOrder = 1
      end
      object EditShipDate: TDBEdit
        Left = 466
        Top = 31
        Width = 168
        Height = 24
        DataField = 'ShipDate'
        DataSource = DataSource2
        MaxLength = 0
        TabOrder = 2
      end
      object EditEmpNo: TDBEdit
        Left = 114
        Top = 31
        Width = 77
        Height = 24
        DataField = 'EmpNo'
        DataSource = DataSource2
        MaxLength = 0
        TabOrder = 3
      end
      object EditShipToContact: TDBEdit
        Left = 114
        Top = 57
        Width = 161
        Height = 24
        DataField = 'ShipToContact'
        DataSource = DataSource2
        MaxLength = 20
        TabOrder = 4
      end
      object EditShipToAddr: TDBEdit
        Left = 114
        Top = 83
        Width = 231
        Height = 24
        DataField = 'ShipToAddr1'
        DataSource = DataSource2
        MaxLength = 30
        TabOrder = 5
      end
      object EditShipToAddr2: TDBEdit
        Left = 114
        Top = 109
        Width = 231
        Height = 24
        DataField = 'ShipToAddr2'
        DataSource = DataSource2
        MaxLength = 30
        TabOrder = 6
      end
      object EditPO: TDBEdit
        Left = 466
        Top = 57
        Width = 126
        Height = 24
        DataField = 'PO'
        DataSource = DataSource2
        MaxLength = 15
        TabOrder = 7
      end
      object EditTerms: TDBEdit
        Left = 466
        Top = 83
        Width = 63
        Height = 24
        DataField = 'Terms'
        DataSource = DataSource2
        MaxLength = 6
        TabOrder = 8
      end
      object EditPaymentMethod: TDBEdit
        Left = 466
        Top = 109
        Width = 70
        Height = 24
        DataField = 'PaymentMethod'
        DataSource = DataSource2
        MaxLength = 7
        TabOrder = 9
      end
      object EditItemsTotal: TDBEdit
        Left = 754
        Top = 5
        Width = 91
        Height = 24
        DataField = 'ItemsTotal'
        DataSource = DataSource2
        MaxLength = 0
        TabOrder = 10
      end
      object EditTaxRate2: TDBEdit
        Left = 754
        Top = 31
        Width = 91
        Height = 24
        DataField = 'TaxRate'
        DataSource = DataSource2
        MaxLength = 0
        TabOrder = 11
      end
      object EditFreight: TDBEdit
        Left = 754
        Top = 57
        Width = 91
        Height = 24
        DataField = 'Freight'
        DataSource = DataSource2
        MaxLength = 0
        TabOrder = 12
      end
      object EditAmountPaid: TDBEdit
        Left = 754
        Top = 83
        Width = 91
        Height = 24
        DataField = 'AmountPaid'
        DataSource = DataSource2
        MaxLength = 0
        TabOrder = 13
      end
    end
    object DetailFooter: TCBBand
      Left = 49
      Top = 455
      Width = 894
      Height = 64
      Align = alTop
      Color = clWhite
      Frame.Color = clSilver
      Frame.Left = frSingleThin
      Frame.Right = frSingleThin
      Frame.Top = frSingleThin
      Frame.Bottom = frSingleThin
      ForceNewPage = False
      BandType = cbDetailFooter
      object Label1: TLabel
        Left = 48
        Top = 24
        Width = 132
        Height = 16
        Caption = 'Summary of orders for '
      end
      object CB_Label4: TCB_Label
        Left = 464
        Top = 32
        Width = 105
        Height = 33
        Caption = 'SubTotal'
        Font.Color = clNavy
        Font.Height = -20
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
        About = 'Version 5.32'
        Style = stRaised
        ShadowColor = 16777088
      end
      object CB_Label5: TCB_Label
        Left = 464
        Top = 7
        Width = 57
        Height = 24
        Caption = 'Count'
        Font.Color = clNavy
        Font.Height = -20
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
        About = 'Version 5.32'
        Style = stRaised
        ShadowColor = 16777088
      end
      object DBEdit14: TDBEdit
        Left = 185
        Top = 22
        Width = 231
        Height = 24
        DataField = 'Company'
        DataSource = DataSource1
        MaxLength = 30
        TabOrder = 0
      end
      object CBCalc1: TCBCalc
        Left = 584
        Top = 34
        Width = 73
        Height = 16
        DataField = 'AmountPaid'
        DataSource = DataSource2
        ParentFont = False
        ResetAfterBand = DetailFooter
        BorderStyle = bsNone
        Color = clWhite
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = []
        DisplayFormat = '#,##0.00'
        Text = '4,674.00'
        Alignment = taRightJustify
        Operation = cbSum
      end
      object CBCalc2: TCBCalc
        Left = 584
        Top = 10
        Width = 73
        Height = 16
        DataField = 'AmountPaid'
        DataSource = DataSource2
        ParentFont = False
        ResetAfterBand = DetailFooter
        BorderStyle = bsNone
        Color = clWhite
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = []
        DisplayFormat = '#,##0'
        Text = '1'
        Alignment = taRightJustify
        Operation = cbCount
      end
    end
    object PageFooter: TCBBand
      Left = 49
      Top = 519
      Width = 894
      Height = 41
      Align = alTop
      Color = clWhite
      Frame.Color = clSilver
      Frame.Left = frSingleThin
      Frame.Right = frSingleThin
      Frame.Top = frSingleThin
      Frame.Bottom = frSingleThin
      ForceNewPage = False
      BandType = cbPageFooter
      object CB_Label3: TCB_Label
        Left = 364
        Top = 8
        Width = 159
        Height = 32
        Caption = 'Page Footer'
        Font.Color = clBlue
        Font.Height = -27
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
        About = 'Version 5.32'
        Style = stRaised
        ShadowOffset = 5
      end
      object Label2: TLabel
        Left = 718
        Top = 13
        Width = 110
        Height = 20
        Alignment = taRightJustify
        AutoSize = False
        Caption = 'Page'
        FocusControl = EditTerms
        Font.Color = clBlack
        Font.Height = -15
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
      end
      object CBSystem1: TCBSystem
        Left = 8
        Top = 12
        Width = 100
        Height = 16
        ParentFont = False
        BorderStyle = bsNone
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = []
        Color = clWhite
        Data = cbDate
        DisplayFormat = '#,##0.00'
        Text = '0.00'
        Alignment = taLeftJustify
      end
      object CBSystem2: TCBSystem
        Left = 848
        Top = 12
        Width = 33
        Height = 16
        ParentFont = False
        BorderStyle = bsNone
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = []
        Color = clWhite
        Data = cbPageNumber
        DisplayFormat = '0'
        Text = '1'
        Alignment = taLeftJustify
      end
    end
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 287
    Top = 5
  end
  object DataSource2: TDataSource
    DataSet = Table2
    Left = 343
    Top = 5
  end
  object Table1: TTable
    Active = True
    DatabaseName = 'DBDEMOS'
    TableName = 'CUSTOMER.DB'
    Left = 259
    Top = 5
    object Table1CustNo: TFloatField
      FieldName = 'CustNo'
    end
    object Table1Company: TStringField
      FieldName = 'Company'
      Size = 30
    end
    object Table1Addr1: TStringField
      FieldName = 'Addr1'
      Size = 30
    end
    object Table1Addr2: TStringField
      FieldName = 'Addr2'
      Size = 30
    end
    object Table1City: TStringField
      FieldName = 'City'
      Size = 15
    end
    object Table1State: TStringField
      FieldName = 'State'
    end
    object Table1Zip: TStringField
      FieldName = 'Zip'
      Size = 10
    end
    object Table1Country: TStringField
      FieldName = 'Country'
    end
    object Table1Phone: TStringField
      FieldName = 'Phone'
      Size = 15
    end
    object Table1FAX: TStringField
      FieldName = 'FAX'
      Size = 15
    end
    object Table1TaxRate: TFloatField
      FieldName = 'TaxRate'
    end
    object Table1Contact: TStringField
      FieldName = 'Contact'
    end
    object Table1LastInvoiceDate: TDateTimeField
      FieldName = 'LastInvoiceDate'
    end
  end
  object Table2: TTable
    Active = True
    DatabaseName = 'DBDEMOS'
    IndexName = 'CustNo'
    MasterFields = 'CustNo'
    MasterSource = DataSource1
    TableName = 'ORDERS.DB'
    Left = 315
    Top = 5
    object Table2OrderNo: TFloatField
      FieldName = 'OrderNo'
    end
    object Table2CustNo: TFloatField
      FieldName = 'CustNo'
      Required = True
    end
    object Table2SaleDate: TDateTimeField
      FieldName = 'SaleDate'
    end
    object Table2ShipDate: TDateTimeField
      FieldName = 'ShipDate'
    end
    object Table2EmpNo: TIntegerField
      FieldName = 'EmpNo'
      Required = True
    end
    object Table2ShipToContact: TStringField
      FieldName = 'ShipToContact'
    end
    object Table2ShipToAddr1: TStringField
      FieldName = 'ShipToAddr1'
      Size = 30
    end
    object Table2ShipToAddr2: TStringField
      FieldName = 'ShipToAddr2'
      Size = 30
    end
    object Table2ShipToCity: TStringField
      FieldName = 'ShipToCity'
      Size = 15
    end
    object Table2ShipToState: TStringField
      FieldName = 'ShipToState'
    end
    object Table2ShipToZip: TStringField
      FieldName = 'ShipToZip'
      Size = 10
    end
    object Table2ShipToCountry: TStringField
      FieldName = 'ShipToCountry'
    end
    object Table2ShipToPhone: TStringField
      FieldName = 'ShipToPhone'
      Size = 15
    end
    object Table2ShipVIA: TStringField
      FieldName = 'ShipVIA'
      Size = 7
    end
    object Table2PO: TStringField
      FieldName = 'PO'
      Size = 15
    end
    object Table2Terms: TStringField
      FieldName = 'Terms'
      Size = 6
    end
    object Table2PaymentMethod: TStringField
      FieldName = 'PaymentMethod'
      Size = 7
    end
    object Table2ItemsTotal: TCurrencyField
      FieldName = 'ItemsTotal'
      Currency = True
    end
    object Table2TaxRate: TFloatField
      FieldName = 'TaxRate'
    end
    object Table2Freight: TCurrencyField
      FieldName = 'Freight'
      Currency = True
    end
    object Table2AmountPaid: TCurrencyField
      FieldName = 'AmountPaid'
      Currency = True
    end
  end
end