untbasic.~dfm

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

            Left = 11
            Top = 250
            Width = 765
            Height = 25
            DataSource = DMasset.DSEmployee
            VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbEdit, nbPost, nbCancel, nbRefresh]
            Flat = True
            Hints.Strings = (
              #31532#19968#26465#35760#24405
              #19978#19968#26465#35760#24405
              #19979#19968#26465#35760#24405
              #26368#21518#19968#26465#35760#24405
              #26032#24314#35760#24405
              #21024#38500#35760#24405
              #32534#36753#35760#24405
              #20445#23384#20462#25913
              #21462#28040#20462#25913
              #21047#26032#25968#25454)
            TabOrder = 2
          end
          object DBGridEh5: TDBGridEh
            Left = 8
            Top = 277
            Width = 774
            Height = 289
            DataSource = DMasset.DSEmployee
            Flat = True
            FooterColor = clSilver
            FooterFont.Charset = DEFAULT_CHARSET
            FooterFont.Color = clWindowText
            FooterFont.Height = -11
            FooterFont.Name = 'MS Sans Serif'
            FooterFont.Style = []
            FooterRowCount = 1
            ReadOnly = True
            SumList.Active = True
            TabOrder = 3
            TitleFont.Charset = DEFAULT_CHARSET
            TitleFont.Color = clWindowText
            TitleFont.Height = -11
            TitleFont.Name = 'MS Sans Serif'
            TitleFont.Style = []
            OnDrawColumnCell = DBGridEh1DrawColumnCell
            OnTitleClick = DBGridEh1TitleClick
            Columns = <
              item
                EditButtons = <>
                FieldName = 'EmployeeID'
                Footer.Value = #24635#35760#24405
                Footer.ValueType = fvtStaticText
                Footers = <>
                Title.Caption = #21592#24037#26631#35782
              end
              item
                EditButtons = <>
                FieldName = 'FirstName'
                Footers = <>
                Title.Caption = #21517#23383
                Width = 77
              end
              item
                EditButtons = <>
                FieldName = 'LastName'
                Footers = <>
                Title.Caption = #33521#25991#21517
                Width = 55
              end
              item
                EditButtons = <>
                FieldName = 'Company'
                Footers = <>
                Title.Caption = #20844#21496
                Width = 66
              end
              item
                EditButtons = <>
                FieldName = 'DepartmentName'
                Footers = <>
                Title.Caption = #37096#38376
                Width = 58
              end
              item
                EditButtons = <>
                FieldName = 'Title'
                Footers = <>
                Title.Caption = #32844#21153
                Width = 67
              end
              item
                EditButtons = <>
                FieldName = 'empStatus'
                Footers = <>
                Title.Caption = #29366#24577
              end
              item
                EditButtons = <>
                FieldName = 'EmployeeNumber'
                Footer.ValueType = fvtCount
                Footers = <>
                Title.Caption = #21592#24037#32534#21495
              end
              item
                EditButtons = <>
                FieldName = 'EmailName'
                Footers = <>
                Title.Caption = 'Email'
                Width = 78
              end
              item
                EditButtons = <>
                FieldName = 'Extension'
                Footers = <>
                Title.Caption = #20998#26426
                Width = 52
              end
              item
                EditButtons = <>
                FieldName = 'mobile'
                Footers = <>
                Title.Caption = #31227#21160#30005#35805
                Width = 83
              end
              item
                EditButtons = <>
                FieldName = 'WorkPhone'
                Footers = <>
                Title.Caption = #24037#20316#30005#35805
              end
              item
                EditButtons = <>
                FieldName = 'IM'
                Footers = <>
              end
              item
                EditButtons = <>
                FieldName = 'Notes'
                Footers = <>
              end
              item
                EditButtons = <>
                FieldName = 'OfficeLocation'
                Footers = <>
                Title.Caption = #21150#20844#22320#22336
              end>
          end
        end
      end
      object TabSheet4: TTabSheet
        Caption = #37096#38376
        ImageIndex = 3
        object Panel4: TPanel
          Left = 0
          Top = 0
          Width = 824
          Height = 572
          Align = alClient
          BevelInner = bvLowered
          Caption = 'Panel4'
          TabOrder = 0
          object DBNavigator3: TDBNavigator
            Left = 5
            Top = 106
            Width = 774
            Height = 25
            DataSource = DMasset.DSDepartment
            VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbEdit, nbPost, nbCancel, nbRefresh]
            Flat = True
            Hints.Strings = (
              #31532#19968#26465#35760#24405
              #19978#19968#26465#35760#24405
              #19979#19968#26465#35760#24405
              #26368#21518#19968#26465#35760#24405
              #26032#24314#35760#24405
              #21024#38500#35760#24405
              #32534#36753#35760#24405
              #20445#23384#20462#25913
              #21462#28040#20462#25913
              #21047#26032#25968#25454)
            TabOrder = 0
          end
          object DBGridEh3: TDBGridEh
            Left = 2
            Top = 136
            Width = 785
            Height = 429
            DataSource = DMasset.DSDepartment
            Flat = True
            FooterColor = clSilver
            FooterFont.Charset = DEFAULT_CHARSET
            FooterFont.Color = clWindowText
            FooterFont.Height = -11
            FooterFont.Name = 'MS Sans Serif'
            FooterFont.Style = []
            FooterRowCount = 1
            SumList.Active = True
            TabOrder = 1
            TitleFont.Charset = DEFAULT_CHARSET
            TitleFont.Color = clWindowText
            TitleFont.Height = -11
            TitleFont.Name = 'MS Sans Serif'
            TitleFont.Style = []
            OnDrawColumnCell = DBGridEh1DrawColumnCell
            OnTitleClick = DBGridEh1TitleClick
            Columns = <
              item
                EditButtons = <>
                FieldName = 'DepartmentID'
                Footer.Value = #24635#35760#24405
                Footer.ValueType = fvtStaticText
                Footers = <>
                Title.Caption = #37096#38376#26631#35782
              end
              item
                EditButtons = <>
                FieldName = 'DepartmentName'
                Footer.ValueType = fvtCount
                Footers = <>
                Title.Caption = #37096#38376#21517#31216
                Width = 284
              end
              item
                EditButtons = <>
                FieldName = 'Company'
                Footers = <>
                Title.Caption = #20844#21496
              end>
          end
          object GroupBox11: TGroupBox
            Left = 2
            Top = 2
            Width = 820
            Height = 105
            Align = alTop
            Caption = #32534#36753#21306
            TabOrder = 2
            object Label42: TLabel
              Left = 48
              Top = 48
              Width = 41
              Height = 13
              AutoSize = False
              Caption = #37096#38376
            end
            object Label43: TLabel
              Left = 272
              Top = 48
              Width = 33
              Height = 13
              AutoSize = False
              Caption = #20844#21496
            end
            object DBEdit34: TDBEdit
              Left = 88
              Top = 48
              Width = 121
              Height = 21
              DataField = 'DepartmentName'
              DataSource = DMasset.DSDepartment
              TabOrder = 0
            end
            object DBLookupComboBox3: TDBLookupComboBox
              Left = 312
              Top = 48
              Width = 145
              Height = 21
              DataField = 'CompanyID'
              DataSource = DMasset.DSDepartment
              KeyField = 'CompanyID'
              ListField = 'Company'
              ListSource = DMasset.DSCompany
              TabOrder = 1
            end
          end
        end
      end
      object TabSheet5: TTabSheet
        Caption = #20379#24212#21830
        ImageIndex = 4
        object Panel7: TPanel
          Left = 0
          Top = 0
          Width = 824
          Height = 572
          Align = alClient
          BevelInner = bvLowered
          Caption = 'Panel7'
          TabOrder = 0
          object GroupBox3: TGroupBox
            Left = 2
            Top = 2
            Width = 820
            Height = 71
            Align = alTop
            Caption = #26597#35810#21306
            TabOrder = 0
            object Label13: TLabel
              Left = 39
              Top = 32
              Width = 49
              Height = 13
              AutoSize = False
              Caption = #20379#24212#21830
            end
            object Edit2: TEdit
              Left = 92
              Top = 31
              Width = 148
              Height = 21
              TabOrder = 0
            end
            object BitBtn2: TBitBtn
              Left = 472
              Top = 33
              Width = 75
              Height = 25
              Caption = #26597#35810
              Default = True
              TabOrder = 1
              OnClick = BitBtn2Click
              Glyph.Data = {
                36030000424D3603000000000000360000002800000010000000100000000100
                1800000000000003000000000000000000000000000000000000C8D0D4614F4F
                5E5E5E8B8B8BC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0
                D4C8D0D4C8D0D4C8D0D4614F4F787599A883875E5E5E8B8B8BC8D0D4C8D0D4C8
                D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D465B8F4408CDB
                7F7AA5A883875E5E5E8B8B8BC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0
                D4C8D0D4C8D0D4C8D0D48294FF51B7FF408CDB7F7AA5A883875E5E5E8B8B8BC8
                D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D48294FF
                51B7FF408CDB7F7AA5B087875E5E5E8B8B8BC8D0D4C8D0D4C8D0D4C8D0D4C8D0
                D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D48294FF55BBFF407DD27F7AA5A883876C
                666E6C666E6C666E6C666E6C666E8B8B8BC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
                C8D0D48294FF51B7FF408CDB8B8B8B7B7B7BC49885D0AC93E3C9B1D5B4A47473
                736C666EC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D48294FF8294FFB08787F5
                D2A9FFF4C7FFFCD0FFFFDBFFFFDCFDF6E2A883876C666EC8D0D4C8D0D4C8D0D4
                C8D0D4C8D0D4C8D0D4D0AC93EBCDA8FFF2BFFFF6C3FFFFD9FFFFE9FFFFF8FFFF
                FFF4EECD7561618B8B8BC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4D5B4A4FFF1C4FF
                E4B1FFF9C6FFFFDBFFFFEDFFFFFAFFFFF7FFFFDBC39B8A6C666EC8D0D4C8D0D4
                C8D0D4C8D0D4C8D0D4D0AC93FFF6CDFFDDAAFFF5C2FFFFD6FFFFE5FFFFEDFFFF
                E6FFFFD9D0AC936C666EC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4D5B4A4FFF4C7FF
                E5B8FFEFBCFFFFCCFFFFD6FFFFDBFFFFD9FFFCD0D0AC936C666EC8D0D4C8D0D4
                C8D0D4C8D0D4C8D0D4D5B4A4FFF6CDFFF1D6FFE3B7FFF1BEFFF5C2FFF9C6FFF6
                C3FFF8C5B68D808B8B8BC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4DAB39BECE0C3FF
                FFFFFFFAE8FFECBFFFDFACFFE3B0FFF0BDF5D2A99E7373C8D0D4C8D0D4C8D0D4
                C8D0D4C8D0D4C8D0D4C8D0D4D5B4A4F4EECDFFFAE8FFF6CDFFEEBBFFF4C7F8D1
                A5BB928AC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4D5
                B4A4D5B4A4CAA58EE1BBA3DAB39B8B8B8BC8D0D4C8D0D4C8D0D4}
            end
            object BitBtn6: TBitBtn
              Left = 568
              Top = 32
              Width = 81
              Height = 25
              Caption = #23548#20986'Excel'
              TabOrder = 2
              OnClick = BitBtn6Click
              Glyph.Data = {
                AA030000424DAA03000000000000360000002800000011000000110000000100
                1800000000007403000000000000000000000000000000000000848484FF0000
                FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00
                00FF0000FF0000FF0000FF000000848484FF0000FF0000FF0000FF0000FF0000
                FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00
                0000848484FF0000FF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
                FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FF000000848484FF0000FF0000FF
                FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FF0000FF0000
                FF0000FF0000FF000000848484FF0000FF0000FFFFFFFF0000FF0000FF0000FF
                0000FFFFFFFFFFFFFF0000FF0000FF0000FF0000FF0000FF0000FF0000008484