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

📄 ccdwh.~dfm

📁 仓库管理信息系统
💻 ~DFM
📖 第 1 页 / 共 2 页
字号:
        Font.Style = []
        ParentFont = False
      end
      object SpeedButton1: TSpeedButton
        Left = 124
        Top = 102
        Width = 23
        Height = 22
        Caption = '...'
        Flat = True
        OnClick = SpeedButton1Click
      end
      object SpeedButton3: TSpeedButton
        Left = 267
        Top = 100
        Width = 23
        Height = 22
        Caption = '...'
        Flat = True
        OnClick = SpeedButton3Click
      end
      object DBEdit2: TDBEdit
        Left = 24
        Top = 57
        Width = 100
        Height = 21
        DataField = #20986#20179#21333#21495
        DataSource = dm.whccdds
        TabOrder = 0
      end
      object DBLookupComboBox1: TDBLookupComboBox
        Left = 167
        Top = 100
        Width = 100
        Height = 21
        DataField = #20986#20179#31867#22411
        DataSource = dm.whccdds
        KeyField = #20986#20179#31867#22411'ID'
        ListField = #20986#20179#31867#22411
        ListSource = dm.whcclxdmds
        TabOrder = 1
      end
      object DBLookupComboBox2: TDBLookupComboBox
        Left = 24
        Top = 102
        Width = 100
        Height = 21
        DataField = #37096#38376
        DataSource = dm.whccdds
        KeyField = #37096#38376'ID'
        ListField = #37096#38376#21517#31216
        ListSource = dm.whbmdmds
        TabOrder = 2
      end
      object DBDateTimeEditEh1: TDBDateTimeEditEh
        Left = 168
        Top = 56
        Width = 100
        Height = 21
        DataField = #26085#26399
        DataSource = dm.whccdds
        EditButton.Style = ebsUpDownEh
        EditButtons = <>
        Kind = dtkDateEh
        TabOrder = 3
        Visible = True
        OnChange = DBDateTimeEditEh1Change
      end
      object Panel3: TPanel
        Left = 1
        Top = 1
        Width = 588
        Height = 34
        Align = alTop
        BevelInner = bvLowered
        Caption = '                   <--'#21333#25454#32534#36753#25353#38062
        TabOrder = 4
        object Label11: TLabel
          Left = 429
          Top = 12
          Width = 65
          Height = 13
          Caption = #20849#26377#35760#24405#65306
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = #40657#20307
          Font.Style = [fsItalic]
          ParentFont = False
        end
        object sbt: TSpeedButton
          Left = 561
          Top = 6
          Width = 23
          Height = 22
          Hint = #39#38544#34255#26465#20214#26694
          Caption = #9660
          Flat = True
          ParentShowHint = False
          ShowHint = True
          OnClick = sbtClick
        end
        object DBNavigator1: TDBNavigator
          Left = 2
          Top = 2
          Width = 300
          Height = 30
          DataSource = dm.whccdds
          VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbDelete, nbEdit, nbPost, nbCancel]
          Align = alLeft
          Hints.Strings = (
            #31532#19968#31508#21333#25454
            #21069#19968#31508#21333#25454
            #19979#19968#31508#21333#25454
            #26368#21518#19968#31508#21333#25454
            #22686#21152#21333#25454
            #21024#38500#21333#25454
            #20462#25913#21333#25454
            #20445#23384#21333#25454
            #21462#28040#21333#25454
            #21047#26032#21333#25454)
          ParentShowHint = False
          ShowHint = True
          TabOrder = 0
        end
      end
      object DBEdit3: TDBEdit
        Left = 309
        Top = 100
        Width = 247
        Height = 21
        DataField = #22791#27880
        DataSource = dm.whccdds
        TabOrder = 5
      end
      object DBEdit4: TDBEdit
        Left = 308
        Top = 56
        Width = 100
        Height = 21
        DataField = #39046#29992#20154
        DataSource = dm.whccdds
        TabOrder = 6
      end
    end
    object GroupBox3: TGroupBox
      Left = 2
      Top = 158
      Width = 594
      Height = 185
      Align = alClient
      Caption = #20986#20179#21333#26126#32454
      TabOrder = 1
      object DBGridEh1: TDBGridEh
        Left = 2
        Top = 15
        Width = 590
        Height = 168
        Align = alClient
        Ctl3D = False
        DataSource = dm.whccmxds
        Flat = True
        FooterColor = clWindow
        FooterFont.Charset = ANSI_CHARSET
        FooterFont.Color = clWindowText
        FooterFont.Height = -13
        FooterFont.Name = #23435#20307
        FooterFont.Style = []
        FooterRowCount = 1
        ParentCtl3D = False
        SumList.Active = True
        TabOrder = 0
        TitleFont.Charset = ANSI_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -13
        TitleFont.Name = #23435#20307
        TitleFont.Style = []
        OnDblClick = DBGridEh1DblClick
        OnEditButtonClick = DBGridEh1DblClick
        Columns = <
          item
            ButtonStyle = cbsEllipsis
            EditButtons = <>
            FieldName = #26448#26009#32534#30721
            Footers = <>
            Width = 118
          end
          item
            Color = clInfoBk
            EditButtons = <>
            FieldName = #26448#26009#21517#31216
            Footer.Alignment = taCenter
            Footer.Value = #21512#35745
            Footer.ValueType = fvtStaticText
            Footers = <>
            ReadOnly = True
            Width = 131
          end
          item
            Color = clInfoBk
            EditButtons = <>
            FieldName = #21333#20301
            Footers = <>
            ReadOnly = True
            Width = 29
          end
          item
            Color = clInfoBk
            EditButtons = <>
            FieldName = #26448#26009#35268#26684
            Footers = <>
            ReadOnly = True
            Width = 56
          end
          item
            EditButtons = <>
            FieldName = #25968#37327
            Footer.ValueType = fvtSum
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #21333#20215
            Footers = <>
            Width = 71
          end
          item
            EditButtons = <>
            FieldName = #37329#39069
            Footer.ValueType = fvtSum
            Footers = <>
            Width = 73
          end
          item
            EditButtons = <>
            FieldName = #22791#27880
            Footers = <>
            Visible = False
          end
          item
            EditButtons = <>
            FieldName = #31867#22411'ID'
            Footers = <>
            Visible = False
          end
          item
            EditButtons = <>
            FieldName = #20986#20179'ID'
            Footers = <>
            Visible = False
          end
          item
            EditButtons = <>
            FieldName = #20986#20179#26126#32454'ID'
            Footers = <>
            Visible = False
          end>
      end
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 418
    Width = 598
    Height = 22
    Align = alBottom
    Alignment = taLeftJustify
    BevelOuter = bvNone
    Caption = '                                     '#26126#32454#35760#24405#32534#36753#25353#38062'-->'
    TabOrder = 2
    object DBNavigator2: TDBNavigator
      Left = 391
      Top = 0
      Width = 207
      Height = 22
      DataSource = dm.whccmxds
      VisibleButtons = [nbFirst, nbLast, nbInsert, nbDelete, nbEdit, nbPost, nbCancel]
      Align = alRight
      Flat = True
      Hints.Strings = (
        #31532#19968#26465
        #21069#19968#26465
        #19979#19968#26465
        #26368#21518#19968#26465
        #22686#21152
        #21024#38500
        #20462#25913
        #20445#23384
        #21462#28040
        #21047#26032)
      ParentShowHint = False
      ConfirmDelete = False
      ShowHint = True
      TabOrder = 0
    end
  end
  object frReport1: TfrReport
    InitialZoom = pzDefault
    PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbHelp, pbExit]
    OnGetValue = frReport1GetValue
    Left = 493
    Top = 60
    ReportForm = {18000000}
  end
  object frDBDataSet1: TfrDBDataSet
    DataSource = dm.whccdds
    Left = 529
    Top = 62
  end
  object frDBDataSet2: TfrDBDataSet
    DataSource = dm.whccmxds
    Left = 566
    Top = 60
  end
end

⌨️ 快捷键说明

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