creport.dfm

Delphi报表设计器源代码

object CreportForm: TCreportForm
  Left = 229
  Top = 204
  Width = 800
  Height = 550
  HorzScrollBar.Increment = 55
  HorzScrollBar.Tracking = True
  VertScrollBar.Tracking = True
  Caption = 'Creport 4.12'
  Color = 8421440
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = True
  Position = poDefault
  OnActivate = FormActivate
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnResize = FormResize
  PixelsPerInch = 96
  TextHeight = 12
  object SpeedButton9: TSpeedButton
    Left = 376
    Top = 264
    Width = 23
    Height = 22
  end
  object ScrollBox1: TScrollBox
    Left = 8
    Top = 63
    Width = 775
    Height = 414
    Align = alClient
    TabOrder = 0
    OnResize = ScrollBox1Resize
    object ReportControl1: TReportControl
      Left = 260
      Top = 24
      Width = 253
      Height = 363
      OnMouseDown = ReportControl1MouseDown
      OnDragOver = ReportControl1DragOver
      OnDragDrop = ReportControl1DragDrop
    end
  end
  object Panel3: TPanel
    Left = 0
    Top = 0
    Width = 792
    Height = 31
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 1
    object SpeedButton1: TSpeedButton
      Left = 392
      Top = 5
      Width = 24
      Height = 24
      Hint = #21512#24182#21333#20803#26684
      Caption = #21512
      Flat = True
      ParentShowHint = False
      ShowHint = True
      OnClick = CombineCellsClick
    end
    object SpeedButton2: TSpeedButton
      Left = 9
      Top = 5
      Width = 24
      Height = 24
      Hint = #25171#24320'report'#25991#20214
      Flat = True
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        88888888888888888888000000000008888800333333333088880B0333333333
        08880FB03333333330880BFB0333333333080FBFB000000000000BFBFBFBFB08
        88880FBFBFBFBF0888880BFB0000000888888000888888880008888888888888
        8008888888880888080888888888800088888888888888888888}
      ParentShowHint = False
      ShowHint = True
      OnClick = FileOpenClick
    end
    object SpeedButton3: TSpeedButton
      Left = 34
      Top = 5
      Width = 23
      Height = 24
      Hint = #20445#23384
      Flat = True
      Glyph.Data = {
        EE000000424DEE000000000000007600000028000000100000000F0000000100
        0400000000007800000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00770000000000
        0007703300000077030770330000007703077033000000770307703300000000
        0307703333333333330770330000000033077030777777770307703077777777
        0307703077777777030770307777777703077030777777770007703077777777
        070770000000000000077777777777777777}
      ParentShowHint = False
      ShowHint = True
      OnClick = N29Click
    end
    object SpeedButton6: TSpeedButton
      Left = 118
      Top = 5
      Width = 24
      Height = 24
      Hint = #25253#34920#23646#24615#35774#32622
      Flat = True
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        888800000000000088880FFFFFFFFFF088880F00F00000F088880FFFFFFFFFF0
        88880F00F00000F088880FFFFFFFFFF088880FFFFFFF0FF088880F00FFF080F0
        88880F080F08080008440FF08080808880440000080808888844888880808888
        8844888888088888804488888880000008448888888888888888}
      ParentShowHint = False
      ShowHint = True
      OnClick = MarginSettingClick
    end
    object SpeedButton23: TSpeedButton
      Left = 86
      Top = 5
      Width = 24
      Height = 24
      Hint = #26032#24314#34920#26684
      Flat = True
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000001000000010000000000000000000
        BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777777877877877877777787787787787777880880880880887777877877877
        8777777877877877877778808808808808877778778778778777777877877877
        8777788088088088088777787787787787777778778778778777788088088088
        0887777877877877877777787787787787777777777777777777}
      ParentShowHint = False
      ShowHint = True
      OnClick = NewTableClick
    end
    object SpeedButton24: TSpeedButton
      Left = 233
      Top = 5
      Width = 24
      Height = 24
      Hint = #25554#20837#19968#34892#34920#26684
      Flat = True
      Glyph.Data = {
        42010000424D4201000000000000760000002800000011000000110000000100
        040000000000CC00000000000000000000001000000010000000000000000000
        BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        777770000000000000077777777770000000FFFFFF077777777770000000FFFF
        FF077777777770000000FFFFFF07777777777000000000000007777777777000
        0000777777774770000070000000777777744770EFEF70000000777777444440
        FEFE70000000777777744770EFEF700000007777777747700000700000000000
        00077777777770000000FFFFFF077777777770000000FFFFFF07777777777000
        0000FFFFFF077777777770000000000000077777777770000000777777777777
        777770000000}
      ParentShowHint = False
      ShowHint = True
      OnClick = InsertLineClick
    end
    object SpeedButton25: TSpeedButton
      Left = 259
      Top = 5
      Width = 26
      Height = 24
      Hint = #28155#21152#19968#34892#34920#26684
      Flat = True
      Glyph.Data = {
        42010000424D4201000000000000760000002800000011000000110000000100
        040000000000CC00000000000000000000001000000010000000000000000000
        BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        77777000000070000007777777777000000070FFFF07777777777000000070FF
        FF07777777777000000070000007777777777000000070FFFF07777777777000
        000070FFFF077777777770000000700000077470000000000000777777774470
        EFEF00000000777777744440FEFE000000007777777744700000000000007000
        0007747777777000000070FFFF07777777777000000070FFFF07777777777000
        0000700000077777777770000000777777777777777770000000777777777777
        777770000000}
      ParentShowHint = False
      ShowHint = True
      OnClick = AddLineClick
    end
    object SpeedButton26: TSpeedButton
      Left = 286
      Top = 5
      Width = 24
      Height = 24
      Hint = #21024#38500#19968#34892#34920#26684
      Flat = True
      Glyph.Data = {
        42010000424D4201000000000000760000002800000011000000110000000100
        040000000000CC00000000000000000000001000000010000000000000000000
        BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777700000007777777777777777700000007000000007777777700000007FFF
        FFFF07777777700000007FFFFFFF07777777700000007FFFFFFF077777777000
        00007000000000007747700000007EFEFEFEFEF07744700000007FEFEFEFEFE0
        4444400000007EFEFEFEFEF07744700000007000000000007747700000007FFF
        FFFF07777777700000007FFFFFFF07777777700000007FFFFFFF077777777000
        0000700000000777777770000000777777777777777770000000777777777777
        777770000000}
      ParentShowHint = False
      ShowHint = True
      OnClick = DeleteLineClick
    end
    object SpeedButton28: TSpeedButton
      Left = 336
      Top = 5
      Width = 24
      Height = 24
      Hint = #28155#21152#21333#20803#26684
      Flat = True
      Glyph.Data = {
        D6000000424DD60000000000000076000000280000000C0000000C0000000100
        0400000000006000000000000000000000001000000000000000000000000000
        BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000033
        000030FBFBFBF033000030BFBFBFB033000030FBF0FBF033000030BFB0BFB033
        000030F00000F033000030BFB0BFB033000030FBF0FBF033000030BFBFBFB033
        000030FBFBFBF033000030000000003300003333333333330000}
      ParentShowHint = False
      ShowHint = True
      OnClick = AddCellClick
    end
    object SpeedButton29: TSpeedButton
      Left = 366
      Top = 5
      Width = 24
      Height = 24
      Hint = #21024#38500#21333#20803#26684
      Flat = True
      Glyph.Data = {
        42010000424D4201000000000000760000002800000011000000110000000100
        040000000000CC00000000000000000000001000000010000000000000000000
        BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777700000007777777747777777700000007777777444777777700000007777
        7744444777777000000077777777477777777000000077777777477777777000
        00007777770000077777700000007777770EFE077777700000007777770FEF07
        7777700000007777770EFE077777700000007777770FEF077777700000007700
        000EFE00000770000000770FFF0FEF0FFF0770000000770FFF0EFE0FFF077000
        0000770FFF0FEF0FFF0770000000777777777777777770000000777777777777
        777770000000}
      ParentShowHint = False
      ShowHint = True
      OnClick = DeleteCellClick
    end
    object SpeedButton30: TSpeedButton
      Left = 473
      Top = 5
      Width = 24
      Height = 24
      Hint = #21333#20803#26684#36793#26694#32447#35774#32622
      Flat = True
      Glyph.Data = {
        42010000424D4201000000000000760000002800000011000000110000000100
        040000000000CC00000000000000000000001000000010000000000000000000
        BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777700000007770777777777077700000007778777777777877700000007080
        0000000000807000000077700000000000777000000077700777077700777000
        0000777007770777007770000000777007770777007770000000777000000000
        0077700000007770077707770077700000007770077707770077700000007770
        0777077700777000000077700000000000777000000070800000000000807000
        0000777877777777787770000000777077777777707770000000777777777777
        777770000000}
      ParentShowHint = False
      ShowHint = True
      OnClick = CellBorderLineClick
    end
    object SpeedButton31: TSpeedButton
      Left = 498
      Top = 5
      Width = 24
      Height = 24
      Hint = #21333#20803#26684#26012#32447#35774#32622
      Flat = True
      Glyph.Data = {
        42010000424D4201000000000000760000002800000011000000110000000100
        040000000000CC00000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777700000007999999990999999700000007977777707777779700000007977
        7777077777797000000079777770777777797000000079777770777777797000
        0000797777077777777970000000797777077777777970000000797770777777
        7779700000007977077777777779700000007977077777777700700000007970
        7777777700797000000079707777700077797000000079077700077777797000
        0000790700777777777970000000700099999999999970000000777777777777
        777770000000}
      ParentShowHint = False
      ShowHint = True
      OnClick = CellDiagonalLineClick
    end
    object SpeedButton13: TSpeedButton
      Left = 418
      Top = 5
      Width = 24
      Height = 24
      Hint = #32437#21521#25286#20998#21333#20803#26684
      Caption = #32437
      Flat = True
      ParentShowHint = False
      ShowHint = True
      OnClick = VSplitCellClick