home *** CD-ROM | disk | FTP | other *** search
/ QBasic & Borland Pascal & C / Delphi5.iso / Runimage / Delphi50 / Demos / Quickrpt / Qr2 / MD.DFM / MD.txt
Encoding:
Text File  |  1999-08-11  |  22.0 KB  |  854 lines

  1. object MDForm: TMDForm
  2.   Left = 264
  3.   Top = 118
  4.   Width = 787
  5.   Height = 618
  6.   Caption = 'MDForm'
  7.   Font.Color = clWindowText
  8.   Font.Height = -13
  9.   Font.Name = 'System'
  10.   Font.Style = []
  11.   PixelsPerInch = 96
  12.   Scaled = False
  13.   TextHeight = 16
  14.   object QuickRep: TQuickRep
  15.     Left = 2
  16.     Top = 6
  17.     Width = 816
  18.     Height = 1056
  19.     Frame.Color = clBlack
  20.     Frame.DrawTop = False
  21.     Frame.DrawBottom = False
  22.     Frame.DrawLeft = False
  23.     Frame.DrawRight = False
  24.     DataSet = Customer
  25.     Description.Strings = (
  26.       
  27.         'This is a basic master/detail report showing all orders for each' +
  28.         ' customer. It adds the master/detail functionallity to the simpl' +
  29.         'e list repor. You can see how to:'
  30.       '- Set up the datasets in a master/detail relationship'
  31.       '- Use QRDetailLink to print detail data'
  32.       '- Attach a group header band to a QRDetailLink'
  33.       
  34.         '- Use the Mask property to format the output of a QRDBText compo' +
  35.         'nent'
  36.       '- Use TQRExpr components to calculate totals and count records')
  37.     Font.Color = clWindowText
  38.     Font.Height = -13
  39.     Font.Name = 'Arial'
  40.     Font.Style = []
  41.     Options = [LastPageFooter]
  42.     Page.Columns = 1
  43.     Page.Orientation = poPortrait
  44.     Page.PaperSize = Letter
  45.     Page.Values = (
  46.       100.000000000000000000
  47.       2794.000000000000000000
  48.       100.000000000000000000
  49.       2159.000000000000000000
  50.       100.000000000000000000
  51.       100.000000000000000000
  52.       0.000000000000000000)
  53.     PrintIfEmpty = False
  54.     PrinterSettings.Copies = 1
  55.     PrinterSettings.Duplex = False
  56.     PrinterSettings.OutputBin = First
  57.     SnapToGrid = True
  58.     Units = MM
  59.     Zoom = 100
  60.     object DetailBand1: TQRBand
  61.       Left = 38
  62.       Top = 102
  63.       Width = 740
  64.       Height = 39
  65.       Frame.Color = clBlack
  66.       Frame.DrawTop = True
  67.       Frame.DrawBottom = False
  68.       Frame.DrawLeft = True
  69.       Frame.DrawRight = True
  70.       AlignToBottom = False
  71.       Color = clWhite
  72.       ForceNewColumn = False
  73.       ForceNewPage = False
  74.       Size.Values = (
  75.         103.187500000000000000
  76.         1957.916666666667000000)
  77.       BandType = rbDetail
  78.       object QRDBText1: TQRDBText
  79.         Left = 8
  80.         Top = 4
  81.         Width = 199
  82.         Height = 17
  83.         Frame.Color = clBlack
  84.         Frame.DrawTop = False
  85.         Frame.DrawBottom = False
  86.         Frame.DrawLeft = False
  87.         Frame.DrawRight = False
  88.         Size.Values = (
  89.           44.979166666666650000
  90.           21.166666666666670000
  91.           10.583333333333330000
  92.           526.520833333333400000)
  93.         Alignment = taLeftJustify
  94.         AlignToBand = False
  95.         AutoSize = False
  96.         AutoStretch = False
  97.         Color = clWhite
  98.         DataSet = Customer
  99.         DataField = 'Company'
  100.         Transparent = False
  101.         WordWrap = True
  102.         FontSize = 10
  103.       end
  104.       object QRDBText2: TQRDBText
  105.         Left = 212
  106.         Top = 4
  107.         Width = 164
  108.         Height = 17
  109.         Frame.Color = clBlack
  110.         Frame.DrawTop = False
  111.         Frame.DrawBottom = False
  112.         Frame.DrawLeft = False
  113.         Frame.DrawRight = False
  114.         Size.Values = (
  115.           44.979166666666650000
  116.           560.916666666666600000
  117.           10.583333333333330000
  118.           433.916666666666700000)
  119.         Alignment = taLeftJustify
  120.         AlignToBand = False
  121.         AutoSize = False
  122.         AutoStretch = False
  123.         Color = clWhite
  124.         DataSet = Customer
  125.         DataField = 'Contact'
  126.         Transparent = False
  127.         WordWrap = True
  128.         FontSize = 10
  129.       end
  130.       object QRDBText3: TQRDBText
  131.         Left = 384
  132.         Top = 4
  133.         Width = 88
  134.         Height = 17
  135.         Frame.Color = clBlack
  136.         Frame.DrawTop = False
  137.         Frame.DrawBottom = False
  138.         Frame.DrawLeft = False
  139.         Frame.DrawRight = False
  140.         Size.Values = (
  141.           44.979166666666650000
  142.           1016.000000000000000000
  143.           10.583333333333330000
  144.           232.833333333333400000)
  145.         Alignment = taLeftJustify
  146.         AlignToBand = False
  147.         AutoSize = False
  148.         AutoStretch = False
  149.         Color = clWhite
  150.         DataSet = Customer
  151.         DataField = 'Phone'
  152.         Transparent = False
  153.         WordWrap = True
  154.         FontSize = 10
  155.       end
  156.       object QRDBText4: TQRDBText
  157.         Left = 481
  158.         Top = 4
  159.         Width = 88
  160.         Height = 17
  161.         Frame.Color = clBlack
  162.         Frame.DrawTop = False
  163.         Frame.DrawBottom = False
  164.         Frame.DrawLeft = False
  165.         Frame.DrawRight = False
  166.         Size.Values = (
  167.           44.979166666666650000
  168.           1272.645833333333000000
  169.           10.583333333333330000
  170.           232.833333333333400000)
  171.         Alignment = taLeftJustify
  172.         AlignToBand = False
  173.         AutoSize = False
  174.         AutoStretch = False
  175.         Color = clWhite
  176.         DataSet = Customer
  177.         DataField = 'FAX'
  178.         Transparent = False
  179.         WordWrap = True
  180.         FontSize = 10
  181.       end
  182.       object QRDBText5: TQRDBText
  183.         Left = 575
  184.         Top = 4
  185.         Width = 56
  186.         Height = 17
  187.         Frame.Color = clBlack
  188.         Frame.DrawTop = False
  189.         Frame.DrawBottom = False
  190.         Frame.DrawLeft = False
  191.         Frame.DrawRight = False
  192.         Size.Values = (
  193.           44.979166666666650000
  194.           1521.354166666667000000
  195.           10.583333333333330000
  196.           148.166666666666700000)
  197.         Alignment = taRightJustify
  198.         AlignToBand = False
  199.         AutoSize = False
  200.         AutoStretch = False
  201.         Color = clWhite
  202.         DataSet = Customer
  203.         DataField = 'CustNo'
  204.         Transparent = False
  205.         WordWrap = True
  206.         FontSize = 10
  207.       end
  208.       object QRLabel7: TQRLabel
  209.         Left = 146
  210.         Top = 24
  211.         Width = 41
  212.         Height = 15
  213.         Frame.Color = clBlack
  214.         Frame.DrawTop = False
  215.         Frame.DrawBottom = False
  216.         Frame.DrawLeft = False
  217.         Frame.DrawRight = False
  218.         Size.Values = (
  219.           39.687500000000000000
  220.           386.291666666666700000
  221.           63.500000000000000000
  222.           108.479166666666700000)
  223.         Alignment = taLeftJustify
  224.         AlignToBand = False
  225.         AutoSize = True
  226.         AutoStretch = False
  227.         Caption = 'Orderno'
  228.         Color = clWhite
  229.         Font.Color = clWindowText
  230.         Font.Height = -11
  231.         Font.Name = 'Arial'
  232.         Font.Style = []
  233.         ParentFont = False
  234.         Transparent = False
  235.         WordWrap = True
  236.         FontSize = 8
  237.       end
  238.       object QRLabel8: TQRLabel
  239.         Left = 230
  240.         Top = 24
  241.         Width = 23
  242.         Height = 15
  243.         Frame.Color = clBlack
  244.         Frame.DrawTop = False
  245.         Frame.DrawBottom = False
  246.         Frame.DrawLeft = False
  247.         Frame.DrawRight = False
  248.         Size.Values = (
  249.           39.687500000000000000
  250.           608.541666666666600000
  251.           63.500000000000000000
  252.           60.854166666666660000)
  253.         Alignment = taLeftJustify
  254.         AlignToBand = False
  255.         AutoSize = True
  256.         AutoStretch = False
  257.         Caption = 'Date'
  258.         Color = clWhite
  259.         Font.Color = clWindowText
  260.         Font.Height = -11
  261.         Font.Name = 'Arial'
  262.         Font.Style = []
  263.         ParentFont = False
  264.         Transparent = False
  265.         WordWrap = True
  266.         FontSize = 8
  267.       end
  268.       object QRLabel9: TQRLabel
  269.         Left = 292
  270.         Top = 24
  271.         Width = 38
  272.         Height = 15
  273.         Frame.Color = clBlack
  274.         Frame.DrawTop = False
  275.         Frame.DrawBottom = False
  276.         Frame.DrawLeft = False
  277.         Frame.DrawRight = False
  278.         Size.Values = (
  279.           39.687500000000000000
  280.           772.583333333333400000
  281.           63.500000000000000000
  282.           100.541666666666700000)
  283.         Alignment = taLeftJustify
  284.         AlignToBand = False
  285.         AutoSize = True
  286.         AutoStretch = False
  287.         Caption = 'Amount'
  288.         Color = clWhite
  289.         Font.Color = clWindowText
  290.         Font.Height = -11
  291.         Font.Name = 'Arial'
  292.         Font.Style = []
  293.         ParentFont = False
  294.         Transparent = False
  295.         WordWrap = True
  296.         FontSize = 8
  297.       end
  298.     end
  299.     object ColumnHeaderBand1: TQRBand
  300.       Left = 38
  301.       Top = 78
  302.       Width = 740
  303.       Height = 24
  304.       Frame.Color = clBlack
  305.       Frame.DrawTop = False
  306.       Frame.DrawBottom = False
  307.       Frame.DrawLeft = False
  308.       Frame.DrawRight = False
  309.       AlignToBottom = False
  310.       Color = clWhite
  311.       ForceNewColumn = False
  312.       ForceNewPage = False
  313.       Size.Values = (
  314.         63.500000000000000000
  315.         1957.916666666667000000)
  316.       BandType = rbColumnHeader
  317.       object QRLabel1: TQRLabel
  318.         Left = 4
  319.         Top = 4
  320.         Width = 202
  321.         Height = 17
  322.         Frame.Color = clBlack
  323.         Frame.DrawTop = False
  324.         Frame.DrawBottom = False
  325.         Frame.DrawLeft = False
  326.         Frame.DrawRight = False
  327.         Size.Values = (
  328.           44.979166666666650000
  329.           10.583333333333330000
  330.           10.583333333333330000
  331.           534.458333333333400000)
  332.         Alignment = taLeftJustify
  333.         AlignToBand = False
  334.         AutoSize = False
  335.         AutoStretch = False
  336.         Caption = 'Company'
  337.         Color = clWhite
  338.         Font.Color = clBlack
  339.         Font.Height = -11
  340.         Font.Name = 'Arial'
  341.         Font.Style = []
  342.         ParentFont = False
  343.         Transparent = True
  344.         WordWrap = True
  345.         FontSize = 8
  346.       end
  347.       object QRLabel2: TQRLabel
  348.         Left = 212
  349.         Top = 4
  350.         Width = 164
  351.         Height = 17
  352.         Frame.Color = clBlack
  353.         Frame.DrawTop = False
  354.         Frame.DrawBottom = False
  355.         Frame.DrawLeft = False
  356.         Frame.DrawRight = False
  357.         Size.Values = (
  358.           44.979166666666650000
  359.           560.916666666666600000
  360.           10.583333333333330000
  361.           433.916666666666700000)
  362.         Alignment = taLeftJustify
  363.         AlignToBand = False
  364.         AutoSize = False
  365.         AutoStretch = False
  366.         Caption = 'Contact'
  367.         Color = clWhite
  368.         Font.Color = clBlack
  369.         Font.Height = -11
  370.         Font.Name = 'Arial'
  371.         Font.Style = []
  372.         ParentFont = False
  373.         Transparent = True
  374.         WordWrap = True
  375.         FontSize = 8
  376.       end
  377.       object QRLabel3: TQRLabel
  378.         Left = 384
  379.         Top = 4
  380.         Width = 88
  381.         Height = 17
  382.         Frame.Color = clBlack
  383.         Frame.DrawTop = False
  384.         Frame.DrawBottom = False
  385.         Frame.DrawLeft = False
  386.         Frame.DrawRight = False
  387.         Size.Values = (
  388.           44.979166666666650000
  389.           1016.000000000000000000
  390.           10.583333333333330000
  391.           232.833333333333400000)
  392.         Alignment = taLeftJustify
  393.         AlignToBand = False
  394.         AutoSize = False
  395.         AutoStretch = False
  396.         Caption = 'Phone'
  397.         Color = clWhite
  398.         Font.Color = clBlack
  399.         Font.Height = -11
  400.         Font.Name = 'Arial'
  401.         Font.Style = []
  402.         ParentFont = False
  403.         Transparent = True
  404.         WordWrap = True
  405.         FontSize = 8
  406.       end
  407.       object QRLabel4: TQRLabel
  408.         Left = 481
  409.         Top = 4
  410.         Width = 88
  411.         Height = 17
  412.         Frame.Color = clBlack
  413.         Frame.DrawTop = False
  414.         Frame.DrawBottom = False
  415.         Frame.DrawLeft = False
  416.         Frame.DrawRight = False
  417.         Size.Values = (
  418.           44.979166666666650000
  419.           1272.645833333333000000
  420.           10.583333333333330000
  421.           232.833333333333400000)
  422.         Alignment = taLeftJustify
  423.         AlignToBand = False
  424.         AutoSize = False
  425.         AutoStretch = False
  426.         Caption = 'Fax'
  427.         Color = clWhite
  428.         Font.Color = clBlack
  429.         Font.Height = -11
  430.         Font.Name = 'Arial'
  431.         Font.Style = []
  432.         ParentFont = False
  433.         Transparent = True
  434.         WordWrap = True
  435.         FontSize = 8
  436.       end
  437.       object QRLabel5: TQRLabel
  438.         Left = 574
  439.         Top = 4
  440.         Width = 57
  441.         Height = 17
  442.         Frame.Color = clBlack
  443.         Frame.DrawTop = False
  444.         Frame.DrawBottom = False
  445.         Frame.DrawLeft = False
  446.         Frame.DrawRight = False
  447.         Size.Values = (
  448.           44.979166666666650000
  449.           1518.708333333333000000
  450.           10.583333333333330000
  451.           150.812500000000000000)
  452.         Alignment = taLeftJustify
  453.         AlignToBand = False
  454.         AutoSize = False
  455.         AutoStretch = False
  456.         Caption = 'Cust no.'
  457.         Color = clWhite
  458.         Font.Color = clBlack
  459.         Font.Height = -11
  460.         Font.Name = 'Arial'
  461.         Font.Style = []
  462.         ParentFont = False
  463.         Transparent = True
  464.         WordWrap = True
  465.         FontSize = 8
  466.       end
  467.     end
  468.     object PageFooterBand1: TQRBand
  469.       Left = 38
  470.       Top = 203
  471.       Width = 740
  472.       Height = 25
  473.       Frame.Color = clBlack
  474.       Frame.DrawTop = False
  475.       Frame.DrawBottom = False
  476.       Frame.DrawLeft = False
  477.       Frame.DrawRight = False
  478.       AlignToBottom = False
  479.       Color = clWhite
  480.       ForceNewColumn = False
  481.       ForceNewPage = False
  482.       Size.Values = (
  483.         66.145833333333330000
  484.         1957.916666666667000000)
  485.       BandType = rbPageFooter
  486.       object QRSysData1: TQRSysData
  487.         Left = 4
  488.         Top = 8
  489.         Width = 89
  490.         Height = 17
  491.         Frame.Color = clBlack
  492.         Frame.DrawTop = False
  493.         Frame.DrawBottom = False
  494.         Frame.DrawLeft = False
  495.         Frame.DrawRight = False
  496.         Size.Values = (
  497.           44.979166666666650000
  498.           10.583333333333330000
  499.           21.166666666666670000
  500.           235.479166666666700000)
  501.         Alignment = taLeftJustify
  502.         AlignToBand = False
  503.         AutoSize = True
  504.         Data = qrsDate
  505.         Text = 'Printed '
  506.         Transparent = False
  507.         FontSize = 10
  508.       end
  509.       object QRSysData2: TQRSysData
  510.         Left = 691
  511.         Top = 8
  512.         Width = 49
  513.         Height = 17
  514.         Frame.Color = clBlack
  515.         Frame.DrawTop = False
  516.         Frame.DrawBottom = False
  517.         Frame.DrawLeft = False
  518.         Frame.DrawRight = False
  519.         Size.Values = (
  520.           44.979166666666650000
  521.           1828.270833333333000000
  522.           21.166666666666670000
  523.           129.645833333333300000)
  524.         Alignment = taRightJustify
  525.         AlignToBand = True
  526.         AutoSize = True
  527.         Data = qrsPageNumber
  528.         Text = 'Page '
  529.         Transparent = False
  530.         FontSize = 10
  531.       end
  532.     end
  533.     object TitleBand1: TQRBand
  534.       Left = 38
  535.       Top = 38
  536.       Width = 740
  537.       Height = 40
  538.       Frame.Color = clBlack
  539.       Frame.DrawTop = False
  540.       Frame.DrawBottom = False
  541.       Frame.DrawLeft = False
  542.       Frame.DrawRight = False
  543.       AlignToBottom = False
  544.       Color = clWhite
  545.       ForceNewColumn = False
  546.       ForceNewPage = False
  547.       Size.Values = (
  548.         105.833333333333300000
  549.         1957.916666666667000000)
  550.       BandType = rbTitle
  551.       object QRLabel6: TQRLabel
  552.         Left = 211
  553.         Top = 4
  554.         Width = 318
  555.         Height = 33
  556.         Frame.Color = clBlack
  557.         Frame.DrawTop = False
  558.         Frame.DrawBottom = False
  559.         Frame.DrawLeft = False
  560.         Frame.DrawRight = False
  561.         Size.Values = (
  562.           87.312500000000000000
  563.           558.270833333333400000
  564.           10.583333333333330000
  565.           841.375000000000000000)
  566.         Alignment = taCenter
  567.         AlignToBand = True
  568.         AutoSize = True
  569.         AutoStretch = False
  570.         Caption = 'Customer/Orders Listing'
  571.         Color = clWhite
  572.         Font.Color = clNavy
  573.         Font.Height = -27
  574.         Font.Name = 'Arial'
  575.         Font.Style = [fsBold, fsItalic]
  576.         ParentFont = False
  577.         Transparent = False
  578.         WordWrap = True
  579.         FontSize = 20
  580.       end
  581.     end
  582.     object QRSubDetail1: TQRSubDetail
  583.       Left = 38
  584.       Top = 141
  585.       Width = 740
  586.       Height = 25
  587.       Frame.Color = clBlack
  588.       Frame.DrawTop = False
  589.       Frame.DrawBottom = False
  590.       Frame.DrawLeft = True
  591.       Frame.DrawRight = True
  592.       AlignToBottom = False
  593.       Color = clWhite
  594.       ForceNewColumn = False
  595.       ForceNewPage = False
  596.       Size.Values = (
  597.         66.145833333333330000
  598.         1957.916666666667000000)
  599.       Master = QuickRep
  600.       DataSet = Orders
  601.       FooterBand = GroupFooterBand1
  602.       PrintBefore = False
  603.       PrintIfEmpty = False
  604.       object QRDBText6: TQRDBText
  605.         Left = 128
  606.         Top = 4
  607.         Width = 59
  608.         Height = 17
  609.         Frame.Color = clBlack
  610.         Frame.DrawTop = False
  611.         Frame.DrawBottom = False
  612.         Frame.DrawLeft = False
  613.         Frame.DrawRight = False
  614.         Size.Values = (
  615.           44.979166666666650000
  616.           338.666666666666700000
  617.           10.583333333333330000
  618.           156.104166666666700000)
  619.         Alignment = taRightJustify
  620.         AlignToBand = False
  621.         AutoSize = False
  622.         AutoStretch = False
  623.         Color = clWhite
  624.         DataSet = Orders
  625.         DataField = 'OrderNo'
  626.         Transparent = False
  627.         WordWrap = True
  628.         FontSize = 10
  629.       end
  630.       object QRDBText7: TQRDBText
  631.         Left = 193
  632.         Top = 4
  633.         Width = 60
  634.         Height = 17
  635.         Frame.Color = clBlack
  636.         Frame.DrawTop = False
  637.         Frame.DrawBottom = False
  638.         Frame.DrawLeft = False
  639.         Frame.DrawRight = False
  640.         Size.Values = (
  641.           44.979166666666650000
  642.           510.645833333333300000
  643.           10.583333333333330000
  644.           158.750000000000000000)
  645.         Alignment = taRightJustify
  646.         AlignToBand = False
  647.         AutoSize = False
  648.         AutoStretch = False
  649.         Color = clWhite
  650.         DataSet = Orders
  651.         DataField = 'SaleDate'
  652.         Transparent = False
  653.         WordWrap = True
  654.         FontSize = 10
  655.       end
  656.       object QRDBText10: TQRDBText
  657.         Left = 268
  658.         Top = 4
  659.         Width = 63
  660.         Height = 17
  661.         Frame.Color = clBlack
  662.         Frame.DrawTop = False
  663.         Frame.DrawBottom = False
  664.         Frame.DrawLeft = False
  665.         Frame.DrawRight = False
  666.         Size.Values = (
  667.           44.979166666666650000
  668.           709.083333333333400000
  669.           10.583333333333330000
  670.           166.687500000000000000)
  671.         Alignment = taRightJustify
  672.         AlignToBand = False
  673.         AutoSize = False
  674.         AutoStretch = False
  675.         Color = clWhite
  676.         DataSet = Orders
  677.         DataField = 'AmountPaid'
  678.         Mask = '#0.00'
  679.         Transparent = False
  680.         WordWrap = True
  681.         FontSize = 10
  682.       end
  683.     end
  684.     object GroupFooterBand1: TQRBand
  685.       Left = 38
  686.       Top = 166
  687.       Width = 740
  688.       Height = 25
  689.       Frame.Color = clBlack
  690.       Frame.DrawTop = False
  691.       Frame.DrawBottom = True
  692.       Frame.DrawLeft = True
  693.       Frame.DrawRight = True
  694.       AlignToBottom = False
  695.       Color = clWhite
  696.       ForceNewColumn = False
  697.       ForceNewPage = False
  698.       Size.Values = (
  699.         66.145833333333330000
  700.         1957.916666666666000000)
  701.       BandType = rbGroupFooter
  702.       object QRExpr1: TQRExpr
  703.         Left = 268
  704.         Top = 2
  705.         Width = 63
  706.         Height = 17
  707.         Frame.Color = clBlack
  708.         Frame.DrawTop = False
  709.         Frame.DrawBottom = False
  710.         Frame.DrawLeft = False
  711.         Frame.DrawRight = False
  712.         Size.Values = (
  713.           44.979166666666650000
  714.           709.083333333333400000
  715.           5.291666666666667000
  716.           166.687500000000000000)
  717.         Alignment = taRightJustify
  718.         AlignToBand = False
  719.         AutoSize = False
  720.         AutoStretch = False
  721.         Color = clWhite
  722.         Master = QRSubDetail1
  723.         ResetAfterPrint = True
  724.         Transparent = False
  725.         WordWrap = True
  726.         Expression = 'sum(amountpaid)'
  727.         Mask = '#0.00'
  728.         FontSize = 10
  729.       end
  730.       object QRLabel10: TQRLabel
  731.         Left = 192
  732.         Top = 2
  733.         Width = 76
  734.         Height = 17
  735.         Frame.Color = clBlack
  736.         Frame.DrawTop = False
  737.         Frame.DrawBottom = False
  738.         Frame.DrawLeft = False
  739.         Frame.DrawRight = False
  740.         Size.Values = (
  741.           44.979166666666670000
  742.           508.000000000000000000
  743.           5.291666666666667000
  744.           201.083333333333200000)
  745.         Alignment = taLeftJustify
  746.         AlignToBand = False
  747.         AutoSize = True
  748.         AutoStretch = False
  749.         Caption = 'Total amount'
  750.         Color = clWhite
  751.         Transparent = False
  752.         WordWrap = True
  753.         FontSize = 10
  754.       end
  755.       object QRLabel11: TQRLabel
  756.         Left = 4
  757.         Top = 2
  758.         Width = 73
  759.         Height = 17
  760.         Frame.Color = clBlack
  761.         Frame.DrawTop = False
  762.         Frame.DrawBottom = False
  763.         Frame.DrawLeft = False
  764.         Frame.DrawRight = False
  765.         Size.Values = (
  766.           44.979166666666670000
  767.           10.583333333333330000
  768.           5.291666666666667000
  769.           193.145833333333300000)
  770.         Alignment = taLeftJustify
  771.         AlignToBand = False
  772.         AutoSize = True
  773.         AutoStretch = False
  774.         Caption = 'Total orders:'
  775.         Color = clWhite
  776.         Transparent = False
  777.         WordWrap = True
  778.         FontSize = 10
  779.       end
  780.       object QRExpr2: TQRExpr
  781.         Left = 86
  782.         Top = 2
  783.         Width = 33
  784.         Height = 17
  785.         Frame.Color = clBlack
  786.         Frame.DrawTop = False
  787.         Frame.DrawBottom = False
  788.         Frame.DrawLeft = False
  789.         Frame.DrawRight = False
  790.         Size.Values = (
  791.           44.979166666666670000
  792.           227.541666666666600000
  793.           5.291666666666667000
  794.           87.312500000000000000)
  795.         Alignment = taLeftJustify
  796.         AlignToBand = False
  797.         AutoSize = True
  798.         AutoStretch = False
  799.         Color = clWhite
  800.         Master = QRSubDetail1
  801.         ResetAfterPrint = True
  802.         Transparent = False
  803.         WordWrap = True
  804.         Expression = 'count'
  805.         FontSize = 10
  806.       end
  807.     end
  808.     object ChildBand1: TQRChildBand
  809.       Left = 38
  810.       Top = 191
  811.       Width = 740
  812.       Height = 12
  813.       Frame.Color = clBlack
  814.       Frame.DrawTop = False
  815.       Frame.DrawBottom = False
  816.       Frame.DrawLeft = False
  817.       Frame.DrawRight = False
  818.       AlignToBottom = False
  819.       Color = clWhite
  820.       ForceNewColumn = False
  821.       ForceNewPage = False
  822.       Size.Values = (
  823.         31.750000000000000000
  824.         1957.916666666666000000)
  825.       ParentBand = GroupFooterBand1
  826.     end
  827.   end
  828.   object Customer: TTable
  829.     Active = True
  830.     DatabaseName = 'DBDEMOS'
  831.     IndexFieldNames = 'Company'
  832.     ReadOnly = True
  833.     TableName = 'CUSTOMER.DB'
  834.     Left = 12
  835.     Top = 12
  836.   end
  837.   object Orders: TTable
  838.     Active = True
  839.     DatabaseName = 'DBDEMOS'
  840.     IndexFieldNames = 'CustNo'
  841.     MasterFields = 'CustNo'
  842.     MasterSource = CustomerDS
  843.     ReadOnly = True
  844.     TableName = 'ORDERS.DB'
  845.     Left = 12
  846.     Top = 44
  847.   end
  848.   object CustomerDS: TDataSource
  849.     DataSet = Customer
  850.     Left = 20
  851.     Top = 4
  852.   end
  853. end
  854.