bbllunit2.dfm

工作之余做的一些实例,希望对大家有用,共同学习,相互促进

object BBLLForm: TBBLLForm
  Left = 192
  Top = 107
  Width = 832
  Height = 634
  Caption = #25253#34920#27983#35272
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {
    0000010001002020000000000000A80800001600000028000000200000004000
    0000010008000000000000040000000000000000000000000000000000000000
    0000423D3B00192A4200243A630020465D00394557003E44550033425C001F41
    61001B4D700012467A001D4178003B4B62003B526E003C506F00424549004446
    4B0043474E005A5A5A005B5C5E00425063005B5E62005C5F62004A5679004259
    7D005E62670055647D0059677F005C687A006062660061656B007C6C60007B72
    6E007F787300777778007A7A7A007A7B7C007B7C7E00827A7600837C7A009387
    7E001B458300174E9F00106293001C5ABD00225FB500315DB1000F70AB000E65
    BE002A6DAE00536D8C005A708C004F6A90004D6A9400516E96005D779C007377
    8400777B85006477970060769900627B9E004466A6004B7BB600607CA600607F
    B200115CC7001D5BC900147CC4001864D7001368D2001E6FDF001070D300127E
    D900396BC3002F75C5003A7FCA001278F3007E8286007E8A9E006881AE00788B
    A4007288AD006C9CAA0078ADBE003C9DCB00278CDD003B81DC003F9CD4003DAA
    D4001BA9F3003CA0E7003DBCEC0029AAF0003BB2F2004980C4004D8CC8005E8B
    C0005C92CC005F94CC005A98D7007DA0CA001DC2FA001DC8FA0020C1FB008181
    81008E8682008F8883008D8A8800968D8700948B88009A928C00898F94008C91
    95008C9299008D94990094939400959596009F9591009296990094979B009198
    9D0095999C0099989900999B9D009A9C9F009D9D9F00A1968E00A0979200A39B
    9500A89E9700A69C9800A99F9A00ACA29C00B0A49C00929AA000939CA200969C
    A200979FA5009C9EA100989BA600999DAA0097A0A6009EA0A20099A1A7009FA1
    A40099A2A8009FA1AA009BA4AB009DA6AC009FA8AF0096A1B3009AA1B300A1A2
    A300AEA4A100A9A8A700A7A7A800ABAAAB00ABABAC00ACABAC00AEADAE00B1A6
    A100B4AAA400B9AEA600B6AEA800BAAEA800BFB0A500BCB2AB00A0A9B000A3AC
    B300A4AEB500ABAFB600A9AFBA00B0AFB000A6B0B700A7B1B800A9B2B900AAB4
    BB00ABB5BC00ACB6BD00AEB8BF00B2B1B200B1B2B400B5B5B500B8B7B700B8B7
    B800BAB9BA00BABABC00BCBBBC00BDBDBD00C0AFA200C4B3A700C2B6AF00C4BB
    B500C9BEB600C1BEBB00CABFB800C2C0BF00CBC2BC0091A7C7009FACC20092AB
    CE0097AEDB00AFB9C000B0BAC200B2BDC400B4BEC600B6C1C800B8C2CA00BAC5
    CC00BCC6CE00BEC9D100B7C9DE00BDCBE200C1C0C100C1C2C400C4C3C400C5C5
    C600C9C7C700C3C5CB00C8C7C800C9C9CA00CDCBCA00CACBCF00CCCBCC00CDCC
    CD00DAD0C900D0CFD000D1D1D100D4D3D400D5D4D500D8D7D800D7D8DD00D9D9
    D900DADADD00DCDBDC00DDDDDD00C1CFE400CED7E700D0D9E800E0DFE000DFE0
    E300E1E1E100E5E5E500E5E6E800E5E7EC00E9E9E900EDEDED00F0EFF000F1F1
    F100F5F5F500F8F7F800F9F9F900FCFBFC00FCFCFC00433B3400000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000008F00000000000000000000000000000000
    00000000000000000000876F7CB5BABAB68E6F78000000000000000000000000
    00000000000000008679DCE8F1F2F5F3F2EFE6DC907200000000000000000000
    0000000000000070D7E8F2F6F8F9F9F9F9F7F5EFE4D770910000000000000000
    00000000000076E0EAF5F8FAFBFCFDFDFBFAF8F6F1E5D8908D00000000000000
    000000000077DFEAF5F8FAF5B9BCC4BCB9B6B49F9F9A8EBB9891000000000000
    0000000070D8E6F2F7FAFBB4276A84A375C2C0A3998085B7D576000000000000
    00000089B9E3F1EAE4E3EB6B27266EA1C56D69206CA6A1C4DFBB710000000000
    00000076D8E8F3EAABC6D4686D6975A1838221266EA4A2D9E5D79B0000000000
    000000B6DFEBF5E81C29411A827583A48375FE0184A4BFDDEADFB97800000000
    000072BCE2EFF5F10C0B4532A184A0C1857F99C2A1C3C3E0EBE2BC7600000000
    000076BCE2EFF2F0030B2A34A4A0A1C01F7E85C5C5C0A2DFEFE3D59B00000000
    000090BCE2EBEFED2C444C2D85A6A6C3812883E1A5BEBDE2EFE3D59F00000000
    000098BCE0EAE6D34A5559485453525458570D3D1738C4F1EBE3D5AC00000000
    00008EB9DCE8E3C84B5C672B2F66653047430A4642C9EFF2EAE0C49F00000000
    00008AB7DBE5E3513E5A5D5B04095B02310856492EEEF2F1E6DFBB9E00000000
    000076B4D7E2E64F406061636205350E075F5E1806F3F5EFE4D8B89800000000
    0000789FBCDBEA3A1B3F333C373B10101136140F4EF2F5EBE2D5B47600000000
    0000009BB7BCE9391D16151916131312121E5064ECF3F5EFDBB99E8900000000
    000000769FB6E9928B8C977125242222234D96C7F4F5F5F1D5B48E0000000000
    000000009BACE4F6F6F3E7DA9B7B73747A8A8AAAF8F6F5EBB89E880000000000
    00000000789EBBF5F7F7F8F9F9F9F6EFE2DED6D6F8F7F6DB9F77000000000000
    0000000000779EE2F8F9F9F9FAFAFAFAFAF9FAFAF8F8EF9F8A00000000000000
    000000000000779EE3F9FAFBFBFBFBFBFBFBFBFAFAEFAC7C0000000000000000
    00000000000000889BBBF5FBFDFDFDFDFDFDFDF7D89C77000000000000000000
    000000000000000000779BB6DCEAF1F1EBE2B99D7BA700000000000000000000
    00000000000000000000008F778E7D7D8E7B8800000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    000000000000000000000000000000000000000000000000000000000000FFFF
    FFFFFFFFFFFFFFFFBFFFFFF003FFFFC000FFFF80003FFF00001FFE00000FFC00
    000FF8000007F8000007F8000003F0000003F0000003F0000003F0000003F000
    0003F0000003F0000003F0000003F8000003F8000007FC000007FC00000FFE00
    001FFF00003FFF80007FFFE000FFFFF807FFFFFFFFFFFFFFFFFFFFFFFFFF}
  OldCreateOrder = False
  Scaled = False
  PixelsPerInch = 96
  TextHeight = 13
  object QuickRep1: TQuickRep
    Left = 0
    Top = 0
    Width = 794
    Height = 1123
    Frame.Color = clBlack
    Frame.DrawTop = False
    Frame.DrawBottom = False
    Frame.DrawLeft = False
    Frame.DrawRight = False
    DataSet = Form1.table1
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Arial'
    Font.Style = []
    Functions.Strings = (
      'PAGENUMBER'
      'COLUMNNUMBER'
      'REPORTTITLE')
    Functions.DATA = (
      '0'
      '0'
      #39#39)
    Options = [FirstPageHeader, LastPageFooter]
    Page.Columns = 1
    Page.Orientation = poPortrait
    Page.PaperSize = A4
    Page.Values = (
      100
      2970
      100
      2100
      100
      100
      0)
    PrinterSettings.Copies = 1
    PrinterSettings.Duplex = False
    PrinterSettings.FirstPage = 0
    PrinterSettings.LastPage = 0
    PrinterSettings.OutputBin = Auto
    PrintIfEmpty = True
    SnapToGrid = True
    Units = MM
    Zoom = 100
    object QRBand1: TQRBand
      Left = 38
      Top = 38
      Width = 718
      Height = 107
      Frame.Color = clBlack
      Frame.DrawTop = False
      Frame.DrawBottom = False
      Frame.DrawLeft = False
      Frame.DrawRight = False
      AlignToBottom = False
      Color = clWhite
      ForceNewColumn = False
      ForceNewPage = False
      Size.Values = (
        283.104166666667
        1899.70833333333)
      BandType = rbTitle
      object QRLabel1: TQRLabel
        Left = 152
        Top = 16
        Width = 430
        Height = 33
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          87.3125
          402.166666666667
          42.3333333333333
          1137.70833333333)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Caption = #25968#25454#24211#23545#22270#29255#30340#23384#21462#25216#26415#21046#20316
        Color = clWhite
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -32
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = False
        WordWrap = True
        FontSize = 24
      end
      object QRLabel2: TQRLabel
        Left = 112
        Top = 67
        Width = 85
        Height = 22
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          58.2083333333333
          296.333333333333
          177.270833333333
          224.895833333333)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Caption = #22270#29255#21517#31216
        Color = clWhite
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -21
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        Transparent = False
        WordWrap = True
        FontSize = 16
      end
      object QRLabel3: TQRLabel
        Left = 432
        Top = 67
        Width = 43
        Height = 22
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          58.2083333333333
          1143
          177.270833333333
          113.770833333333)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Caption = #22270#29255
        Color = clWhite
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -21
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        Transparent = False
        WordWrap = True
        FontSize = 16
      end
      object QRShape1: TQRShape
        Left = 0
        Top = 96
        Width = 718
        Height = 1
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          2.64583333333333
          0
          254
          1899.70833333333)
        Shape = qrsRectangle
      end
    end
    object QRBand2: TQRBand
      Left = 38
      Top = 145
      Width = 718
      Height = 152
      Frame.Color = clBlack
      Frame.DrawTop = False
      Frame.DrawBottom = False
      Frame.DrawLeft = False
      Frame.DrawRight = False
      AlignToBottom = False
      Color = clWhite
      ForceNewColumn = False
      ForceNewPage = False
      Size.Values = (
        402.166666666667
        1899.70833333333)
      BandType = rbDetail
      object QRDBText1: TQRDBText
        Left = 112
        Top = 64
        Width = 33
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.9791666666667
          296.333333333333
          169.333333333333
          87.3125)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Color = clWhite
        DataSet = Form1.table1
        DataField = 'name'
        Transparent = False
        WordWrap = True
        FontSize = 10
      end
      object QRDBImage1: TQRDBImage
        Left = 432
        Top = 8
        Width = 145
        Height = 137
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          362.479166666667
          1143
          21.1666666666667
          383.645833333333)
        DataField = 'data'
        DataSet = Form1.table1
        Stretch = True
      end
      object QRShape2: TQRShape
        Left = 0
        Top = 148
        Width = 718
        Height = 1
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          2.64583333333333
          0
          391.583333333333
          1899.70833333333)
        Shape = qrsRectangle
      end
    end
  end
end