untmove.~dfm

固定资产管理系统源码 资产管理 查询管理 报表管理 系统管理

              Font.Height = -12
              Font.Name = 'MS Sans Serif'
              Font.Style = []
              ParentFont = False
            end
            object DBText7: TDBText
              Left = 712
              Top = 72
              Width = 69
              Height = 17
              DataField = 'OldDepartmentName'
              DataSource = DMasset.DSMove
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clBlue
              Font.Height = -12
              Font.Name = 'MS Sans Serif'
              Font.Style = []
              ParentFont = False
            end
            object Label16: TLabel
              Left = 508
              Top = 72
              Width = 41
              Height = 13
              AutoSize = False
              Caption = #21407#20844#21496
            end
            object DBText8: TDBText
              Left = 552
              Top = 72
              Width = 89
              Height = 17
              DataField = 'OldCompany'
              DataSource = DMasset.DSMove
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clBlue
              Font.Height = -12
              Font.Name = 'MS Sans Serif'
              Font.Style = []
              ParentFont = False
            end
            object Label17: TLabel
              Left = 16
              Top = 120
              Width = 49
              Height = 13
              AutoSize = False
              Caption = #26032#20844#21496
            end
            object DBDateTimeEditEh1: TDBDateTimeEditEh
              Left = 586
              Top = 120
              Width = 110
              Height = 21
              DataField = 'returnDate'
              DataSource = DMasset.DSMove
              EditButtons = <>
              Kind = dtkDateEh
              TabOrder = 0
              Visible = True
            end
            object DBEditEh1: TDBEditEh
              Left = 227
              Top = 152
              Width = 470
              Height = 21
              DataField = 'note'
              DataSource = DMasset.DSMove
              EditButtons = <>
              TabOrder = 1
              Visible = True
            end
            object DBEdit1: TDBEdit
              Left = 72
              Top = 24
              Width = 105
              Height = 21
              Color = clScrollBar
              DataField = 'AssetID'
              DataSource = DMasset.DSMove
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clBlue
              Font.Height = -12
              Font.Name = 'MS Sans Serif'
              Font.Style = []
              ParentFont = False
              ReadOnly = True
              TabOrder = 2
            end
            object DBLookupComboBox6: TDBLookupComboBox
              Left = 74
              Top = 152
              Width = 102
              Height = 21
              DataField = 'StatusID'
              DataSource = DMasset.DSMove
              KeyField = 'StatusID'
              ListField = 'Status'
              ListSource = DMasset.DSStatus
              TabOrder = 3
            end
            object BitBtn3: TBitBtn
              Left = 712
              Top = 150
              Width = 65
              Height = 25
              Caption = #23548#20986
              TabOrder = 4
              OnClick = BitBtn3Click
            end
            object DBEdit2: TDBEdit
              Left = 384
              Top = 120
              Width = 112
              Height = 21
              DataField = 'Employee'
              DataSource = DMasset.DSMove
              TabOrder = 5
            end
            object DBLookupComboBox1: TDBLookupComboBox
              Left = 72
              Top = 120
              Width = 97
              Height = 21
              KeyField = 'CompanyID'
              ListField = 'Company'
              ListSource = DMasset.DSCompany
              TabOrder = 6
            end
            object DBLookupComboBox2: TDBLookupComboBox
              Left = 224
              Top = 120
              Width = 105
              Height = 21
              DataField = 'NewDepartmentID'
              DataSource = DMasset.DSMove
              KeyField = 'DepartmentID'
              ListField = 'DepartmentName'
              ListSource = DMasset.DSDepartment
              TabOrder = 7
            end
          end
          object DBNavigator2: TDBNavigator
            Left = 2
            Top = 194
            Width = 819
            Height = 25
            DataSource = DMasset.DSMove
            VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbDelete, nbEdit, nbPost, nbCancel, nbRefresh]
            Flat = True
            TabOrder = 1
          end
          object GroupBox2: TGroupBox
            Left = 2
            Top = 229
            Width = 833
            Height = 339
            Align = alBottom
            Caption = #27983#35272#21306
            TabOrder = 2
            object DBGridEh2: TDBGridEh
              Left = 2
              Top = 15
              Width = 829
              Height = 322
              Align = alClient
              DataSource = DMasset.DSMove
              Flat = True
              FooterColor = clWindow
              FooterFont.Charset = DEFAULT_CHARSET
              FooterFont.Color = clWindowText
              FooterFont.Height = -11
              FooterFont.Name = 'MS Sans Serif'
              FooterFont.Style = []
              ReadOnly = True
              TabOrder = 0
              TitleFont.Charset = DEFAULT_CHARSET
              TitleFont.Color = clWindowText
              TitleFont.Height = -11
              TitleFont.Name = 'MS Sans Serif'
              TitleFont.Style = []
              OnDrawColumnCell = DBGridEh1DrawColumnCell
              OnTitleClick = DBGridEh2TitleClick
              Columns = <
                item
                  EditButtons = <>
                  FieldName = 'MoveID'
                  Footers = <>
                  Title.Caption = #24322#21160#26631#35782
                end
                item
                  EditButtons = <>
                  FieldName = 'AssetID'
                  Footers = <>
                  Title.Caption = #36164#20135#26631#35782
                  Width = 54
                end
                item
                  EditButtons = <>
                  FieldName = 'oldCompany'
                  Footers = <>
                  Title.Caption = #21407#20844#21496
                  Width = 59
                end
                item
                  EditButtons = <>
                  FieldName = 'OldDepartmentName'
                  Footers = <>
                  Title.Caption = #21407#26377#37096#38376
                  Width = 66
                end
                item
                  EditButtons = <>
                  FieldName = 'AssetCategory'
                  Footers = <>
                  Title.Caption = #36164#20135#31867#21035
                  Width = 59
                end
                item
                  EditButtons = <>
                  FieldName = 'Makename'
                  Footers = <>
                  Title.Caption = #21697#29260
                  Width = 41
                end
                item
                  EditButtons = <>
                  FieldName = 'ModelNumberName'
                  Footers = <>
                  Title.Caption = #22411#21495
                  Width = 83
                end
                item
                  EditButtons = <>
                  FieldName = 'AssetDescription'
                  Footers = <>
                  Title.Caption = #36164#20135#32534#21495
                  Width = 69
                end
                item
                  EditButtons = <>
                  FieldName = 'Code'
                  Footers = <>
                  Title.Caption = #32534#21495
                  Width = 70
                end
                item
                  EditButtons = <>
                  FieldName = 'Company'
                  Footers = <>
                  Title.Caption = #26032#20844#21496
                  Width = 48
                end
                item
                  EditButtons = <>
                  FieldName = 'DepartmentName'
                  Footers = <>
                  Title.Caption = #26032#37096#38376
                  Width = 71
                end
                item
                  EditButtons = <>
                  FieldName = 'Employee'
                  Footers = <>
                  Title.Caption = #21592#24037
                  Width = 58
                end
                item
                  EditButtons = <>
                  FieldName = 'DateAcquired'
                  Footers = <>
                  Title.Caption = #36141#20080#26085#26399
                end
                item
                  EditButtons = <>
                  FieldName = 'returnDate'
                  Footers = <>
                  Title.Caption = #20132#25509#26085#26399
                end
                item
                  EditButtons = <>
                  FieldName = 'note'
                  Footers = <>
                  Title.Caption = #22791#27880
                end>
            end
          end
        end
      end
    end
  end
end