cw_fwhsdy.~dfm

Upload User: xgks2007
Upload Date: 2015-04-22
Package Size: 6496k
Code Size: 18k
Category: MiddleWare
Development Platform: C++ Builder
  1. object Form43: TForm43
  2.   Left = 248
  3.   Top = 193
  4.   Width = 696
  5.   Height = 480
  6.   Caption = 'Form43'
  7.   Color = clBtnFace
  8.   Font.Charset = DEFAULT_CHARSET
  9.   Font.Color = clWindowText
  10.   Font.Height = -12
  11.   Font.Name = #23435#20307
  12.   Font.Style = []
  13.   OldCreateOrder = False
  14.   Position = poDesktopCenter
  15.   Scaled = False
  16.   PixelsPerInch = 96
  17.   TextHeight = 12
  18.   object QuickRep1: TQuickRep
  19.     Left = -2
  20.     Top = -6
  21.     Width = 794
  22.     Height = 1123
  23.     Frame.Color = clBlack
  24.     Frame.DrawTop = False
  25.     Frame.DrawBottom = False
  26.     Frame.DrawLeft = False
  27.     Frame.DrawRight = False
  28.     DataSet = Q_spxf
  29.     Font.Charset = ANSI_CHARSET
  30.     Font.Color = clWindowText
  31.     Font.Height = -12
  32.     Font.Name = #23435#20307
  33.     Font.Style = []
  34.     Functions.Strings = (
  35.       'PAGENUMBER'
  36.       'COLUMNNUMBER'
  37.       'REPORTTITLE')
  38.     Functions.DATA = (
  39.       '0'
  40.       '0'
  41.       #39#39)
  42.     Options = [FirstPageHeader, LastPageFooter]
  43.     Page.Columns = 1
  44.     Page.Orientation = poPortrait
  45.     Page.PaperSize = A4
  46.     Page.Values = (
  47.       100
  48.       2970
  49.       100
  50.       2100
  51.       100
  52.       100
  53.       0)
  54.     PrinterSettings.Copies = 1
  55.     PrinterSettings.Duplex = False
  56.     PrinterSettings.FirstPage = 0
  57.     PrinterSettings.LastPage = 0
  58.     PrinterSettings.OutputBin = Auto
  59.     PrintIfEmpty = True
  60.     SnapToGrid = True
  61.     Units = MM
  62.     Zoom = 100
  63.     object ColumnHeaderBand1: TQRBand
  64.       Left = 38
  65.       Top = 68
  66.       Width = 718
  67.       Height = 30
  68.       Frame.Color = clBlack
  69.       Frame.DrawTop = False
  70.       Frame.DrawBottom = False
  71.       Frame.DrawLeft = False
  72.       Frame.DrawRight = False
  73.       AlignToBottom = False
  74.       Color = clWhite
  75.       ForceNewColumn = False
  76.       ForceNewPage = False
  77.       Size.Values = (
  78.         79.375
  79.         1899.70833333333)
  80.       BandType = rbColumnHeader
  81.       object QRLabel4: TQRLabel
  82.         Left = 184
  83.         Top = 8
  84.         Width = 73
  85.         Height = 13
  86.         Frame.Color = clBlack
  87.         Frame.DrawTop = False
  88.         Frame.DrawBottom = False
  89.         Frame.DrawLeft = False
  90.         Frame.DrawRight = False
  91.         Size.Values = (
  92.           34.3958333333333
  93.           486.833333333333
  94.           21.1666666666667
  95.           193.145833333333)
  96.         Alignment = taLeftJustify
  97.         AlignToBand = False
  98.         AutoSize = True
  99.         AutoStretch = False
  100.         Caption = #26381#21153#39033#30446#21517#31216
  101.         Color = clWhite
  102.         Transparent = False
  103.         WordWrap = True
  104.         FontSize = 9
  105.       end
  106.       object QRLabel6: TQRLabel
  107.         Left = 400
  108.         Top = 8
  109.         Width = 43
  110.         Height = 13
  111.         Frame.Color = clBlack
  112.         Frame.DrawTop = False
  113.         Frame.DrawBottom = False
  114.         Frame.DrawLeft = False
  115.         Frame.DrawRight = False
  116.         Size.Values = (
  117.           34.3958333333333
  118.           1058.33333333333
  119.           21.1666666666667
  120.           113.770833333333)
  121.         Alignment = taLeftJustify
  122.         AlignToBand = False
  123.         AutoSize = True
  124.         AutoStretch = False
  125.         Caption = #25968'   '#37327
  126.         Color = clWhite
  127.         Transparent = False
  128.         WordWrap = True
  129.         FontSize = 9
  130.       end
  131.       object QRLabel7: TQRLabel
  132.         Left = 592
  133.         Top = 8
  134.         Width = 43
  135.         Height = 13
  136.         Frame.Color = clBlack
  137.         Frame.DrawTop = False
  138.         Frame.DrawBottom = False
  139.         Frame.DrawLeft = False
  140.         Frame.DrawRight = False
  141.         Size.Values = (
  142.           34.3958333333333
  143.           1566.33333333333
  144.           21.1666666666667
  145.           113.770833333333)
  146.         Alignment = taLeftJustify
  147.         AlignToBand = False
  148.         AutoSize = True
  149.         AutoStretch = False
  150.         Caption = #37329'   '#39069
  151.         Color = clWhite
  152.         Transparent = False
  153.         WordWrap = True
  154.         FontSize = 9
  155.       end
  156.       object QRShape2: TQRShape
  157.         Left = 4
  158.         Top = 28
  159.         Width = 710
  160.         Height = 1
  161.         Frame.Color = clBlack
  162.         Frame.DrawTop = False
  163.         Frame.DrawBottom = False
  164.         Frame.DrawLeft = False
  165.         Frame.DrawRight = False
  166.         Size.Values = (
  167.           2.64583333333333
  168.           10.5833333333333
  169.           74.0833333333333
  170.           1878.54166666667)
  171.         Shape = qrsRectangle
  172.       end
  173.       object QRLabel10: TQRLabel
  174.         Left = 40
  175.         Top = 8
  176.         Width = 37
  177.         Height = 13
  178.         Frame.Color = clBlack
  179.         Frame.DrawTop = False
  180.         Frame.DrawBottom = False
  181.         Frame.DrawLeft = False
  182.         Frame.DrawRight = False
  183.         Size.Values = (
  184.           34.3958333333333
  185.           105.833333333333
  186.           21.1666666666667
  187.           97.8958333333333)
  188.         Alignment = taLeftJustify
  189.         AlignToBand = False
  190.         AutoSize = True
  191.         AutoStretch = False
  192.         Caption = #26381#21153#21592
  193.         Color = clWhite
  194.         Transparent = False
  195.         WordWrap = True
  196.         FontSize = 9
  197.       end
  198.     end
  199.     object DetailBand1: TQRBand
  200.       Left = 38
  201.       Top = 98
  202.       Width = 718
  203.       Height = 30
  204.       Frame.Color = clBlack
  205.       Frame.DrawTop = False
  206.       Frame.DrawBottom = False
  207.       Frame.DrawLeft = False
  208.       Frame.DrawRight = False
  209.       AlignToBottom = False
  210.       Color = clWhite
  211.       ForceNewColumn = False
  212.       ForceNewPage = False
  213.       Size.Values = (
  214.         79.375
  215.         1899.70833333333)
  216.       BandType = rbDetail
  217.       object QRDBText2: TQRDBText
  218.         Left = 128
  219.         Top = 8
  220.         Width = 201
  221.         Height = 13
  222.         Frame.Color = clBlack
  223.         Frame.DrawTop = False
  224.         Frame.DrawBottom = False
  225.         Frame.DrawLeft = False
  226.         Frame.DrawRight = False
  227.         Size.Values = (
  228.           34.3958333333333
  229.           338.666666666667
  230.           21.1666666666667
  231.           531.8125)
  232.         Alignment = taLeftJustify
  233.         AlignToBand = False
  234.         AutoSize = False
  235.         AutoStretch = False
  236.         Color = clWhite
  237.         DataSet = Q_spxf
  238.         DataField = 'MenuName'
  239.         Transparent = False
  240.         WordWrap = True
  241.         FontSize = 9
  242.       end
  243.       object QRDBText4: TQRDBText
  244.         Left = 360
  245.         Top = 8
  246.         Width = 85
  247.         Height = 13
  248.         Frame.Color = clBlack
  249.         Frame.DrawTop = False
  250.         Frame.DrawBottom = False
  251.         Frame.DrawLeft = False
  252.         Frame.DrawRight = False
  253.         Size.Values = (
  254.           34.3958333333333
  255.           952.5
  256.           21.1666666666667
  257.           224.895833333333)
  258.         Alignment = taRightJustify
  259.         AlignToBand = False
  260.         AutoSize = False
  261.         AutoStretch = False
  262.         Color = clWhite
  263.         DataSet = Q_spxf
  264.         DataField = 'sl'
  265.         Transparent = False
  266.         WordWrap = True
  267.         FontSize = 9
  268.       end
  269.       object QRDBText5: TQRDBText
  270.         Left = 512
  271.         Top = 8
  272.         Width = 121
  273.         Height = 13
  274.         Frame.Color = clBlack
  275.         Frame.DrawTop = False
  276.         Frame.DrawBottom = False
  277.         Frame.DrawLeft = False
  278.         Frame.DrawRight = False
  279.         Size.Values = (
  280.           34.3958333333333
  281.           1354.66666666667
  282.           21.1666666666667
  283.           320.145833333333)
  284.         Alignment = taRightJustify
  285.         AlignToBand = False
  286.         AutoSize = False
  287.         AutoStretch = False
  288.         Color = clWhite
  289.         DataSet = Q_spxf
  290.         DataField = 'je'
  291.         Transparent = False
  292.         WordWrap = True
  293.         FontSize = 9
  294.       end
  295.       object QRShape3: TQRShape
  296.         Left = 4
  297.         Top = 28
  298.         Width = 710
  299.         Height = 1
  300.         Frame.Color = clBlack
  301.         Frame.DrawTop = False
  302.         Frame.DrawBottom = False
  303.         Frame.DrawLeft = False
  304.         Frame.DrawRight = False
  305.         Size.Values = (
  306.           2.64583333333333
  307.           10.5833333333333
  308.           74.0833333333333
  309.           1878.54166666667)
  310.         Pen.Style = psDot
  311.         Shape = qrsRectangle
  312.       end
  313.       object QRDBText1: TQRDBText
  314.         Left = 16
  315.         Top = 8
  316.         Width = 81
  317.         Height = 13
  318.         Frame.Color = clBlack
  319.         Frame.DrawTop = False
  320.         Frame.DrawBottom = False
  321.         Frame.DrawLeft = False
  322.         Frame.DrawRight = False
  323.         Size.Values = (
  324.           34.3958333333333
  325.           42.3333333333333
  326.           21.1666666666667
  327.           214.3125)
  328.         Alignment = taCenter
  329.         AlignToBand = False
  330.         AutoSize = False
  331.         AutoStretch = False
  332.         Color = clWhite
  333.         DataSet = Q_spxf
  334.         DataField = 'waiter'
  335.         Transparent = False
  336.         WordWrap = True
  337.         FontSize = 9
  338.       end
  339.     end
  340.     object PageFooterBand1: TQRBand
  341.       Left = 38
  342.       Top = 158
  343.       Width = 718
  344.       Height = 30
  345.       Frame.Color = clBlack
  346.       Frame.DrawTop = False
  347.       Frame.DrawBottom = False
  348.       Frame.DrawLeft = False
  349.       Frame.DrawRight = False
  350.       AlignToBottom = False
  351.       Color = clWhite
  352.       ForceNewColumn = False
  353.       ForceNewPage = False
  354.       Size.Values = (
  355.         79.375
  356.         1899.70833333333)
  357.       BandType = rbPageFooter
  358.       object QRLabel5: TQRLabel
  359.         Left = 192
  360.         Top = 8
  361.         Width = 49
  362.         Height = 13
  363.         Frame.Color = clBlack
  364.         Frame.DrawTop = False
  365.         Frame.DrawBottom = False
  366.         Frame.DrawLeft = False
  367.         Frame.DrawRight = False
  368.         Size.Values = (
  369.           34.3958333333333
  370.           508
  371.           21.1666666666667
  372.           129.645833333333)
  373.         Alignment = taLeftJustify
  374.         AlignToBand = False
  375.         AutoSize = True
  376.         AutoStretch = False
  377.         Caption = #25253#34920#20154#65306
  378.         Color = clWhite
  379.         Transparent = False
  380.         WordWrap = True
  381.         FontSize = 9
  382.       end
  383.       object bbr: TQRLabel
  384.         Left = 248
  385.         Top = 8
  386.         Width = 19
  387.         Height = 13
  388.         Frame.Color = clBlack
  389.         Frame.DrawTop = False
  390.         Frame.DrawBottom = False
  391.         Frame.DrawLeft = False
  392.         Frame.DrawRight = False
  393.         Size.Values = (
  394.           34.3958333333333
  395.           656.166666666667
  396.           21.1666666666667
  397.           50.2708333333333)
  398.         Alignment = taLeftJustify
  399.         AlignToBand = False
  400.         AutoSize = True
  401.         AutoStretch = False
  402.         Caption = 'bbr'
  403.         Color = clWhite
  404.         Transparent = False
  405.         WordWrap = True
  406.         FontSize = 9
  407.       end
  408.       object QRSysData1: TQRSysData
  409.         Left = 656
  410.         Top = 8
  411.         Width = 43
  412.         Height = 13
  413.         Frame.Color = clBlack
  414.         Frame.DrawTop = False
  415.         Frame.DrawBottom = False
  416.         Frame.DrawLeft = False
  417.         Frame.DrawRight = False
  418.         Size.Values = (
  419.           34.3958333333333
  420.           1735.66666666667
  421.           21.1666666666667
  422.           113.770833333333)
  423.         Alignment = taLeftJustify
  424.         AlignToBand = False
  425.         AutoSize = True
  426.         Color = clWhite
  427.         Data = qrsPageNumber
  428.         Transparent = False
  429.         FontSize = 9
  430.       end
  431.       object QRLabel8: TQRLabel
  432.         Left = 328
  433.         Top = 8
  434.         Width = 61
  435.         Height = 13
  436.         Frame.Color = clBlack
  437.         Frame.DrawTop = False
  438.         Frame.DrawBottom = False
  439.         Frame.DrawLeft = False
  440.         Frame.DrawRight = False
  441.         Size.Values = (
  442.           34.3958333333333
  443.           867.833333333333
  444.           21.1666666666667
  445.           161.395833333333)
  446.         Alignment = taLeftJustify
  447.         AlignToBand = False
  448.         AutoSize = False
  449.         AutoStretch = False
  450.         Caption = #25253#34920#26085#26399#65306
  451.         Color = clWhite
  452.         Transparent = False
  453.         WordWrap = True
  454.         FontSize = 9
  455.       end
  456.       object QRSysData2: TQRSysData
  457.         Left = 392
  458.         Top = 8
  459.         Width = 67
  460.         Height = 13
  461.         Frame.Color = clBlack
  462.         Frame.DrawTop = False
  463.         Frame.DrawBottom = False
  464.         Frame.DrawLeft = False
  465.         Frame.DrawRight = False
  466.         Size.Values = (
  467.           34.3958333333333
  468.           1037.16666666667
  469.           21.1666666666667
  470.           177.270833333333)
  471.         Alignment = taLeftJustify
  472.         AlignToBand = False
  473.         AutoSize = True
  474.         Color = clWhite
  475.         Data = qrsDateTime
  476.         Transparent = False
  477.         FontSize = 9
  478.       end
  479.       object QRLabel9: TQRLabel
  480.         Left = 32
  481.         Top = 8
  482.         Width = 129
  483.         Height = 13
  484.         Frame.Color = clBlack
  485.         Frame.DrawTop = False
  486.         Frame.DrawBottom = False
  487.         Frame.DrawLeft = False
  488.         Frame.DrawRight = False
  489.         Size.Values = (
  490.           34.3958333333333
  491.           84.6666666666667
  492.           21.1666666666667
  493.           341.3125)
  494.         Alignment = taLeftJustify
  495.         AlignToBand = False
  496.         AutoSize = False
  497.         AutoStretch = False
  498.         Caption = #37096#38376#65306#23458#25151#37096
  499.         Color = clWhite
  500.         Transparent = False
  501.         WordWrap = True
  502.         FontSize = 9
  503.       end
  504.     end
  505.     object PageHeaderBand1: TQRBand
  506.       Left = 38
  507.       Top = 38
  508.       Width = 718
  509.       Height = 30
  510.       Frame.Color = clBlack
  511.       Frame.DrawTop = False
  512.       Frame.DrawBottom = False
  513.       Frame.DrawLeft = False
  514.       Frame.DrawRight = False
  515.       AlignToBottom = False
  516.       Color = clWhite
  517.       ForceNewColumn = False
  518.       ForceNewPage = False
  519.       Size.Values = (
  520.         79.375
  521.         1899.70833333333)
  522.       BandType = rbPageHeader
  523.       object QRLabel1: TQRLabel
  524.         Left = 200
  525.         Top = 4
  526.         Width = 120
  527.         Height = 17
  528.         Frame.Color = clBlack
  529.         Frame.DrawTop = False
  530.         Frame.DrawBottom = False
  531.         Frame.DrawLeft = False
  532.         Frame.DrawRight = False
  533.         Size.Values = (
  534.           44.9791666666667
  535.           529.166666666667
  536.           10.5833333333333
  537.           317.5)
  538.         Alignment = taLeftJustify
  539.         AlignToBand = False
  540.         AutoSize = True
  541.         AutoStretch = False
  542.         Caption = #26381#21153#26680#31639#27719#24635#34920
  543.         Color = clWhite
  544.         Font.Charset = ANSI_CHARSET
  545.         Font.Color = clWindowText
  546.         Font.Height = -16
  547.         Font.Name = #23435#20307
  548.         Font.Style = [fsBold]
  549.         ParentFont = False
  550.         Transparent = False
  551.         WordWrap = True
  552.         FontSize = 12
  553.       end
  554.       object QRLabel2: TQRLabel
  555.         Left = 328
  556.         Top = 8
  557.         Width = 37
  558.         Height = 13
  559.         Frame.Color = clBlack
  560.         Frame.DrawTop = False
  561.         Frame.DrawBottom = False
  562.         Frame.DrawLeft = False
  563.         Frame.DrawRight = False
  564.         Size.Values = (
  565.           34.3958333333333
  566.           867.833333333333
  567.           21.1666666666667
  568.           97.8958333333333)
  569.         Alignment = taLeftJustify
  570.         AlignToBand = False
  571.         AutoSize = True
  572.         AutoStretch = False
  573.         Caption = #26085#26399#65306
  574.         Color = clWhite
  575.         Transparent = False
  576.         WordWrap = True
  577.         FontSize = 9
  578.       end
  579.       object rq: TQRLabel
  580.         Left = 368
  581.         Top = 8
  582.         Width = 13
  583.         Height = 13
  584.         Frame.Color = clBlack
  585.         Frame.DrawTop = False
  586.         Frame.DrawBottom = False
  587.         Frame.DrawLeft = False
  588.         Frame.DrawRight = False
  589.         Size.Values = (
  590.           34.3958333333333
  591.           973.666666666667
  592.           21.1666666666667
  593.           34.3958333333333)
  594.         Alignment = taLeftJustify
  595.         AlignToBand = False
  596.         AutoSize = True
  597.         AutoStretch = False
  598.         Caption = 'rq'
  599.         Color = clWhite
  600.         Transparent = False
  601.         WordWrap = True
  602.         FontSize = 9
  603.       end
  604.       object QRShape1: TQRShape
  605.         Left = 190
  606.         Top = 24
  607.         Width = 450
  608.         Height = 1
  609.         Frame.Color = clBlack
  610.         Frame.DrawTop = False
  611.         Frame.DrawBottom = False
  612.         Frame.DrawLeft = False
  613.         Frame.DrawRight = False
  614.         Size.Values = (
  615.           2.64583333333333
  616.           502.708333333333
  617.           63.5
  618.           1190.625)
  619.         Shape = qrsRectangle
  620.       end
  621.     end
  622.     object SummaryBand1: TQRBand
  623.       Left = 38
  624.       Top = 128
  625.       Width = 718
  626.       Height = 30
  627.       Frame.Color = clBlack
  628.       Frame.DrawTop = False
  629.       Frame.DrawBottom = False
  630.       Frame.DrawLeft = False
  631.       Frame.DrawRight = False
  632.       AlignToBottom = False
  633.       Color = clWhite
  634.       ForceNewColumn = False
  635.       ForceNewPage = False
  636.       Size.Values = (
  637.         79.375
  638.         1899.70833333333)
  639.       BandType = rbSummary
  640.       object QRLabel3: TQRLabel
  641.         Left = 448
  642.         Top = 8
  643.         Width = 61
  644.         Height = 13
  645.         Frame.Color = clBlack
  646.         Frame.DrawTop = False
  647.         Frame.DrawBottom = False
  648.         Frame.DrawLeft = False
  649.         Frame.DrawRight = False
  650.         Size.Values = (
  651.           34.3958333333333
  652.           1185.33333333333
  653.           21.1666666666667
  654.           161.395833333333)
  655.         Alignment = taLeftJustify
  656.         AlignToBand = False
  657.         AutoSize = True
  658.         AutoStretch = False
  659.         Caption = #21512#35745#37329#39069#65306
  660.         Color = clWhite
  661.         Transparent = False
  662.         WordWrap = True
  663.         FontSize = 9
  664.       end
  665.       object QRExpr1: TQRExpr
  666.         Left = 512
  667.         Top = 8
  668.         Width = 121
  669.         Height = 13
  670.         Frame.Color = clBlack
  671.         Frame.DrawTop = False
  672.         Frame.DrawBottom = False
  673.         Frame.DrawLeft = False
  674.         Frame.DrawRight = False
  675.         Size.Values = (
  676.           34.3958333333333
  677.           1354.66666666667
  678.           21.1666666666667
  679.           320.145833333333)
  680.         Alignment = taRightJustify
  681.         AlignToBand = False
  682.         AutoSize = False
  683.         AutoStretch = False
  684.         Color = clWhite
  685.         ResetAfterPrint = False
  686.         Transparent = False
  687.         WordWrap = True
  688.         Expression = 'sum(Q_spxf.je)'
  689.         FontSize = 9
  690.       end
  691.       object QRShape4: TQRShape
  692.         Left = 4
  693.         Top = 28
  694.         Width = 710
  695.         Height = 1
  696.         Frame.Color = clBlack
  697.         Frame.DrawTop = False
  698.         Frame.DrawBottom = False
  699.         Frame.DrawLeft = False
  700.         Frame.DrawRight = False
  701.         Size.Values = (
  702.           2.64583333333333
  703.           10.5833333333333
  704.           74.0833333333333
  705.           1878.54166666667)
  706.         Shape = qrsRectangle
  707.       end
  708.     end
  709.   end
  710.   object Q_spxf: TQuery
  711.     Active = True
  712.     DatabaseName = 'Hotel'
  713.     SQL.Strings = (
  714.       
  715.         'select waiter,MenuName,sum(Quantity) as sl,sum(SalePrice*Quantit' +
  716.         'y) as je from h_Dinlist group by waiter,MenuName')
  717.     Left = 64
  718.     Top = 8
  719.   end
  720. end