ustadetail.dfm

来自「图书馆管理系统设计详细资料」· DFM 代码 · 共 1,185 行 · 第 1/3 页

      end
      object dcbMarried: TDBComboBox
        Left = 264
        Top = 104
        Width = 113
        Height = 21
        Style = csDropDownList
        DataField = 'married'
        DataSource = DM.dsSta
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        ItemHeight = 13
        Items.Strings = (
          #26410#23130
          #24050#23130
          #31163#24322
          #20007#20598
          #20854#23427)
        TabOrder = 18
      end
      object edtDes: TDBEdit
        Left = 58
        Top = 345
        Width = 472
        Height = 21
        DataField = 'des'
        DataSource = DM.dsSta
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 32
      end
      object dcbDep: TDBComboBox
        Left = 58
        Top = 176
        Width = 120
        Height = 21
        Style = csDropDownList
        DataField = 'depid'
        DataSource = DM.dsSta
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        ItemHeight = 13
        TabOrder = 7
      end
      object deInDate: TDBDateTimeEditEh
        Left = 264
        Top = 128
        Width = 113
        Height = 19
        DataField = 'indate'
        DataSource = DM.dsSta
        EditButtons = <>
        Flat = True
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        Kind = dtkDateEh
        TabOrder = 19
        Visible = True
      end
      object deBarstart: TDBDateTimeEditEh
        Left = 264
        Top = 248
        Width = 113
        Height = 19
        DataField = 'barstart'
        DataSource = DM.dsSta
        EditButtons = <>
        Flat = True
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        Kind = dtkDateEh
        TabOrder = 25
        Visible = True
      end
      object deBarend: TDBDateTimeEditEh
        Left = 424
        Top = 248
        Width = 105
        Height = 19
        DataField = 'barend'
        DataSource = DM.dsSta
        EditButtons = <>
        Flat = True
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        Kind = dtkDateEh
        TabOrder = 26
        Visible = True
      end
      object dcbSpecial: TDBComboBox
        Left = 58
        Top = 320
        Width = 121
        Height = 21
        DataField = 'special'
        DataSource = DM.dsSta
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        ItemHeight = 13
        Items.Strings = (
          #20854#20182#31867
          #26426#26800#31867
          #30005#23376#31867
          #35745#31639#26426#31867
          #30005#27668#31867
          #22303#26408#24314#31569#31867
          #25151#22320#20135#31867
          #21270#23398#21270#24037#31867
          #29983#21629#31185#23398#31867
          #25968#29702#31867
          #39135#21697#31867
          #32442#32455#26381#35013#31867
          #20854#20182#36731#24037#31867
          #36130#20250#31867)
        TabOrder = 13
      end
      object edtBarYear: TDBEdit
        Left = 448
        Top = 224
        Width = 49
        Height = 21
        DataField = 'baryear'
        DataSource = DM.dsSta
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 24
      end
      object dcbSex: TDBComboBox
        Left = 58
        Top = 56
        Width = 120
        Height = 22
        Style = csOwnerDrawFixed
        DataField = 'sex'
        DataSource = DM.dsSta
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        ItemHeight = 16
        Items.Strings = (
          #30007
          #22899)
        TabOrder = 2
      end
      object deBirth: TDBDateTimeEditEh
        Left = 58
        Top = 80
        Width = 121
        Height = 19
        DataField = 'birth'
        DataSource = DM.dsSta
        EditButtons = <>
        Flat = True
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        Kind = dtkDateEh
        TabOrder = 3
        Visible = True
      end
      object cboPoli: TDBComboBox
        Left = 264
        Top = 56
        Width = 113
        Height = 21
        Style = csDropDownList
        DataField = 'politics'
        DataSource = DM.dsSta
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        ItemHeight = 13
        Items.Strings = (
          #22242#21592
          #20826#21592
          #32676#20247
          #20854#23427)
        TabOrder = 16
      end
      object dcbFolk: TDBComboBox
        Left = 58
        Top = 272
        Width = 120
        Height = 21
        DataField = 'folk'
        DataSource = DM.dsSta
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        ItemHeight = 13
        TabOrder = 11
      end
      object dcbSort: TDBComboBox
        Left = 58
        Top = 200
        Width = 120
        Height = 21
        Style = csDropDownList
        DataField = 'sorts'
        DataSource = DM.dsSta
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        ItemHeight = 13
        Items.Strings = (
          #23567'  '#23398
          #21021'  '#20013
          #39640'  '#20013
          #32844'  '#39640
          #20013'  '#19987
          #22823'  '#19987
          #26412'  '#31185
          #30805'  '#22763
          #21338'  '#22763)
        TabOrder = 8
      end
      object dcbCap: TDBComboBox
        Left = 58
        Top = 224
        Width = 120
        Height = 21
        Style = csDropDownList
        DataField = 'duty'
        DataSource = DM.dsSta
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        ItemHeight = 13
        Items.Strings = (
          #23567'  '#23398
          #21021'  '#20013
          #39640'  '#20013
          #32844'  '#39640
          #20013'  '#19987
          #22823'  '#19987
          #26412'  '#31185
          #30805'  '#22763
          #21338'  '#22763)
        TabOrder = 9
      end
      object deTel: TDBEdit
        Left = 58
        Top = 103
        Width = 120
        Height = 21
        DataField = 'tel'
        DataSource = DM.dsSta
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 4
      end
      object deMobile: TDBEdit
        Left = 58
        Top = 127
        Width = 120
        Height = 21
        DataField = 'mobile'
        DataSource = DM.dsSta
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 5
      end
      object dcbDutyState: TDBComboBox
        Left = 264
        Top = 152
        Width = 113
        Height = 21
        Style = csDropDownList
        DataField = 'dutystate'
        DataSource = DM.dsSta
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        ItemHeight = 13
        Items.Strings = (
          #22312' '#32844
          #20860' '#32844
          #23454' '#20064
          #31163' '#32844
          #20854' '#23427)
        TabOrder = 20
      end
      object deDutyDate: TDBDateTimeEditEh
        Left = 264
        Top = 176
        Width = 113
        Height = 19
        DataField = 'dutydate'
        DataSource = DM.dsSta
        EditButtons = <>
        Flat = True
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        Kind = dtkDateEh
        TabOrder = 21
        Visible = True
      end
      object deStaDate: TDBDateTimeEditEh
        Left = 264
        Top = 200
        Width = 113
        Height = 19
        DataField = 'stadate'
        DataSource = DM.dsSta
        EditButtons = <>
        Flat = True
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        Kind = dtkDateEh
        TabOrder = 22
        Visible = True
      end
      object deLeftDate: TDBDateTimeEditEh
        Left = 264
        Top = 224
        Width = 113
        Height = 19
        DataField = 'leftdate'
        DataSource = DM.dsSta
        EditButtons = <>
        Flat = True
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        Kind = dtkDateEh
        TabOrder = 23
        Visible = True
      end
      object deMail: TDBEdit
        Left = 58
        Top = 151
        Width = 120
        Height = 21
        DataField = 'email'
        DataSource = DM.dsSta
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 6
      end
      object deSchool: TDBEdit
        Left = 264
        Top = 273
        Width = 113
        Height = 21
        DataField = 'school'
        DataSource = DM.dsSta
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 27
      end
      object deGraDate: TDBEdit
        Left = 448
        Top = 273
        Width = 80
        Height = 21
        DataField = 'gradate'
        DataSource = DM.dsSta
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 28
      end
      object dcbBody: TDBComboBox
        Left = 264
        Top = 296
        Width = 113
        Height = 21
        DataField = 'body'
        DataSource = DM.dsSta
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        ItemHeight = 13
        Items.Strings = (
          #33391#22909
          #19968#33324
          #20854#23427)
        TabOrder = 29
      end
    end
    object tsExper: TTabSheet
      Caption = #24037#20316#32463#21382
      ImageIndex = 1
      object dgExper: TDBGridEh
        Left = 0
        Top = 0
        Width = 435
        Height = 126
        Align = alTop
        DataSource = DM.dsExper
        Flat = True
        FooterColor = clWindow
        FooterFont.Charset = DEFAULT_CHARSET
        FooterFont.Color = clWindowText
        FooterFont.Height = -13
        FooterFont.Name = #23435#20307
        FooterFont.Style = []
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
        OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection, dghRowHighlight]
        ReadOnly = True
        SumList.Active = True
        SumList.VirtualRecords = True
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -13
        TitleFont.Name = #23435#20307
        TitleFont.Style = []
        Columns = <
          item
            EditButtons = <>
            FieldName = 'sdate'
            Footers = <>
            Title.Caption = #24320#22987#26102#38388
            Width = 70
          end
          item
            EditButtons = <>
            FieldName = 'edate'
            Footers = <>
            Title.Caption = #32467#26463#26102#38388
            Width = 70
          end
          item
            EditButtons = <>
            FieldName = 'company'
            Footers = <>
            Title.Caption = #20844'  '#21496