untmaintenance.dfm

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

            end
            object DBEdit3: TDBEdit
              Left = 288
              Top = 80
              Width = 121
              Height = 21
              DataField = 'MaintenancePerformedBy'
              DataSource = DMasset.DSMaintenance
              TabOrder = 2
            end
            object DBEdit4: TDBEdit
              Left = 76
              Top = 128
              Width = 593
              Height = 21
              DataField = 'MaintenanceDescription'
              DataSource = DMasset.DSMaintenance
              TabOrder = 5
            end
            object BitBtn1: TBitBtn
              Left = 689
              Top = 125
              Width = 82
              Height = 25
              Caption = #23548#20986'Excel'
              TabOrder = 6
              Glyph.Data = {
                AA030000424DAA03000000000000360000002800000011000000110000000100
                1800000000007403000000000000000000000000000000000000848484FF0000
                FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00
                00FF0000FF0000FF0000FF000000848484FF0000FF0000FF0000FF0000FF0000
                FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00
                0000848484FF0000FF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
                FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FF000000848484FF0000FF0000FF
                FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FF0000FF0000
                FF0000FF0000FF000000848484FF0000FF0000FFFFFFFF0000FF0000FF0000FF
                0000FFFFFFFFFFFFFF0000FF0000FF0000FF0000FF0000FF0000FF0000008484
                84FF0000FF0000FFFFFFC0C0C0FF0000FF0000FF0000FF0000FF0000FF0000FF
                0000FF0000FF0000C0C0C0FF0000FF000000848484FF0000FF0000FFFFFFFFFF
                FFC0C0C0FF0000FF0000FF0000FF0000FF0000FF0000FF0000C0C0C0FFFFFFFF
                0000FF000000848484FF0000FF0000FFFFFFFFFFFFFFFFFFC0C0C0FF0000FF00
                00FF0000FF0000FF0000C0C0C0FFFFFFFFFFFFFF0000FF000000848484FF0000
                FF0000FFFFFFFFFFFFFFFFFFFF0000FF0000FF0000FF0000FF0000FF0000FFFF
                FFFFFFFFFFFFFFFF0000FF000000848484FF0000FF0000FFFFFFFFFFFFFF0000
                FF0000FF0000FF0000FF0000FF0000FF0000FF0000FFFFFFFFFFFFFF0000FF00
                0000848484FF0000FF0000FFFFFFFF0000FF0000FF0000FF0000FF0000C0C0C0
                FF0000FF0000FF0000FF0000FFFFFFFF0000FF000000848484FF0000FF0000FF
                FFFFFF0000FF0000FF0000FF0000C0C0C0FFFFFFC0C0C0FF0000FF0000FF0000
                FFFFFFFF0000FF000000848484FF0000FF0000FFFFFFFF0000FF0000FF0000C0
                C0C0FFFFFFFFFFFFFFFFFFC0C0C0FF0000FF0000FFFFFFFF0000FF0000008484
                84FF0000FF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
                FFFFFFFFFFFFFFFFFFFFFFFF0000FF000000848484FF0000FF0000FF0000FF00
                00FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF
                0000FF000000848484FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00
                00FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF000000848484848484
                8484848484848484848484848484848484848484848484848484848484848484
                8484848484848484848484848400}
            end
            object DBDateTimeEditEh1: TDBDateTimeEditEh
              Left = 673
              Top = 80
              Width = 105
              Height = 21
              DataField = 'MaintenanceDate'
              DataSource = DMasset.DSMaintenance
              EditButtons = <>
              Kind = dtkDateEh
              TabOrder = 4
              Visible = True
            end
          end
          object DBNavigator3: TDBNavigator
            Left = 2
            Top = 161
            Width = 866
            Height = 25
            DataSource = DMasset.DSMaintenance
            VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbDelete, nbEdit, nbPost, nbCancel, nbRefresh]
            Align = alTop
            Flat = True
            TabOrder = 1
          end
          object GroupBox2: TGroupBox
            Left = 2
            Top = 186
            Width = 866
            Height = 355
            Align = alClient
            Caption = #27983#35272#21306
            TabOrder = 2
            object DBGridEh3: TDBGridEh
              Left = 2
              Top = 15
              Width = 862
              Height = 338
              Align = alClient
              DataSource = DMasset.DSMaintenance
              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 = DBGridEh4DrawColumnCell
              OnTitleClick = DBGridEh4TitleClick
              Columns = <
                item
                  EditButtons = <>
                  FieldName = 'MaintenanceID'
                  Footers = <>
                  Title.Caption = #32500#20462#26631#35782
                end
                item
                  EditButtons = <>
                  FieldName = 'AssetID'
                  Footers = <>
                  Title.Caption = #36164#20135#26631#35782
                end
                item
                  EditButtons = <>
                  FieldName = 'code'
                  Footers = <>
                  Title.Caption = #32534#21495
                  Width = 105
                end
                item
                  EditButtons = <>
                  FieldName = 'FaultCategoryname'
                  Footers = <>
                  Title.Caption = #25925#38556#31867#21035#21517#31216
                  Width = 85
                end
                item
                  EditButtons = <>
                  FieldName = 'PartsName'
                  Footers = <>
                  Title.Caption = #25925#38556#37096#20214
                end
                item
                  EditButtons = <>
                  FieldName = 'MaintenancePerformedBy'
                  Footers = <>
                  Title.Caption = #32500#25252#20154
                  Width = 55
                end
                item
                  EditButtons = <>
                  FieldName = 'MaintenanceCost'
                  Footers = <>
                  Title.Caption = #32500#25252#25104#26412
                  Width = 57
                end
                item
                  EditButtons = <>
                  FieldName = 'MaintenanceDate'
                  Footers = <>
                  Title.Caption = #32500#25252#26085#26399
                  Width = 75
                end
                item
                  EditButtons = <>
                  FieldName = 'MaintenanceDescription'
                  Footers = <>
                  Title.Caption = #32500#25252#35828#26126
                  Width = 679
                end>
            end
          end
        end
      end
      object TabSheet3: TTabSheet
        Caption = #25925#38556#31867#21035
        ImageIndex = 2
        object Panel4: TPanel
          Left = 0
          Top = 0
          Width = 870
          Height = 543
          Align = alClient
          BevelInner = bvLowered
          Caption = 'Panel4'
          TabOrder = 0
          object DBNavigator2: TDBNavigator
            Left = 2
            Top = 2
            Width = 866
            Height = 25
            DataSource = DMasset.DSFaultCategory
            Align = alTop
            Flat = True
            TabOrder = 0
          end
          object DBGridEh2: TDBGridEh
            Left = 2
            Top = 27
            Width = 866
            Height = 514
            Align = alClient
            DataSource = DMasset.DSFaultCategory
            Flat = True
            FooterColor = clWindow
            FooterFont.Charset = DEFAULT_CHARSET
            FooterFont.Color = clWindowText
            FooterFont.Height = -11
            FooterFont.Name = 'MS Sans Serif'
            FooterFont.Style = []
            TabOrder = 1
            TitleFont.Charset = DEFAULT_CHARSET
            TitleFont.Color = clWindowText
            TitleFont.Height = -11
            TitleFont.Name = 'MS Sans Serif'
            TitleFont.Style = []
            OnDrawColumnCell = DBGridEh4DrawColumnCell
            OnTitleClick = DBGridEh4TitleClick
            Columns = <
              item
                EditButtons = <>
                FieldName = 'FaultCategoryID'
                Footers = <>
                Title.Caption = #25925#38556#31867#21035#26631#35782
                Width = 82
              end
              item
                EditButtons = <>
                FieldName = 'FaultCategoryName'
                Footers = <>
                Title.Caption = #25925#38556#21015#34920#21517#31216
                Width = 206
              end>
          end
        end
      end
      object TabSheet4: TTabSheet
        Caption = #37096#20214
        ImageIndex = 3
        object Panel5: TPanel
          Left = 0
          Top = 0
          Width = 870
          Height = 543
          Align = alClient
          BevelInner = bvLowered
          Caption = 'Panel5'
          TabOrder = 0
          object DBNavigator1: TDBNavigator
            Left = 2
            Top = 2
            Width = 866
            Height = 25
            DataSource = DMasset.DSParts
            Align = alTop
            Flat = True
            TabOrder = 0
          end
          object DBGridEh1: TDBGridEh
            Left = 2
            Top = 27
            Width = 866
            Height = 514
            Align = alClient
            DataSource = DMasset.DSParts
            Flat = True
            FooterColor = clWindow
            FooterFont.Charset = DEFAULT_CHARSET
            FooterFont.Color = clWindowText
            FooterFont.Height = -11
            FooterFont.Name = 'MS Sans Serif'
            FooterFont.Style = []
            TabOrder = 1
            TitleFont.Charset = DEFAULT_CHARSET
            TitleFont.Color = clWindowText
            TitleFont.Height = -11
            TitleFont.Name = 'MS Sans Serif'
            TitleFont.Style = []
            OnDrawColumnCell = DBGridEh4DrawColumnCell
            OnTitleClick = DBGridEh4TitleClick
            Columns = <
              item
                EditButtons = <>
                FieldName = 'PartsID'
                Footers = <>
                Title.Caption = #37096#20214#26631#35782
              end
              item
                EditButtons = <>
                FieldName = 'PartsName'
                Footers = <>
                Title.Caption = #37096#20214#21517#31216
              end>
          end
        end
      end
    end
  end
end