rptview.dfm

一个以前收集的基于C/S架构的ERP客户端源代码

object frmRPTView: TfrmRPTView
  Left = 74
  Top = 40
  AutoScroll = False
  Caption = 'KSERP打印预览'
  ClientHeight = 468
  ClientWidth = 672
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  Icon.Data = {
    0000010001001010000000000000680500001600000028000000100000002000
    000001000800000000004001000000000000000000000001000000000000FFFF
    FF00FF690000FCF9F900F7EFF000F0E2E300EFE0E100EEDEDF00EEDDDE00EBD7
    D900E9D3D500E2C6C800DDBCBF00DDBBBE00DBB8BB00DAB6B900D6ADB100D2A6
    AA00D1A5A900CFA1A500C68F9400C58C9100BF818600BD7D8300BD7C8200B873
    7900B46A7000B2666D00AF616800AE5F6600AC5B6200AB596000A64F5700A44C
    5400A1464E00A1454D009D3D450098343D0096303900962F3800952D36008C1C
    26008B1A24008A1822008A17210089151F0088131D00850E1800850D17008106
    11008105100080040F0080030E007F020D00FF870C00FF004700FF0000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    000000000000000000000000000000363636360000163636361F0C0000000036
    363636001B363636363636130000000000000000000000000000000000000036
    3636360000002736363636362000003636363600000000363636363636000000
    00000000000000000000000000000036363636000A3636000036363622000036
    3636360021363624030036360F00000000000000000000000000000000000036
    36363600363636363618000000000036363636001C3636363636140000000000
    0000000000000000000000000000003636363600001536363636362300000036
    363636000000122436361A000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    000000000000000000000000000000000000000000000000000000000000}
  OldCreateOrder = False
  WindowState = wsMaximized
  OnActivate = FormActivate
  OnResize = FormResize
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object CoolBar1: TCoolBar
    Left = 0
    Top = 0
    Width = 672
    Height = 44
    Bands = <
      item
        Control = ToolBar
        ImageIndex = -1
        MinHeight = 40
        Width = 668
      end>
    object ToolBar: TToolBar
      Left = 9
      Top = 0
      Width = 655
      Height = 40
      ButtonHeight = 37
      Caption = 'ToolBar'
      EdgeInner = esNone
      EdgeOuter = esNone
      TabOrder = 0
      object sbExport: TSpeedButton
        Left = 0
        Top = 2
        Width = 52
        Height = 37
        Caption = '导出数据'
        Flat = True
        Glyph.Data = {
          F6000000424DF600000000000000760000002800000010000000100000000100
          0400000000008000000000000000000000001000000010000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
          77777777777777777777777700000000000077778FFF8FFFFFF077778FFF8FFF
          FFF0477788888888888044778EEE8EEEEEE044478EEE8EEEEEE0447788888888
          888047778FFF8FFFFFF077778FFF8FFFFFF07777888888888880777744444444
          4444777744444444444477777777777777777777777777777777}
        Layout = blGlyphTop
        ParentShowHint = False
        ShowHint = False
        OnClick = sbExportClick
        OnMouseMove = sbExitMouseMove
      end
      object ToolButton4: TToolButton
        Left = 52
        Top = 2
        Width = 8
        Caption = 'ToolButton4'
        ImageIndex = 2
        Style = tbsDivider
      end
      object sbPageSet: TSpeedButton
        Left = 60
        Top = 2
        Width = 52
        Height = 37
        Caption = '页面设置'
        Flat = True
        Glyph.Data = {
          42010000424D4201000000000000760000002800000012000000110000000100
          040000000000CC00000000000000000000001000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
          77777773656C7770000000000077776F6C6477077777777707077772656D7000
          00000000007077656C6570777777BBB770007764206870777777888770707720
          746F700000000000007707742E00707777777777070707000000770000000000
          7070070000007770FFFFFFFF07070700000077770FFFFFFF6EEE070000007780
          00000000E60087000000770E6EEEEEEEE07777000000778000000000E6008700
          0000777770FFFFF86EEE07000000777777000000800087000000777777777777
          777777000000}
        Layout = blGlyphTop
        OnClick = sbPageSetClick
        OnMouseMove = sbExitMouseMove
      end
      object sbPrint: TSpeedButton
        Left = 112
        Top = 2
        Width = 52
        Height = 37
        Caption = '打 印'
        Flat = True
        Glyph.Data = {
          36030000424D3603000000000000360000002800000010000000100000000100
          1800000000000003000000000000000000000000000000000000CEC0C2C7BABC
          C4B9BBCFC9CAC2C2C2AEB3B2BCC4C3B7C2C0B9C4C2ADB5B4C7CCCBBEBEBEC6C0
          C1C4B9BBC5B8BAFFFDFFCDC0C2DACFD105000002000002040402080700040200
          02000002000B16140001000000000E0C0CC6C0C1CEC3C5C7BABCC1BBBC040000
          C6C6C6B5BAB9CCD4D3A8B5B3B6C7C4B1C4C1B5C8C5A7B8B5BAC7C5050D0CAEB3
          B2000000CAC5C6BCB6B7100E0E00000000040300010000020000090600030000
          0400001310000300000603000402000100BFC4C3000000D0CECE000100B0B6B5
          C0C8C7B3C0BEB5C6C3B1C6C3B1C8C4CDE6E2C6DDD9CBE2DEB0C5C2A8B9B6000B
          090004030D1312ACB1B0090E0DB4BAB9B9C4C2AFBCBAAFC0BDAEC3C0AFC4C162
          7975728985708783B6C9C6B3C4C1000A08A8B3B1000100C1C7C6000000000302
          000100000907000301000300021310000401000300000E0B0002000006040002
          00BFC5C4C9CECD000100030303C1C1C1C1C3C3B6BBBAB4BCBBC7D2D09EABA9BB
          C8C6BBC8C6ADBAB8B8C3C1000403C7CCCB000000BDBDBD010101C2BCBD130E0F
          040000020000080808000000000100070C0B000100000100000000BFBFBF0B09
          09B8B3B4130E0F050000BFB7B8C4BCBD130B0CFFFDFEFBF6F7FFFEFFFFFFFFF9
          F7F7FFFFFFFFFFFFFFFEFF040000C8C2C3090102CAC2C3070000D2C7C9C6BBBD
          C2B7B90D0506FFFEFF0B03040700000700000700000E0607FFFEFF0700000901
          02090000090000CBC0C2C2BABBC2BABBC9C1C20E0607F7EFF0F9F1F2FFFEFFFF
          FEFFFFFEFFFFF8F9F4ECEDFFFEFF0B0304BFB7B8CCC4C5C8C0C1BFBDBDC8C6C6
          CEC9CAB2ADAE231D1EFFFAFB0500000500000500000500000D0708F6F0F10C07
          08C8C3C4BAB8B8C0BEBEB8BABAC6C8C8B7B7B7C1C1C1020000FDFBFBFFFFFFFF
          FFFFFFFFFFF2F0F0FFFFFFFFFFFFF4F4F4030505B1B3B3C4C6C6BAC2C1ACB4B3
          C5CBCAC6CCCBBBC0BF0001000A0C0C0000000000000305050001000001000001
          00010706C3C9C8AFB7B6BBC6C4C0CBC9ADB5B4B2BAB9C5CBCAB3B9B8BBC0BFBF
          C4C3BDC2C1C0C5C4C4CAC9AEB4B3C8D0CFB5BDBCAEB9B7BDC8C6}
        Layout = blGlyphTop
        OnClick = sbPrintClick
        OnMouseMove = sbExitMouseMove
      end
      object ToolButton3: TToolButton
        Left = 164
        Top = 2
        Width = 8
        Caption = 'ToolButton3'
        ImageIndex = 1
        Style = tbsDivider
      end
      object sbFirst: TSpeedButton
        Left = 172
        Top = 2
        Width = 52
        Height = 37
        Caption = '首 页'
        Flat = True
        Glyph.Data = {
          F6000000424DF600000000000000760000002800000010000000100000000100
          0400000000008000000000000000000000001000000010000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
          7777777777777777777777777777777777777777777777777777777744777771
          7777777744777711777777774477711177777777447711117777777744711111
          7777777744771111777777774477711177777777447777117777777744777771
          7777777777777777777777777777777777777777777777777777}
        Layout = blGlyphTop
        OnClick = sbFirstClick
        OnMouseMove = sbExitMouseMove
      end
      object sbPrior: TSpeedButton
        Left = 224
        Top = 2
        Width = 52
        Height = 37
        Caption = '上一页'
        Flat = True
        Glyph.Data = {
          F6000000424DF600000000000000760000002800000010000000100000000100
          0400000000008000000000000000000000001000000010000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
          7777777777777777777777777777777777777777777777777777777777777177
          7777777777771177777777777771117777777777771111777777777771111177
          7777777777111177777777777771117777777777777711777777777777777177
          7777777777777777777777777777777777777777777777777777}
        Layout = blGlyphTop
        OnClick = sbPriorClick
        OnMouseMove = sbExitMouseMove
      end
      object ToolButton1: TToolButton
        Left = 276
        Top = 2
        Width = 8
        Caption = 'ToolButton1'
        Style = tbsDivider
      end