f_rdb.dfm

用Delphi 开发的一个 户籍管理系统

    end
    object GridTableViewStyleSheetWindowsStandard: TcxGridTableViewStyleSheet
      Caption = 'Windows Standard'
      Styles.Background = cxStyle23
      Styles.Content = cxStyle12
      Styles.ContentEven = cxStyle13
      Styles.ContentOdd = cxStyle14
      Styles.FilterBox = cxStyle24
      Styles.Inactive = cxStyle19
      Styles.IncSearch = cxStyle25
      Styles.Selection = cxStyle22
      Styles.Footer = cxStyle15
      Styles.Group = cxStyle16
      Styles.GroupByBox = cxStyle17
      Styles.Header = cxStyle18
      Styles.Indicator = cxStyle20
      Styles.NewItemRowInfoText = cxStyle26
      Styles.Preview = cxStyle21
      BuiltIn = True
    end
  end
  object dst_Escuage: TADODataSet
    Connection = con_ado
    CursorType = ctStatic
    CommandText = 'select * from Sys_attribute where type='#39'Escuage'#39
    Parameters = <>
    Left = 17
    Top = 300
    object intgrfld__EscuageID: TIntegerField
      FieldName = 'ID'
    end
    object strngfld__EscuageName: TWideStringField
      FieldName = 'Name'
      Size = 50
    end
    object strngfld__EscuageType: TWideStringField
      FieldName = 'Type'
      Size = 50
    end
  end
  object dst_Health: TADODataSet
    Connection = con_ado
    CursorType = ctStatic
    CommandText = 'select * from Sys_attribute where type='#39'Health'#39
    Parameters = <>
    Left = 170
    Top = 90
    object intgrfld__HealthID: TIntegerField
      FieldName = 'ID'
    end
    object wdstrngfld__HealthName: TWideStringField
      FieldName = 'Name'
      Size = 50
    end
    object wdstrngfld__HealthType: TWideStringField
      FieldName = 'Type'
      Size = 50
    end
  end
  object dst_EduDegree: TADODataSet
    Connection = con_ado
    CursorType = ctStatic
    CommandText = 'select * from Sys_attribute where type='#39'EduDegree'#39
    Parameters = <>
    Left = 90
    Top = 305
    object intgrfld__EduDegreeID: TIntegerField
      FieldName = 'ID'
    end
    object strngfld__EduDegreeName: TWideStringField
      FieldName = 'Name'
      Size = 50
    end
    object strngfld__EduDegreeType: TWideStringField
      FieldName = 'Type'
      Size = 50
    end
  end
  object dst_Polity: TADODataSet
    Connection = con_ado
    CursorType = ctStatic
    CommandText = 'select * from Sys_attribute where type='#39'Polity'#39
    Parameters = <>
    Left = 92
    Top = 244
    object intgrfld__PolityID: TIntegerField
      FieldName = 'ID'
    end
    object strngfld__PolityName: TWideStringField
      FieldName = 'Name'
      Size = 50
    end
    object strngfld__PolityType: TWideStringField
      FieldName = 'Type'
      Size = 50
    end
  end
  object dst_sex: TADODataSet
    Connection = con_ado
    CursorType = ctStatic
    CommandText = 'select * from Sys_attribute where type='#39'sex'#39
    Parameters = <>
    Left = 14
    Top = 142
    object intgrfld__sexID: TIntegerField
      FieldName = 'ID'
    end
    object strngfld__sexName: TWideStringField
      FieldName = 'Name'
      Size = 50
    end
    object strngfld__sexType: TWideStringField
      FieldName = 'Type'
      Size = 50
    end
  end
  object dst_Nationlity: TADODataSet
    Connection = con_ado
    CursorType = ctStatic
    CommandText = 'select * from Sys_attribute where type='#39'Nationlity'#39
    Parameters = <>
    Left = 17
    Top = 253
    object intgrfld__NationlityID: TIntegerField
      FieldName = 'ID'
    end
    object strngfld__NationlityName: TWideStringField
      FieldName = 'Name'
      Size = 50
    end
    object strngfld__NationlityType: TWideStringField
      FieldName = 'Type'
      Size = 50
    end
  end
  object dst_people: TADODataSet
    Connection = con_ado
    CursorType = ctStatic
    CommandText = 'select * from info_People'
    Parameters = <>
    Left = 15
    Top = 87
    object strngfld__peopleCode: TWideStringField
      DisplayLabel = #32534#21495
      FieldName = 'Code'
      Size = 10
    end
    object strngfld__peopleName: TWideStringField
      DisplayLabel = #22995#21517
      FieldName = 'Name'
    end
    object strngfld__peopleOldName: TWideStringField
      DisplayLabel = #26366#29992#21517
      FieldName = 'OldName'
    end
    object strngfld__peopleSexName: TStringField
      DisplayLabel = #24615#21035
      DisplayWidth = 6
      FieldKind = fkLookup
      FieldName = 'SexName'
      LookupDataSet = dst_sex
      LookupKeyFields = 'ID'
      LookupResultField = 'Name'
      KeyFields = 'Sex'
      Size = 4
      Lookup = True
    end
    object dtmfld__peopleBirthday: TDateTimeField
      DisplayLabel = #20986#29983#26085#26399
      DisplayWidth = 27
      FieldName = 'Birthday'
    end
    object strngfld__peopleIDCard: TWideStringField
      DisplayLabel = #36523#20221#35777#21495#30721
      FieldName = 'IDCard'
    end
    object strngfld__peopledoorNumber: TWideStringField
      DisplayLabel = #25143#21495
      FieldName = 'doorNumber'
      Size = 16
    end
    object strngfld__peopleHouseMaster: TWideStringField
      DisplayLabel = #25143#20027#22995#21517
      FieldName = 'HouseMaster'
    end
    object strngfld__peoplerelationName: TWideStringField
      DisplayLabel = #19982#25143#20027#20851#31995
      FieldKind = fkLookup
      FieldName = 'relationName'
      LookupDataSet = dst_relation
      LookupKeyFields = 'ID'
      LookupResultField = 'Name'
      KeyFields = 'relation'
      Size = 8
      Lookup = True
    end
    object strngfld__peoplemarriageName: TWideStringField
      DisplayLabel = #23130#23035#29366#20917
      DisplayWidth = 12
      FieldKind = fkLookup
      FieldName = 'marriageName'
      LookupDataSet = dst_Marriage
      LookupKeyFields = 'ID'
      LookupResultField = 'Name'
      KeyFields = 'marriage'
      Size = 4
      Lookup = True
    end
    object strngfld__peopleregTypeName: TWideStringField
      DisplayLabel = #25143#21475#31867#21035
      DisplayWidth = 18
      FieldKind = fkLookup
      FieldName = 'regTypeName'
      LookupDataSet = dst_regType
      LookupKeyFields = 'ID'
      LookupResultField = 'Name'
      KeyFields = 'regType'
      Size = 12
      Lookup = True
    end
    object strngfld__peopleGroupName: TWideStringField
      DisplayLabel = #32452#21495
      FieldName = 'GroupName'
      Size = 16
    end
    object dtmfld__peopleQfDate: TDateTimeField
      DisplayLabel = #31614#21457#26085#26399
      DisplayWidth = 27
      FieldName = 'QfDate'
    end
    object strngfld__peoplerecordStatusName: TWideStringField
      DisplayLabel = #25143#31821#29366#24577
      DisplayWidth = 15
      FieldKind = fkLookup
      FieldName = 'recordStatusName'
      LookupDataSet = dst_RecordStatus
      LookupKeyFields = 'ID'
      LookupResultField = 'Name'
      KeyFields = 'recordStatus'
      Size = 10
      Lookup = True
    end
    object strngfld__peopleEduDegreeName: TWideStringField
      DisplayLabel = #25991#21270#31243#24230
      DisplayWidth = 12
      FieldKind = fkLookup
      FieldName = 'EduDegreeName'
      LookupDataSet = dst_EduDegree
      LookupKeyFields = 'ID'
      LookupResultField = 'Name'
      KeyFields = 'EduDegree'
      Size = 6
      Lookup = True
    end
    object strngfld__peopleBloodTypeName: TStringField
      DisplayLabel = #34880#22411
      DisplayWidth = 9
      FieldKind = fkLookup
      FieldName = 'BloodTypeName'
      LookupDataSet = dst_BloodType
      LookupKeyFields = 'ID'
      LookupResultField = 'Name'
      KeyFields = 'BloodType'
      Size = 6
      Lookup = True
    end
    object strngfld__peopleNationlityName: TStringField
      DisplayLabel = #27665#26063
      DisplayWidth = 15
      FieldKind = fkLookup
      FieldName = 'NationlityName'
      LookupDataSet = dst_Nationlity
      LookupKeyFields = 'ID'
      LookupResultField = 'Name'
      KeyFields = 'Nationlity'
      Size = 10
      Lookup = True
    end
    object strngfld__peopleHealthName: TWideStringField
      DisplayLabel = #20581#24247#29366#20917
      DisplayWidth = 15
      FieldKind = fkLookup
      FieldName = 'HealthName'
      LookupDataSet = dst_Health
      LookupKeyFields = 'ID'
      LookupResultField = 'Name'
      KeyFields = 'Health'
      Size = 10
      Lookup = True
    end
    object strngfld__peopleReligionName: TWideStringField
      DisplayLabel = #23447#25945#20449#20208
      DisplayWidth = 12
      FieldKind = fkLookup
      FieldName = 'ReligionName'
      LookupDataSet = dst_Religion
      LookupKeyFields = 'ID'
      LookupResultField = 'Name'
      KeyFields = 'Religion'
      Size = 8
      Lookup = True
    end
    object strngfld__peopleEscuageName: TWideStringField
      DisplayLabel = #20853#24441#24773#20917
      DisplayWidth = 15
      FieldKind = fkLookup
      FieldName = 'EscuageName'
      LookupDataSet = dst_Escuage
      LookupKeyFields = 'ID'