home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1997 May / Pcwk0597.iso / delphi / cbsuite.lzh / SU1SRC.ZIP / DEMO03.DFM / DEMO03.txt
Encoding:
Text File  |  1997-01-18  |  24.3 KB  |  1,040 lines
  1. object FBDemo03: TFBDemo03
  2.   Left = 78
  3.   Top = 98
  4.   Width = 643
  5.   Height = 600
  6.   Caption = 'FBDemo03'
  7.   Font.Color = clWindowText
  8.   Font.Height = -13
  9.   Font.Name = 'MS Sans Serif'
  10.   Font.Style = []
  11.   PixelsPerInch = 120
  12.   TextHeight = 16
  13.   object CBReport1: TCBReport
  14.     Left = 24
  15.     Top = 40
  16.     Width = 992
  17.     Height = 1403
  18.     Font.Color = clWindowText
  19.     Font.Height = 16
  20.     Font.Name = 'Arial'
  21.     Font.Style = []
  22.     Color = 15794175
  23.     ParentFont = False
  24.     About = 'Version 5.32'
  25.     AboutRegistered = 'TOM SNIDER'
  26.     Bands.Master = Master
  27.     Bands.Detail = CBDetailBand1
  28.     Bands.Title = Title
  29.     Bands.PageHeader = PageHeader
  30.     Bands.PageFooter = PageFooter
  31.     Viewer.BkColor = 11234567
  32.     Viewer.Heading = 'BandIt Viewer'
  33.     Viewer.ShowCancelDialog = True
  34.     Viewer.MinimizeRunForm = False
  35.     Viewer.ZoomPercentage = 100.000000000000000000
  36.     Page.FrameStyle = frThin
  37.     Page.MarginLeft = 0.400000000000000000
  38.     Page.MarginTop = 0.400000000000000000
  39.     Page.MarginRight = 0.400000000000000000
  40.     Page.PaperSize = A4
  41.     OutputTo = poViewer
  42.     Orientation = Default
  43.     Units = poInches
  44.     Copies = 1
  45.     LineSpacing = 2.500000000000000000
  46.     RewindBeforePrint = True
  47.     object Master: TCBBand
  48.       Left = 49
  49.       Top = 193
  50.       Width = 894
  51.       Height = 198
  52.       Align = alTop
  53.       Color = clWhite
  54.       Frame.Color = clSilver
  55.       Frame.Left = frNone
  56.       Frame.Right = frNone
  57.       Frame.Top = frSingleThin
  58.       Frame.Bottom = frSingleThin
  59.       ForceNewPage = False
  60.       BandType = cbMaster
  61.       DataSource = DataSource1
  62.       object Label35: TLabel
  63.         Left = 8
  64.         Top = 34
  65.         Width = 75
  66.         Height = 20
  67.         Alignment = taRightJustify
  68.         AutoSize = False
  69.         Caption = 'CustNo'
  70.       end
  71.       object Label36: TLabel
  72.         Left = 16
  73.         Top = 60
  74.         Width = 67
  75.         Height = 20
  76.         Alignment = taRightJustify
  77.         AutoSize = False
  78.         Caption = 'Company'
  79.       end
  80.       object Label37: TLabel
  81.         Left = 32
  82.         Top = 86
  83.         Width = 51
  84.         Height = 20
  85.         Alignment = taRightJustify
  86.         AutoSize = False
  87.         Caption = 'Addr1'
  88.       end
  89.       object Label38: TLabel
  90.         Left = 40
  91.         Top = 112
  92.         Width = 43
  93.         Height = 20
  94.         Alignment = taRightJustify
  95.         AutoSize = False
  96.         Caption = 'Addr2'
  97.       end
  98.       object Label39: TLabel
  99.         Left = 48
  100.         Top = 138
  101.         Width = 35
  102.         Height = 20
  103.         Alignment = taRightJustify
  104.         AutoSize = False
  105.         Caption = 'City'
  106.       end
  107.       object Label40: TLabel
  108.         Left = 364
  109.         Top = 36
  110.         Width = 47
  111.         Height = 20
  112.         Alignment = taRightJustify
  113.         AutoSize = False
  114.         Caption = 'State'
  115.       end
  116.       object Label41: TLabel
  117.         Left = 356
  118.         Top = 62
  119.         Width = 55
  120.         Height = 20
  121.         Alignment = taRightJustify
  122.         AutoSize = False
  123.         Caption = 'Zip'
  124.       end
  125.       object Label42: TLabel
  126.         Left = 340
  127.         Top = 88
  128.         Width = 71
  129.         Height = 20
  130.         Alignment = taRightJustify
  131.         AutoSize = False
  132.         Caption = 'Country'
  133.       end
  134.       object Label43: TLabel
  135.         Left = 332
  136.         Top = 114
  137.         Width = 79
  138.         Height = 20
  139.         Alignment = taRightJustify
  140.         AutoSize = False
  141.         Caption = 'Phone'
  142.       end
  143.       object Label44: TLabel
  144.         Left = 302
  145.         Top = 140
  146.         Width = 109
  147.         Height = 20
  148.         Alignment = taRightJustify
  149.         AutoSize = False
  150.         Caption = 'FAX'
  151.       end
  152.       object Label45: TLabel
  153.         Left = 590
  154.         Top = 38
  155.         Width = 109
  156.         Height = 20
  157.         Alignment = taRightJustify
  158.         AutoSize = False
  159.         Caption = 'TaxRate'
  160.       end
  161.       object Label46: TLabel
  162.         Left = 590
  163.         Top = 64
  164.         Width = 109
  165.         Height = 20
  166.         Alignment = taRightJustify
  167.         AutoSize = False
  168.         Caption = 'Contact'
  169.       end
  170.       object Label47: TLabel
  171.         Left = 590
  172.         Top = 90
  173.         Width = 109
  174.         Height = 20
  175.         Alignment = taRightJustify
  176.         AutoSize = False
  177.         Caption = 'LastInvoiceDate'
  178.       end
  179.       object DBEdit1: TDBEdit
  180.         Left = 89
  181.         Top = 30
  182.         Width = 91
  183.         Height = 24
  184.         DataField = 'CustNo'
  185.         DataSource = DataSource1
  186.         MaxLength = 0
  187.         TabOrder = 0
  188.       end
  189.       object DBEdit2: TDBEdit
  190.         Left = 89
  191.         Top = 56
  192.         Width = 231
  193.         Height = 24
  194.         DataField = 'Company'
  195.         DataSource = DataSource1
  196.         MaxLength = 30
  197.         TabOrder = 1
  198.       end
  199.       object DBEdit3: TDBEdit
  200.         Left = 89
  201.         Top = 82
  202.         Width = 231
  203.         Height = 24
  204.         DataField = 'Addr1'
  205.         DataSource = DataSource1
  206.         MaxLength = 30
  207.         TabOrder = 2
  208.       end
  209.       object DBEdit4: TDBEdit
  210.         Left = 89
  211.         Top = 108
  212.         Width = 231
  213.         Height = 24
  214.         DataField = 'Addr2'
  215.         DataSource = DataSource1
  216.         MaxLength = 30
  217.         TabOrder = 3
  218.       end
  219.       object DBEdit5: TDBEdit
  220.         Left = 89
  221.         Top = 134
  222.         Width = 126
  223.         Height = 24
  224.         DataField = 'City'
  225.         DataSource = DataSource1
  226.         MaxLength = 15
  227.         TabOrder = 4
  228.       end
  229.       object DBEdit6: TDBEdit
  230.         Left = 417
  231.         Top = 32
  232.         Width = 161
  233.         Height = 24
  234.         DataField = 'State'
  235.         DataSource = DataSource1
  236.         MaxLength = 20
  237.         TabOrder = 5
  238.       end
  239.       object DBEdit7: TDBEdit
  240.         Left = 417
  241.         Top = 58
  242.         Width = 91
  243.         Height = 24
  244.         DataField = 'Zip'
  245.         DataSource = DataSource1
  246.         MaxLength = 10
  247.         TabOrder = 6
  248.       end
  249.       object DBEdit8: TDBEdit
  250.         Left = 417
  251.         Top = 84
  252.         Width = 161
  253.         Height = 24
  254.         DataField = 'Country'
  255.         DataSource = DataSource1
  256.         MaxLength = 20
  257.         TabOrder = 7
  258.       end
  259.       object DBEdit9: TDBEdit
  260.         Left = 417
  261.         Top = 110
  262.         Width = 126
  263.         Height = 24
  264.         DataField = 'Phone'
  265.         DataSource = DataSource1
  266.         MaxLength = 15
  267.         TabOrder = 8
  268.       end
  269.       object DBEdit10: TDBEdit
  270.         Left = 417
  271.         Top = 136
  272.         Width = 126
  273.         Height = 24
  274.         DataField = 'FAX'
  275.         DataSource = DataSource1
  276.         MaxLength = 15
  277.         TabOrder = 9
  278.       end
  279.       object DBEdit11: TDBEdit
  280.         Left = 705
  281.         Top = 34
  282.         Width = 91
  283.         Height = 24
  284.         DataField = 'TaxRate'
  285.         DataSource = DataSource1
  286.         MaxLength = 0
  287.         TabOrder = 10
  288.       end
  289.       object DBEdit12: TDBEdit
  290.         Left = 705
  291.         Top = 60
  292.         Width = 161
  293.         Height = 24
  294.         DataField = 'Contact'
  295.         DataSource = DataSource1
  296.         MaxLength = 20
  297.         TabOrder = 11
  298.       end
  299.       object DBEdit13: TDBEdit
  300.         Left = 705
  301.         Top = 86
  302.         Width = 168
  303.         Height = 24
  304.         DataField = 'LastInvoiceDate'
  305.         DataSource = DataSource1
  306.         MaxLength = 0
  307.         TabOrder = 12
  308.       end
  309.     end
  310.     object PageHeader: TCBBand
  311.       Left = 49
  312.       Top = 49
  313.       Width = 894
  314.       Height = 80
  315.       Align = alTop
  316.       Color = clWhite
  317.       Frame.Color = clBlack
  318.       Frame.Left = frNone
  319.       Frame.Right = frNone
  320.       Frame.Top = frDoubleThickThin
  321.       Frame.Bottom = frSingleThin
  322.       ForceNewPage = False
  323.       BandType = cbPageHeader
  324.       object CB_Label2: TCB_Label
  325.         Left = 364
  326.         Top = 24
  327.         Width = 166
  328.         Height = 32
  329.         Caption = 'Page Header'
  330.         Font.Color = clBlue
  331.         Font.Height = -27
  332.         Font.Name = 'Arial'
  333.         Font.Style = [fsBold]
  334.         ParentFont = False
  335.         Transparent = True
  336.         About = 'Version 5.32'
  337.         Style = stRaised
  338.         ShadowOffset = 5
  339.       end
  340.       object CBSystem2: TCBSystem
  341.         Left = 7
  342.         Top = 32
  343.         Width = 170
  344.         Height = 16
  345.         ParentFont = False
  346.         BorderStyle = bsNone
  347.         Font.Color = clWindowText
  348.         Font.Height = -13
  349.         Font.Name = 'Arial'
  350.         Font.Style = []
  351.         Color = clWhite
  352.         Data = cbDateTime
  353.         DisplayFormat = '0'
  354.         Text = '1'
  355.         Alignment = taLeftJustify
  356.       end
  357.     end
  358.     object Title: TCBBand
  359.       Left = 49
  360.       Top = 129
  361.       Width = 894
  362.       Height = 64
  363.       Align = alTop
  364.       Color = clWhite
  365.       Frame.Color = clBlack
  366.       Frame.Left = frSingleThin
  367.       Frame.Right = frSingleThin
  368.       Frame.Top = frSingleThin
  369.       Frame.Bottom = frSingleThin
  370.       ForceNewPage = False
  371.       BandType = cbTitle
  372.       object CB_Label1: TCB_Label
  373.         Left = 311
  374.         Top = 16
  375.         Width = 272
  376.         Height = 32
  377.         Caption = 'Master - Detail Demo'
  378.         Font.Color = clRed
  379.         Font.Height = -27
  380.         Font.Name = 'Arial'
  381.         Font.Style = [fsBold]
  382.         ParentFont = False
  383.         Transparent = True
  384.         About = 'Version 5.32'
  385.         Style = stRaised
  386.         ShadowOffset = 5
  387.       end
  388.     end
  389.     object CBDetailBand1: TCBDetailBand
  390.       Left = 49
  391.       Top = 417
  392.       Width = 894
  393.       Height = 22
  394.       Align = alTop
  395.       Color = clWhite
  396.       Frame.Color = clSilver
  397.       Frame.Left = frSingleThin
  398.       Frame.Right = frSingleThin
  399.       Frame.Top = frSingleThin
  400.       Frame.Bottom = frNone
  401.       ForceNewPage = False
  402.       BandType = cbDetail
  403.       DataSource = DataSource2
  404.       DetailHeaderBand = DetailHeader
  405.       DetailFooterBand = DetailFooter
  406.       object EditOrderNo: TDBEdit
  407.         Left = 14
  408.         Top = 2
  409.         Width = 91
  410.         Height = 18
  411.         BorderStyle = bsNone
  412.         DataField = 'OrderNo'
  413.         DataSource = DataSource2
  414.         MaxLength = 0
  415.         TabOrder = 0
  416.       end
  417.       object EditSaleDate: TDBEdit
  418.         Left = 138
  419.         Top = 2
  420.         Width = 55
  421.         Height = 18
  422.         BorderStyle = bsNone
  423.         DataField = 'SaleDate'
  424.         DataSource = DataSource2
  425.         Font.Color = clBlack
  426.         Font.Height = -15
  427.         Font.Name = 'Arial'
  428.         Font.Style = []
  429.         MaxLength = 0
  430.         ParentFont = False
  431.         TabOrder = 1
  432.       end
  433.       object EditEmpNo: TDBEdit
  434.         Left = 200
  435.         Top = 2
  436.         Width = 83
  437.         Height = 18
  438.         BorderStyle = bsNone
  439.         DataField = 'EmpNo'
  440.         DataSource = DataSource2
  441.         Font.Color = clBlack
  442.         Font.Height = -15
  443.         Font.Name = 'Arial'
  444.         Font.Style = []
  445.         MaxLength = 0
  446.         ParentFont = False
  447.         TabOrder = 2
  448.       end
  449.       object EditTerms: TDBEdit
  450.         Left = 306
  451.         Top = 2
  452.         Width = 63
  453.         Height = 18
  454.         BorderStyle = bsNone
  455.         DataField = 'Terms'
  456.         DataSource = DataSource2
  457.         Font.Color = clBlack
  458.         Font.Height = -15
  459.         Font.Name = 'Arial'
  460.         Font.Style = []
  461.         MaxLength = 6
  462.         ParentFont = False
  463.         TabOrder = 3
  464.       end
  465.       object EditPaymentMethod: TDBEdit
  466.         Left = 370
  467.         Top = 2
  468.         Width = 70
  469.         Height = 18
  470.         BorderStyle = bsNone
  471.         DataField = 'PaymentMethod'
  472.         DataSource = DataSource2
  473.         Font.Color = clBlack
  474.         Font.Height = -15
  475.         Font.Name = 'Arial'
  476.         Font.Style = []
  477.         MaxLength = 7
  478.         ParentFont = False
  479.         TabOrder = 4
  480.       end
  481.       object EditItemsTotal: TDBEdit
  482.         Left = 490
  483.         Top = 2
  484.         Width = 91
  485.         Height = 18
  486.         BorderStyle = bsNone
  487.         DataField = 'ItemsTotal'
  488.         DataSource = DataSource2
  489.         Font.Color = clBlack
  490.         Font.Height = -15
  491.         Font.Name = 'Arial'
  492.         Font.Style = []
  493.         MaxLength = 0
  494.         ParentFont = False
  495.         TabOrder = 5
  496.       end
  497.       object EditTaxRate2: TDBEdit
  498.         Left = 594
  499.         Top = 2
  500.         Width = 91
  501.         Height = 18
  502.         BorderStyle = bsNone
  503.         DataField = 'TaxRate'
  504.         DataSource = DataSource2
  505.         Font.Color = clBlack
  506.         Font.Height = -15
  507.         Font.Name = 'Arial'
  508.         Font.Style = []
  509.         MaxLength = 0
  510.         ParentFont = False
  511.         TabOrder = 6
  512.       end
  513.       object EditFreight: TDBEdit
  514.         Left = 711
  515.         Top = 2
  516.         Width = 70
  517.         Height = 18
  518.         BorderStyle = bsNone
  519.         DataField = 'Freight'
  520.         DataSource = DataSource2
  521.         Font.Color = clBlack
  522.         Font.Height = -15
  523.         Font.Name = 'Arial'
  524.         Font.Style = []
  525.         MaxLength = 0
  526.         ParentFont = False
  527.         TabOrder = 7
  528.       end
  529.       object EditAmountPaid: TDBEdit
  530.         Left = 786
  531.         Top = 2
  532.         Width = 91
  533.         Height = 18
  534.         BorderStyle = bsNone
  535.         DataField = 'AmountPaid'
  536.         DataSource = DataSource2
  537.         Font.Color = clBlack
  538.         Font.Height = -15
  539.         Font.Name = 'Arial'
  540.         Font.Style = []
  541.         MaxLength = 0
  542.         ParentFont = False
  543.         TabOrder = 8
  544.       end
  545.     end
  546.     object DetailFooter: TCBBand
  547.       Left = 49
  548.       Top = 439
  549.       Width = 894
  550.       Height = 24
  551.       Align = alTop
  552.       Color = clWhite
  553.       Frame.Color = clBlack
  554.       Frame.Left = frNone
  555.       Frame.Right = frNone
  556.       Frame.Top = frSingleThin
  557.       Frame.Bottom = frDoubleThinThick
  558.       ForceNewPage = False
  559.       BandType = cbDetailFooter
  560.       object CBCalc1: TCBCalc
  561.         Left = 471
  562.         Top = 2
  563.         Width = 109
  564.         Height = 16
  565.         DataField = 'ItemsTotal'
  566.         DataSource = DataSource2
  567.         ParentFont = False
  568.         ResetAfterBand = DetailFooter
  569.         BorderStyle = bsNone
  570.         Color = clWhite
  571.         Font.Color = clBlack
  572.         Font.Height = -15
  573.         Font.Name = 'Arial'
  574.         Font.Style = []
  575.         DisplayFormat = 'R #,##0.00'
  576.         Text = 'R 4,674.00'
  577.         Alignment = taRightJustify
  578.         Operation = cbSum
  579.       end
  580.       object CBCalc2: TCBCalc
  581.         Left = 704
  582.         Top = 2
  583.         Width = 76
  584.         Height = 16
  585.         DataField = 'Freight'
  586.         DataSource = DataSource2
  587.         ParentFont = False
  588.         ResetAfterBand = DetailFooter
  589.         BorderStyle = bsNone
  590.         Color = clWhite
  591.         Font.Color = clBlack
  592.         Font.Height = -15
  593.         Font.Name = 'Arial'
  594.         Font.Style = []
  595.         DisplayFormat = 'R #,##0.00'
  596.         Text = 'R 0.00'
  597.         Alignment = taRightJustify
  598.         Operation = cbSum
  599.       end
  600.       object CBCalc3: TCBCalc
  601.         Left = 791
  602.         Top = 2
  603.         Width = 85
  604.         Height = 16
  605.         DataField = 'AmountPaid'
  606.         DataSource = DataSource2
  607.         ParentFont = False
  608.         ResetAfterBand = DetailFooter
  609.         BorderStyle = bsNone
  610.         Color = clWhite
  611.         Font.Color = clBlack
  612.         Font.Height = -15
  613.         Font.Name = 'Arial'
  614.         Font.Style = []
  615.         DisplayFormat = 'R #,##0.00'
  616.         Text = 'R 4,674.00'
  617.         Alignment = taRightJustify
  618.         Operation = cbSum
  619.       end
  620.     end
  621.     object DetailHeader: TCBBand
  622.       Left = 49
  623.       Top = 391
  624.       Width = 894
  625.       Height = 26
  626.       Align = alTop
  627.       Color = clWhite
  628.       Frame.Color = clBlack
  629.       Frame.Left = frSingleThin
  630.       Frame.Right = frSingleThin
  631.       Frame.Top = frSingleThin
  632.       Frame.Bottom = frSingleThin
  633.       ForceNewPage = False
  634.       BandType = cbDetailHeader
  635.       object Label2: TLabel
  636.         Left = 40
  637.         Top = 2
  638.         Width = 65
  639.         Height = 16
  640.         Alignment = taRightJustify
  641.         AutoSize = False
  642.         Caption = 'OrderNo'
  643.         FocusControl = EditOrderNo
  644.         Font.Color = clNavy
  645.         Font.Height = -15
  646.         Font.Name = 'Arial'
  647.         Font.Style = [fsBold]
  648.         ParentFont = False
  649.       end
  650.       object Label3: TLabel
  651.         Left = 128
  652.         Top = 2
  653.         Width = 68
  654.         Height = 16
  655.         Alignment = taRightJustify
  656.         AutoSize = False
  657.         Caption = 'SaleDate'
  658.         FocusControl = EditSaleDate
  659.         Font.Color = clNavy
  660.         Font.Height = -15
  661.         Font.Name = 'Arial'
  662.         Font.Style = [fsBold]
  663.         ParentFont = False
  664.       end
  665.       object Label4: TLabel
  666.         Left = 232
  667.         Top = 2
  668.         Width = 52
  669.         Height = 16
  670.         Alignment = taRightJustify
  671.         AutoSize = False
  672.         Caption = 'EmpNo'
  673.         FocusControl = EditEmpNo
  674.         Font.Color = clNavy
  675.         Font.Height = -15
  676.         Font.Name = 'Arial'
  677.         Font.Style = [fsBold]
  678.         ParentFont = False
  679.       end
  680.       object Label5: TLabel
  681.         Left = 304
  682.         Top = 2
  683.         Width = 52
  684.         Height = 16
  685.         AutoSize = False
  686.         Caption = 'Terms'
  687.         FocusControl = EditTerms
  688.         Font.Color = clNavy
  689.         Font.Height = -15
  690.         Font.Name = 'Arial'
  691.         Font.Style = [fsBold]
  692.         ParentFont = False
  693.       end
  694.       object Label6: TLabel
  695.         Left = 360
  696.         Top = 2
  697.         Width = 124
  698.         Height = 16
  699.         Alignment = taRightJustify
  700.         AutoSize = False
  701.         Caption = 'PaymentMethod'
  702.         FocusControl = EditPaymentMethod
  703.         Font.Color = clNavy
  704.         Font.Height = -15
  705.         Font.Name = 'Arial'
  706.         Font.Style = [fsBold]
  707.         ParentFont = False
  708.       end
  709.       object Label7: TLabel
  710.         Left = 496
  711.         Top = 2
  712.         Width = 84
  713.         Height = 16
  714.         Alignment = taRightJustify
  715.         AutoSize = False
  716.         Caption = 'ItemsTotal'
  717.         FocusControl = EditItemsTotal
  718.         Font.Color = clNavy
  719.         Font.Height = -15
  720.         Font.Name = 'Arial'
  721.         Font.Style = [fsBold]
  722.         ParentFont = False
  723.       end
  724.       object Label8: TLabel
  725.         Left = 616
  726.         Top = 2
  727.         Width = 68
  728.         Height = 16
  729.         Alignment = taRightJustify
  730.         AutoSize = False
  731.         Caption = 'TaxRate'
  732.         FocusControl = EditTaxRate2
  733.         Font.Color = clNavy
  734.         Font.Height = -15
  735.         Font.Name = 'Arial'
  736.         Font.Style = [fsBold]
  737.         ParentFont = False
  738.       end
  739.       object Label9: TLabel
  740.         Left = 728
  741.         Top = 2
  742.         Width = 52
  743.         Height = 16
  744.         Alignment = taRightJustify
  745.         AutoSize = False
  746.         Caption = 'Freight'
  747.         FocusControl = EditFreight
  748.         Font.Color = clNavy
  749.         Font.Height = -15
  750.         Font.Name = 'Arial'
  751.         Font.Style = [fsBold]
  752.         ParentFont = False
  753.       end
  754.       object Label10: TLabel
  755.         Left = 792
  756.         Top = 2
  757.         Width = 84
  758.         Height = 16
  759.         Alignment = taRightJustify
  760.         AutoSize = False
  761.         Caption = 'AmountPaid'
  762.         FocusControl = EditAmountPaid
  763.         Font.Color = clNavy
  764.         Font.Height = -15
  765.         Font.Name = 'Arial'
  766.         Font.Style = [fsBold]
  767.         ParentFont = False
  768.       end
  769.     end
  770.     object PageFooter: TCBBand
  771.       Left = 49
  772.       Top = 463
  773.       Width = 894
  774.       Height = 41
  775.       Align = alTop
  776.       Color = clWhite
  777.       Frame.Color = clSilver
  778.       Frame.Left = frSingleThin
  779.       Frame.Right = frSingleThin
  780.       Frame.Top = frSingleThin
  781.       Frame.Bottom = frSingleThin
  782.       ForceNewPage = False
  783.       BandType = cbPageFooter
  784.       object CB_Label3: TCB_Label
  785.         Left = 364
  786.         Top = 8
  787.         Width = 159
  788.         Height = 32
  789.         Caption = 'Page Footer'
  790.         Font.Color = clBlue
  791.         Font.Height = -27
  792.         Font.Name = 'Arial'
  793.         Font.Style = [fsBold]
  794.         ParentFont = False
  795.         Transparent = True
  796.         About = 'Version 5.32'
  797.         Style = stRaised
  798.         ShadowOffset = 5
  799.       end
  800.       object Label11: TLabel
  801.         Left = 718
  802.         Top = 13
  803.         Width = 110
  804.         Height = 20
  805.         Alignment = taRightJustify
  806.         AutoSize = False
  807.         Caption = 'Page'
  808.         FocusControl = EditTerms
  809.         Font.Color = clBlack
  810.         Font.Height = -15
  811.         Font.Name = 'Arial'
  812.         Font.Style = []
  813.         ParentFont = False
  814.       end
  815.       object CBSystem3: TCBSystem
  816.         Left = 8
  817.         Top = 12
  818.         Width = 100
  819.         Height = 16
  820.         ParentFont = False
  821.         BorderStyle = bsNone
  822.         Font.Color = clWindowText
  823.         Font.Height = -13
  824.         Font.Name = 'Arial'
  825.         Font.Style = []
  826.         Color = clWhite
  827.         Data = cbDate
  828.         DisplayFormat = '#,##0.00'
  829.         Text = '0.00'
  830.         Alignment = taLeftJustify
  831.       end
  832.       object CBSystem4: TCBSystem
  833.         Left = 848
  834.         Top = 12
  835.         Width = 33
  836.         Height = 16
  837.         ParentFont = False
  838.         BorderStyle = bsNone
  839.         Font.Color = clWindowText
  840.         Font.Height = -13
  841.         Font.Name = 'Arial'
  842.         Font.Style = []
  843.         Color = clWhite
  844.         Data = cbPageNumber
  845.         DisplayFormat = '0'
  846.         Text = '1'
  847.         Alignment = taLeftJustify
  848.       end
  849.     end
  850.   end
  851.   object Panel1: TPanel
  852.     Left = 0
  853.     Top = 0
  854.     Width = 1016
  855.     Height = 42
  856.     Align = alTop
  857.     TabOrder = 0
  858.     object DBNavigator: TDBNavigator
  859.       Left = 10
  860.       Top = 5
  861.       Width = 281
  862.       Height = 31
  863.       Ctl3D = False
  864.       ParentCtl3D = False
  865.       TabOrder = 0
  866.     end
  867.     object Button1: TButton
  868.       Left = 688
  869.       Top = 9
  870.       Width = 75
  871.       Height = 25
  872.       Caption = 'Button1'
  873.       TabOrder = 1
  874.       OnClick = Button1Click
  875.     end
  876.   end
  877.   object DataSource1: TDataSource
  878.     DataSet = Table1
  879.     Left = 320
  880.     Top = 8
  881.   end
  882.   object DataSource2: TDataSource
  883.     DataSet = Table2
  884.     Left = 400
  885.     Top = 8
  886.   end
  887.   object Table1: TTable
  888.     Active = True
  889.     DatabaseName = 'DBDEMOS'
  890.     TableName = 'CUSTOMER.DB'
  891.     Left = 352
  892.     Top = 8
  893.     object Table1CustNo: TFloatField
  894.       Alignment = taLeftJustify
  895.       FieldName = 'CustNo'
  896.       DisplayFormat = 'CN 0000'
  897.       MaxValue = 9999.000000000000000000
  898.       MinValue = 1000.000000000000000000
  899.     end
  900.     object Table1Company: TStringField
  901.       FieldName = 'Company'
  902.       Size = 30
  903.     end
  904.     object Table1Addr1: TStringField
  905.       FieldName = 'Addr1'
  906.       Size = 30
  907.     end
  908.     object Table1Addr2: TStringField
  909.       FieldName = 'Addr2'
  910.       Size = 30
  911.     end
  912.     object Table1City: TStringField
  913.       FieldName = 'City'
  914.       Size = 15
  915.     end
  916.     object Table1State: TStringField
  917.       FieldName = 'State'
  918.     end
  919.     object Table1Zip: TStringField
  920.       FieldName = 'Zip'
  921.       Size = 10
  922.     end
  923.     object Table1Country: TStringField
  924.       FieldName = 'Country'
  925.     end
  926.     object Table1Phone: TStringField
  927.       FieldName = 'Phone'
  928.       Size = 15
  929.     end
  930.     object Table1FAX: TStringField
  931.       FieldName = 'FAX'
  932.       Size = 15
  933.     end
  934.     object Table1TaxRate: TFloatField
  935.       FieldName = 'TaxRate'
  936.       DisplayFormat = '0.00%'
  937.     end
  938.     object Table1Contact: TStringField
  939.       FieldName = 'Contact'
  940.     end
  941.     object Table1LastInvoiceDate: TDateTimeField
  942.       FieldName = 'LastInvoiceDate'
  943.     end
  944.   end
  945.   object Table2: TTable
  946.     Active = True
  947.     DatabaseName = 'DBDEMOS'
  948.     IndexName = 'CustNo'
  949.     MasterFields = 'CustNo'
  950.     MasterSource = DataSource1
  951.     TableName = 'ORDERS.DB'
  952.     Left = 432
  953.     Top = 8
  954.     object Table2OrderNo: TFloatField
  955.       FieldName = 'OrderNo'
  956.       DisplayFormat = #39'#'#39'0000'
  957.     end
  958.     object Table2CustNo: TFloatField
  959.       Alignment = taLeftJustify
  960.       FieldName = 'CustNo'
  961.       DisplayFormat = 'CN 0000'
  962.       MaxValue = 9999.000000000000000000
  963.       MinValue = 1000.000000000000000000
  964.     end
  965.     object Table2SaleDate: TDateTimeField
  966.       FieldName = 'SaleDate'
  967.     end
  968.     object Table2ShipDate: TDateTimeField
  969.       FieldName = 'ShipDate'
  970.     end
  971.     object Table2EmpNo: TIntegerField
  972.       FieldName = 'EmpNo'
  973.       DisplayFormat = 'Emp'#39'#'#39' 0000'
  974.       MaxValue = 9999
  975.       MinValue = 1
  976.     end
  977.     object Table2ShipToContact: TStringField
  978.       FieldName = 'ShipToContact'
  979.     end
  980.     object Table2ShipToAddr1: TStringField
  981.       FieldName = 'ShipToAddr1'
  982.       Size = 30
  983.     end
  984.     object Table2ShipToAddr2: TStringField
  985.       FieldName = 'ShipToAddr2'
  986.       Size = 30
  987.     end
  988.     object Table2ShipToCity: TStringField
  989.       FieldName = 'ShipToCity'
  990.       Size = 15
  991.     end
  992.     object Table2ShipToState: TStringField
  993.       FieldName = 'ShipToState'
  994.     end
  995.     object Table2ShipToZip: TStringField
  996.       FieldName = 'ShipToZip'
  997.       Size = 10
  998.     end
  999.     object Table2ShipToCountry: TStringField
  1000.       FieldName = 'ShipToCountry'
  1001.     end
  1002.     object Table2ShipToPhone: TStringField
  1003.       FieldName = 'ShipToPhone'
  1004.       Size = 15
  1005.     end
  1006.     object Table2ShipVIA: TStringField
  1007.       FieldName = 'ShipVIA'
  1008.       Size = 7
  1009.     end
  1010.     object Table2PO: TStringField
  1011.       FieldName = 'PO'
  1012.       Size = 15
  1013.     end
  1014.     object Table2Terms: TStringField
  1015.       FieldName = 'Terms'
  1016.       Size = 6
  1017.     end
  1018.     object Table2PaymentMethod: TStringField
  1019.       FieldName = 'PaymentMethod'
  1020.       Size = 7
  1021.     end
  1022.     object Table2ItemsTotal: TCurrencyField
  1023.       FieldName = 'ItemsTotal'
  1024.       Currency = True
  1025.     end
  1026.     object Table2TaxRate: TFloatField
  1027.       FieldName = 'TaxRate'
  1028.       DisplayFormat = '0.00%'
  1029.     end
  1030.     object Table2Freight: TCurrencyField
  1031.       FieldName = 'Freight'
  1032.       Currency = True
  1033.     end
  1034.     object Table2AmountPaid: TCurrencyField
  1035.       FieldName = 'AmountPaid'
  1036.       Currency = True
  1037.     end
  1038.   end
  1039. end
  1040.