⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 hwprint.dfm

📁 这是一个功能齐全的,代码完整的ERP企业信息管理系统,现在上传和大家分享
💻 DFM
字号:
object HwPrintForm: THwPrintForm
  Left = 195
  Top = 92
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = #33258#23450#20041#25171#21360
  ClientHeight = 352
  ClientWidth = 457
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Pitch = fpFixed
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  Position = poMainFormCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnKeyDown = FormKeyDown
  PixelsPerInch = 96
  TextHeight = 12
  object PageControl1: TPageControl
    Left = 8
    Top = 8
    Width = 441
    Height = 305
    ActivePage = tsPage
    TabIndex = 1
    TabOrder = 0
    object tsFields: TTabSheet
      Caption = #39033#30446#36873#25321
      object lblSelected: TLabel
        Left = 16
        Top = 16
        Width = 48
        Height = 12
        Caption = #39033#30446#36873#25321
      end
      object SpeedButton1: TSpeedButton
        Left = 206
        Top = 64
        Width = 23
        Height = 22
        Caption = '>'
        OnClick = SpeedButton1Click
      end
      object SpeedButton2: TSpeedButton
        Left = 206
        Top = 104
        Width = 23
        Height = 22
        Caption = '>>'
        OnClick = SpeedButton2Click
      end
      object SpeedButton3: TSpeedButton
        Left = 206
        Top = 144
        Width = 23
        Height = 22
        Caption = '<'
        OnClick = SpeedButton3Click
      end
      object SpeedButton4: TSpeedButton
        Left = 206
        Top = 184
        Width = 23
        Height = 22
        Caption = '<<'
        OnClick = SpeedButton4Click
      end
      object lblFields: TLabel
        Left = 232
        Top = 16
        Width = 48
        Height = 12
        Caption = #25171#21360#39033#30446
      end
      object CheckListBox1: TCheckListBox
        Left = 16
        Top = 32
        Width = 185
        Height = 225
        ItemHeight = 18
        Items.Strings = (
          '1'
          '2'
          '3'
          '4')
        Style = lbOwnerDrawFixed
        TabOrder = 0
        OnDblClick = SpeedButton1Click
      end
      object sgFields: TStringGrid
        Left = 232
        Top = 32
        Width = 185
        Height = 225
        ColCount = 2
        DefaultRowHeight = 21
        RowCount = 2
        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goDrawFocusSelected, goEditing]
        TabOrder = 1
        OnKeyPress = sgFieldsKeyPress
        OnSelectCell = sgFieldsSelectCell
        ColWidths = (
          91
          79)
      end
    end
    object tsPage: TTabSheet
      Caption = #39029#38754#35774#23450
      ImageIndex = 1
      object lblTitle: TLabel
        Left = 24
        Top = 29
        Width = 48
        Height = 12
        Caption = #25253#34920#26631#39064
      end
      object edtReportTitle: TEdit
        Left = 88
        Top = 24
        Width = 313
        Height = 20
        TabOrder = 0
      end
      object GroupBox3: TGroupBox
        Left = 24
        Top = 56
        Width = 185
        Height = 105
        Caption = #39029#38754#23610#23544
        TabOrder = 1
        object lblWidth: TLabel
          Left = 16
          Top = 54
          Width = 60
          Height = 12
          Caption = #23485#24230'('#27627#31859')'
          FocusControl = edtWidth
        end
        object lblHeight: TLabel
          Left = 16
          Top = 78
          Width = 60
          Height = 12
          Caption = #39640#24230'('#27627#31859')'
          FocusControl = edtHeight
        end
        object cbPaper: TComboBox
          Left = 16
          Top = 20
          Width = 156
          Height = 20
          HelpContext = 130
          Style = csDropDownList
          ItemHeight = 12
          TabOrder = 0
          OnClick = cbPaperClick
        end
        object edtWidth: TEdit
          Left = 88
          Top = 48
          Width = 81
          Height = 20
          HelpContext = 140
          TabOrder = 1
        end
        object edtHeight: TEdit
          Left = 88
          Top = 72
          Width = 81
          Height = 20
          HelpContext = 150
          TabOrder = 2
        end
      end
      object GroupBox2: TGroupBox
        Left = 216
        Top = 56
        Width = 185
        Height = 105
        Caption = #26041#21521
        TabOrder = 2
        object Image2: TImage
          Left = 117
          Top = 40
          Width = 32
          Height = 26
          AutoSize = True
          Picture.Data = {
            07544269746D617016020000424D160200000000000076000000280000002000
            00001A0000000100040000000000A0010000CE0E0000C40E0000100000000000
            000000000000000080000080000000808000800000008000800080800000C0C0
            C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFF
            FF00000000000000000000000000000000008FFFF77777777777777777777777
            77708FFFFFFFFFFFFFFFFFFFFFFFFFFFFF708FFFFFFFFFFFFFFFFFFFFFFFFFFF
            FF708FFFFFFFFFFFFFFFFFFFFFFFFFFFFF708FFFFFFFFFFFFFFFFFFFFFFFFFFF
            FF708FFFFFFFFFFFFFFFFFFFFFFFFFFFFF708FFFFFFFF8888FFFF888888FFFFF
            FF708FFFFFFFFF78FFFFFF7887FFFFFFFF708FFFFFFFFFF87FFFFF888FFFFFFF
            FF708FFFFFFFFFF787FFF7887FFFFFFFFF708FFFFFFFFFFF88888888FFFFFFFF
            FF708FFFFFFFFFFF87FF7887FFFFFFFFFF708FFFFFFFFFFF78FF888FFFFFFFFF
            FF708FFFFFFFFFFFF87F887FFFFFFFFFFF708FFFFFFFFFFFF78888FFFFFFFFFF
            FF708FFFFFFFFFFFFF8887FFFFFFFFFFFF708FFFFFFFFFFFFF788FFFFFFFFFFF
            FF708FFFFFFFFFFFFFF87FFFFFFFFFFFFF708FFFFFFFFFFFFFFFFFFFFFFFF000
            00088FFFFFFFFFFFFFFFFFFFFFFFF07FFF878FFFFFFFFFFFFFFFFFFFFFFFF07F
            F8778FFFFFFFFFFFFFFFFFFFFFFFF07F87778FFFFFFFFFFFFFFFFFFFFFFFF0F8
            77778FFFFFFFFFFFFFFFFFFFFFFFF08777778888888888888888888888888077
            7777}
        end
        object Image1: TImage
          Left = 120
          Top = 36
          Width = 26
          Height = 32
          AutoSize = True
          Picture.Data = {
            07544269746D617076020000424D760200000000000076000000280000001A00
            000020000000010004000000000000020000CE0E0000C40E0000100000000000
            000000000000000080000080000000808000800000008000800080800000C0C0
            C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFF
            FF00000000000000000000000000000000008777777777777777777777777000
            00008FFFFFFFFFFFFFFFFFFFFFFF700000008FFFFFFFFFFFFFFFFFFFFFFF7000
            00008FFFFFFFFFFFFFFFFFFFFFFF700000008FFFFFFFFFFFFFFFFFFFFFFF7000
            00008FFFFFFFFFFFFFFFFFFFFFFF700000008FFFFFFFFFFFFFFFFFFFFFFF7000
            00008FFFFFFFFFFFFFFFFFFFFFFF700000008FFFFFFFFFFFFFFFFFFFFFFF7000
            00008FFFFF8888FFFF888888FFFF700000008FFFFFF78FFFFFF7887FFFFF7000
            00008FFFFFFF87FFFFF888FFFFFF700000008FFFFFFF787FFF7887FFFFFF7000
            00008FFFFFFFF88888888FFFFFFF700000008FFFFFFFF87FF7887FFFFFFF7000
            00008FFFFFFFF78FF888FFFFFFFF700000008FFFFFFFFF87F887FFFFFFFF7000
            00008FFFFFFFFF78888FFFFFFFFF700000008FFFFFFFFFF8887FFFFFFFFF7000
            00008FFFFFFFFFF788FFFFFFFFFF700000008FFFFFFFFFFF87FFFFFFFFFF7000
            00008FFFFFFFFFFFFFFFFFFFFFFF700000008FFFFFFFFFFFFFFFFFFFFFFF7000
            00008FFFFFFFFFFFFFFFFFFFFFFF700000008FFFFFFFFFFFFFFFFFF800000000
            00008FFFFFFFFFFFFFFFFFF8FF78070000008FFFFFFFFFFFFFFFFFF8F7807700
            00008FFFFFFFFFFFFFFFFFF87807770000008FFFFFFFFFFFFFFFFFF880777700
            00008FFFFFFFFFFFFFFFFFF80777770000008888888888888888888877777700
            0000}
        end
        object rbVertical: TRadioButton
          Left = 32
          Top = 32
          Width = 79
          Height = 16
          HelpContext = 111
          Caption = #32437#21521
          TabOrder = 0
          OnClick = rbVerticalClick
        end
        object rbHorizontal: TRadioButton
          Left = 32
          Top = 64
          Width = 79
          Height = 16
          HelpContext = 120
          Caption = #27178#21521
          Checked = True
          TabOrder = 1
          TabStop = True
          OnClick = rbHorizontalClick
        end
      end
      object GroupBox4: TGroupBox
        Left = 24
        Top = 168
        Width = 377
        Height = 89
        Caption = #36793#36317
        TabOrder = 3
        object lblTop: TLabel
          Left = 16
          Top = 28
          Width = 72
          Height = 12
          Caption = #19978#36793#30028'('#27627#31859')'
        end
        object lblBottom: TLabel
          Left = 208
          Top = 28
          Width = 72
          Height = 12
          Caption = #19979#36793#30028'('#27627#31859')'
        end
        object lblLeft: TLabel
          Left = 16
          Top = 56
          Width = 72
          Height = 12
          Caption = #24038#36793#30028'('#27627#31859')'
        end
        object lblRight: TLabel
          Left = 208
          Top = 56
          Width = 72
          Height = 12
          Caption = #21491#36793#30028'('#27627#31859')'
        end
        object edtTop: TEdit
          Left = 96
          Top = 24
          Width = 57
          Height = 20
          TabOrder = 0
          Text = '0'
        end
        object upTop: TUpDown
          Left = 153
          Top = 24
          Width = 17
          Height = 20
          Associate = edtTop
          Min = 0
          Position = 0
          TabOrder = 1
          Wrap = False
        end
        object edtBottom: TEdit
          Left = 288
          Top = 24
          Width = 57
          Height = 20
          TabOrder = 2
          Text = '0'
        end
        object udBottom: TUpDown
          Left = 345
          Top = 24
          Width = 17
          Height = 20
          Associate = edtBottom
          Min = 0
          Position = 0
          TabOrder = 3
          Wrap = False
        end
        object edtLeft: TEdit
          Left = 96
          Top = 52
          Width = 57
          Height = 20
          TabOrder = 4
          Text = '0'
        end
        object udLeft: TUpDown
          Left = 153
          Top = 52
          Width = 17
          Height = 20
          Associate = edtLeft
          Min = 0
          Position = 0
          TabOrder = 5
          Wrap = False
        end
        object edtRight: TEdit
          Left = 288
          Top = 52
          Width = 57
          Height = 20
          TabOrder = 6
          Text = '0'
        end
        object udRight: TUpDown
          Left = 345
          Top = 52
          Width = 17
          Height = 20
          Associate = edtRight
          Min = 0
          Position = 0
          TabOrder = 7
          Wrap = False
        end
      end
    end
    object tsFont: TTabSheet
      Caption = #23383#20307#35774#32622
      ImageIndex = 2
      object pnlTitle: TPanel
        Left = 24
        Top = 40
        Width = 297
        Height = 33
        BevelOuter = bvLowered
        Caption = #25253#34920#21517#31216
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -21
        Font.Name = #23435#20307
        Font.Pitch = fpFixed
        Font.Style = []
        ParentFont = False
        TabOrder = 0
      end
      object pnlColumn: TPanel
        Left = 24
        Top = 88
        Width = 297
        Height = 33
        BevelOuter = bvLowered
        Caption = #21015#26631#39064
        TabOrder = 1
      end
      object pnlData: TPanel
        Left = 24
        Top = 136
        Width = 297
        Height = 33
        BevelOuter = bvLowered
        Caption = #25968#25454#34892
        TabOrder = 2
      end
      object pnlFoot: TPanel
        Left = 24
        Top = 184
        Width = 297
        Height = 33
        BevelOuter = bvLowered
        Caption = #25253#34920#39029#33050
        TabOrder = 3
      end
      object bbtnTitle: TBitBtn
        Left = 336
        Top = 44
        Width = 75
        Height = 25
        Caption = #23383#20307
        TabOrder = 4
        OnClick = bbtnTitleClick
      end
      object bbtnColumn: TBitBtn
        Left = 336
        Top = 92
        Width = 75
        Height = 25
        Caption = #23383#20307
        TabOrder = 5
        OnClick = bbtnColumnClick
      end
      object bbtnData: TBitBtn
        Left = 336
        Top = 140
        Width = 75
        Height = 25
        Caption = #23383#20307
        TabOrder = 6
        OnClick = bbtnDataClick
      end
      object bbtnFoot: TBitBtn
        Left = 336
        Top = 188
        Width = 75
        Height = 25
        Caption = #23383#20307
        TabOrder = 7
        OnClick = bbtnFootClick
      end
    end
  end
  object bbtnPrint: TBitBtn
    Left = 264
    Top = 320
    Width = 75
    Height = 25
    Caption = #25171#21360'(&P)'
    TabOrder = 1
    OnClick = bbtnPrintClick
  end
  object bbtnExit: TBitBtn
    Left = 360
    Top = 320
    Width = 75
    Height = 25
    Caption = #36864#20986'(&X)'
    TabOrder = 2
    OnClick = bbtnExitClick
  end
  object DataSource1: TDataSource
    Left = 308
  end
  object FontDialog1: TFontDialog
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    MinFontSize = 0
    MaxFontSize = 0
    Left = 380
  end
  object frReport1: TfrReport
    InitialZoom = pzDefault
    PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbHelp, pbExit]
    RebuildPrinter = False
    Left = 176
    Top = 16
    ReportForm = {19000000}
  end
end

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -