⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 untstudent.dfm

📁 简要说明:对医院幼儿心理情况做的一个调查,统计系统.
💻 DFM
📖 第 1 页 / 共 5 页
字号:
          FieldName = 'BirthYear'
          Footers = <>
          Title.Color = 15525344
          Width = 55
        end
        item
          AssignedValues = [cvWidth, cvTitleColor]
          EditButtons = <>
          FieldName = 'BirthMonth'
          Footers = <>
          Title.Color = 15525344
          Width = 48
        end
        item
          AssignedValues = [cvTitleColor, cvTitleCaption]
          EditButtons = <>
          FieldName = 'faeduname'
          Footers = <>
          Title.Caption = #29238#20146#23398#21382
          Title.Color = 15525344
        end
        item
          AssignedValues = [cvTitleColor, cvTitleCaption]
          EditButtons = <>
          FieldName = 'faworkname'
          Footers = <>
          Title.Caption = #29238#20146#32844#19994
          Title.Color = 15525344
        end
        item
          AssignedValues = [cvTitleColor, cvTitleCaption]
          EditButtons = <>
          FieldName = 'moeduname'
          Footers = <>
          Title.Caption = #27597#20146#23398#21382
          Title.Color = 15525344
        end
        item
          AssignedValues = [cvTitleColor, cvTitleCaption]
          EditButtons = <>
          FieldName = 'moworkname'
          Footers = <>
          Title.Caption = #27597#20146#32844#19994
          Title.Color = 15525344
        end
        item
          AssignedValues = [cvAlignment, cvTitleColor, cvTitleCaption]
          Alignment = taLeftJustify
          EditButtons = <>
          FieldName = 'ifloor'
          Footers = <>
          Title.Caption = #23621#20303#27004#23618
          Title.Color = 15525344
        end>
    end
  end
  inherited pnlPalBottom: TPanel
    Top = 470
    Width = 781
    inherited imgImgBR: TImage
      Left = 759
    end
    inherited imgImgBC: TImage
      Width = 737
    end
  end
  inherited pnlPalTop: TPanel
    Width = 781
    inherited imgImgTC: TImage
      Width = 769
    end
    inherited imgImgTR: TImage
      Left = 775
    end
  end
  inherited dsSingle: TDataSource
    Left = 360
    Top = 176
  end
  inherited adsSingle: TADODataSet
    CursorType = ctStatic
    CommandText = 'select * from tChildren'
    object adsSingleiAutoID: TAutoIncField
      FieldName = 'iAutoID'
      ReadOnly = True
      Visible = False
    end
    object adsSingleCode: TStringField
      DisplayLabel = #32534#21495
      FieldName = 'Code'
    end
    object adsSingleName: TStringField
      DisplayLabel = #22995#21517
      FieldName = 'Name'
      Size = 10
    end
    object adsSingleSex: TIntegerField
      DisplayLabel = #24615#21035
      FieldName = 'Sex'
      OnGetText = adsSingleSexGetText
      OnSetText = adsSingleSexSetText
    end
    object adsSingleBirth: TDateTimeField
      DisplayLabel = #29983#26085
      FieldName = 'Birth'
      OnChange = adsSingleBirthChange
    end
    object adsSingleBirthYear: TStringField
      DisplayLabel = #23681
      FieldName = 'BirthYear'
      Size = 5
    end
    object adsSingleBirthMonth: TStringField
      DisplayLabel = #26376
      FieldName = 'BirthMonth'
      Size = 5
    end
    object adsSingleClassID: TIntegerField
      FieldName = 'ClassID'
      Visible = False
    end
    object adsSingleClassName: TStringField
      FieldKind = fkLookup
      FieldName = 'ClassName'
      LookupDataSet = adsLookUpClass
      LookupKeyFields = 'iAutoID'
      LookupResultField = 'Name'
      KeyFields = 'ClassID'
      LookupCache = True
      Visible = False
      Size = 30
      Lookup = True
    end
    object adsSingleSchoolName: TStringField
      FieldKind = fkLookup
      FieldName = 'SchoolName'
      LookupDataSet = adsLookUpClass
      LookupKeyFields = 'iAutoID'
      LookupResultField = 'SchoolName'
      KeyFields = 'ClassID'
      LookupCache = True
      Visible = False
      Size = 30
      Lookup = True
    end
    object adsSingleClassYear: TStringField
      FieldKind = fkLookup
      FieldName = 'ClassYear'
      LookupDataSet = adsLookUpClass
      LookupKeyFields = 'iAutoID'
      LookupResultField = 'ClassYear'
      KeyFields = 'ClassID'
      LookupCache = True
      Visible = False
      Size = 10
      Lookup = True
    end
    object adsSingleSuggest: TStringField
      DisplayLabel = #24314#35758
      DisplayWidth = 8000
      FieldName = 'Suggest'
      Size = 8000
    end
    object dtmfldSingleCreateDate: TDateTimeField
      FieldName = 'CreateDate'
    end
    object smlntfldSingleifloor: TSmallintField
      FieldName = 'ifloor'
    end
    object smlntfldSinglefatherWork: TSmallintField
      FieldName = 'fatherWork'
    end
    object smlntfldSinglefatherEdu: TSmallintField
      FieldName = 'fatherEdu'
    end
    object smlntfldSingleMotherwork: TSmallintField
      FieldName = 'Motherwork'
    end
    object smlntfldSingleMotherEdu: TSmallintField
      FieldName = 'MotherEdu'
    end
    object adsSinglefaeduname: TStringField
      FieldKind = fkLookup
      FieldName = 'faeduname'
      LookupDataSet = adsedu
      LookupKeyFields = 'iAutoID'
      LookupResultField = 'Name'
      KeyFields = 'fatherEdu'
      Size = 10
      Lookup = True
    end
    object adsSinglemoeduname: TStringField
      FieldKind = fkLookup
      FieldName = 'moeduname'
      LookupDataSet = adsedu
      LookupKeyFields = 'iAutoID'
      LookupResultField = 'Name'
      KeyFields = 'MotherEdu'
      Size = 10
      Lookup = True
    end
    object adsSinglefaworkname: TStringField
      FieldKind = fkLookup
      FieldName = 'faworkname'
      LookupDataSet = adswork
      LookupKeyFields = 'iAutoID'
      LookupResultField = 'Name'
      KeyFields = 'fatherWork'
      Size = 10
      Lookup = True
    end
    object adsSinglemoworkname: TStringField
      FieldKind = fkLookup
      FieldName = 'moworkname'
      LookupDataSet = adswork
      LookupKeyFields = 'iAutoID'
      LookupResultField = 'Name'
      KeyFields = 'Motherwork'
      Size = 10
      Lookup = True
    end
  end
  inherited pmSingle: TPopupMenu
    Left = 288
    Top = 112
  end
  inherited ImageList1: TImageList
    Left = 264
    Top = 251
    Bitmap = {
      494C010129002C00040018001800FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
      00000000000036000000280000006000000008010000010010000000000000C6
      000000000000000000000000000000000000000000000000386B724E482DA93D
      69318C350F42935293529456D55AF65EF66217673867386B0000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      00000000000000000000000000000000000000000000386BF66269313177517F
      EE726B5EC84107216A2DAD390F4210463046524E724E9352D55AF65E1763386B

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -