jcdwh.dfm

仓库管理信息系统

      end
      object Label19: TLabel
        Left = 88
        Top = 86
        Width = 65
        Height = 13
        Caption = #20379#24212#21830#31616#31216
        FocusControl = gyslc
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
      end
      object SpeedButton1: TSpeedButton
        Left = 272
        Top = 102
        Width = 22
        Height = 22
        Caption = '...'
        Flat = True
        OnClick = SpeedButton1Click
      end
      object SpeedButton3: TSpeedButton
        Left = 422
        Top = 53
        Width = 22
        Height = 22
        Caption = '...'
        Flat = True
        OnClick = SpeedButton3Click
      end
      object SpeedButton4: TSpeedButton
        Left = 568
        Top = 54
        Width = 22
        Height = 22
        Caption = '...'
        Flat = True
        OnClick = SpeedButton4Click
      end
      object DBEdit2: TDBEdit
        Left = 27
        Top = 59
        Width = 100
        Height = 21
        DataField = #36827#20179#21333#21495
        DataSource = dm.whjcdds
        TabOrder = 0
      end
      object DBLookupComboBox1: TDBLookupComboBox
        Left = 322
        Top = 54
        Width = 100
        Height = 21
        DataField = #36827#20179#31867#22411
        DataSource = dm.whjcdds
        ListField = #36827#20179#31867#22411
        TabOrder = 1
      end
      object gyslc: TDBLookupComboBox
        Left = 88
        Top = 102
        Width = 184
        Height = 21
        DataField = #20379#24212#21830
        DataSource = dm.whjcdds
        ListField = #20379#24212#21830#31616#31216
        TabOrder = 2
        OnCloseUp = gyslcCloseUp
      end
      object DBDateTimeEditEh1: TDBDateTimeEditEh
        Left = 172
        Top = 56
        Width = 100
        Height = 21
        DataField = #26085#26399
        DataSource = dm.whjcdds
        EditButton.Style = ebsUpDownEh
        EditButtons = <>
        Kind = dtkDateEh
        TabOrder = 3
        Visible = True
        OnChange = DBDateTimeEditEh1Change
      end
      object DBLookupComboBox3: TDBLookupComboBox
        Left = 468
        Top = 54
        Width = 100
        Height = 21
        DataField = #39564#25910#20154
        DataSource = dm.whjcdds
        ListField = #39564#25910#20154
        TabOrder = 4
      end
      object Panel3: TPanel
        Left = 1
        Top = 1
        Width = 601
        Height = 34
        Align = alTop
        BevelInner = bvLowered
        Caption = '                   <--'#21333#25454#32534#36753#25353#38062
        TabOrder = 5
        object Label11: TLabel
          Left = 435
          Top = 11
          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 = 573
          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.whjcdds
          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 = 322
        Top = 102
        Width = 245
        Height = 21
        DataField = #22791#27880
        DataSource = dm.whjcdds
        TabOrder = 6
      end
      object Edit2: TEdit
        Left = 26
        Top = 102
        Width = 63
        Height = 21
        TabOrder = 7
        OnChange = Edit2Change
      end
    end
    object GroupBox3: TGroupBox
      Left = 2
      Top = 158
      Width = 607
      Height = 172
      Align = alClient
      Caption = #36827#20179#21333#26126#32454
      TabOrder = 1
      object DBGridEh1: TDBGridEh
        Left = 2
        Top = 15
        Width = 603
        Height = 155
        Align = alClient
        Ctl3D = False
        DataSource = dm.whjcmxds
        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 = 115
          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>
      end
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 406
    Width = 611
    Height = 22
    Align = alBottom
    Alignment = taLeftJustify
    BevelOuter = bvNone
    Caption = '                                     '#26126#32454#35760#24405#32534#36753#25353#38062'-->'
    TabOrder = 2
    object DBNavigator2: TDBNavigator
      Left = 404
      Top = 0
      Width = 207
      Height = 22
      DataSource = dm.whjcmxds
      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]
    Left = 497
    Top = 66
    ReportForm = {18000000}
  end
  object frDBDataSet1: TfrDBDataSet
    DataSource = dm.whjcdds
    Left = 528
    Top = 66
  end
  object frDBDataSet2: TfrDBDataSet
    DataSource = dm.whjcmxds
    Left = 560
    Top = 66
  end
end