hjzl.dfm

用Delphi编写的户籍管理系统

object FrmHJGL: TFrmHJGL
  Left = 221
  Top = 67
  ActiveControl = DBNavigator1
  BorderStyle = bsSingle
  Caption = #24191#35199#19968#23433#25143#31821#31649#29702#31995#32479
  ClientHeight = 530
  ClientWidth = 777
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {
    0000010001002020100000000000E80200001600000028000000200000004000
    0000010004000000000080020000000000000000000000000000000000000000
    000000008000008000000080800080000000800080008080000080808000C0C0
    C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000088888888888888888888888800000000
    8888800000000000008888880000000088888000000000000088888800000000
    88888880FFFFFF70888888880000000088888880FFFFFF708888888800000000
    88888880FFFF000000088888000000008888870000FFFFFFFFF0888800000000
    8888800000FFFFFFFFF08888000000008888000000FFFFFFF000888800000000
    8888000000FFFFFFFFF08888000000008880000000FFFFFFFFF0888800000000
    88700000007FFFFFFFFF088800000000880000000000FFFF0FF0888800000000
    880000000000FFFF07088888000000008800000000FFFFFF0088888800000000
    880000000FFFFFFFF08888880000000088000000FFFFFFFFF088888800000000
    8800000000000000000088880000000088700000000000000000888800000000
    8880000000000000000088880000000088880000000000000008888800000000
    8888870000000000078888880000000088888888888888888888888800000000
    0000000000000000000000000000000000000000000000000000000000000000
    000000000000000000000000000000000000000000000000000000000000FFFF
    FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FF000000FF000000FF000
    000FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF000
    000FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF000
    000FF000000FF000000FF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
  OldCreateOrder = False
  Position = poDesktopCenter
  PixelsPerInch = 96
  TextHeight = 13
  object PanelGJ: TPanel
    Left = 0
    Top = 0
    Width = 777
    Height = 33
    Align = alTop
    BevelInner = bvRaised
    BevelOuter = bvNone
    TabOrder = 0
    object SpeedButton1: TSpeedButton
      Left = 248
      Top = 7
      Width = 23
      Height = 22
      Glyph.Data = {
        EE000000424DEE000000000000007600000028000000100000000F0000000100
        0400000000007800000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFF0FFFFFF
        FFFFFFFF00FFFFFFFFFFFFF030FFFFFFFFFFFF0330FFFFFFFFFF003330000000
        0FFFF03330FF0FFFFFFFF03300FF0FFFF4FFF03330FF0FFF44FFF03330FF0FF4
        4444F03330FF0F444444F03330FF0FF44444F0330FFF0FFF44FFF030FFFF0FFF
        F4FFF00FFFFF0FFFFFFFF00000000FFFFFFF}
      OnClick = SpeedButton1Click
    end
    object DBNavigator1: TDBNavigator
      Left = 6
      Top = 5
      Width = 230
      Height = 25
      DataSource = DataHJZL.DSHZ
      TabOrder = 0
    end
  end
  object PanelHZ: TPanel
    Left = 0
    Top = 33
    Width = 777
    Height = 352
    Align = alTop
    BevelInner = bvLowered
    BevelOuter = bvSpace
    TabOrder = 1
    object DBGrid1: TDBGrid
      Left = 2
      Top = 2
      Width = 773
      Height = 348
      Align = alClient
      DataSource = DataHJZL.DSHZ
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'BH'
          Width = 35
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'XM'
          Width = 48
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'XB'
          PickList.Strings = (
            #30007
            #22899)
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'MZ'
          Width = 48
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'WH'
          Width = 48
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'CSNY'
          Width = 68
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'SFZ'
          Width = 124
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'GZDW'
          Width = 130
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'DH'
          Width = 130
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'RS'
          Width = 30
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'FCZ'
          Width = 80
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'ZD'
          Width = 80
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'FH'
          Width = 80
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'JTH'
          PickList.Strings = (
            #26159
            #21542)
          Width = 40
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'PY'
          Width = 40
          Visible = True
        end>
    end
  end
  object PanelCY: TPanel
    Left = 0
    Top = 385
    Width = 777
    Height = 145
    Align = alBottom
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 2
    object DBGrid2: TDBGrid
      Left = 2
      Top = 2
      Width = 773
      Height = 141
      Align = alClient
      DataSource = DataHJZL.DSCY
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'XM'
          Title.Alignment = taCenter
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'GX'
          Title.Alignment = taCenter
          Width = 48
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'XB'
          Title.Alignment = taCenter
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'MZ'
          Title.Alignment = taCenter
          Width = 40
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'WH'
          Title.Alignment = taCenter
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'CSNY'
          Title.Alignment = taCenter
          Width = 70
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'SFZ'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'GZDW'
          Width = 130
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'LX'
          Width = 160
          Visible = True
        end>
    end
  end
end