u_zhgl_zhgl_zj.~dfm

这是一个非常使用的DELPHI源码的例子,用的是SQL数据库和DELPHI企业版

        Font.Style = []
        ParentFont = False
      end
      object Label10: TLabel
        Left = 13
        Top = 378
        Width = 167
        Height = 25
        AutoSize = False
        Caption = #27599#26085#28040#36153#32047#35745#38480#39069#65306
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object SpeedButton1: TSpeedButton
        Left = 250
        Top = 102
        Width = 91
        Height = 39
        Caption = ' '#21047#21345
        Flat = True
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clFuchsia
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        Glyph.Data = {
          360D0000424D360D000000000000360400002800000030000000300000000100
          08000000000000090000C40E0000C40E00000001000000010000FFFFFF0087BA
          9B0057B773004AAE670052AE670052B26B005AAE730063AE7B0097CEA90097EF
          CB0088EFB9008CE9C60076E5A70073A67700BAD4C500F7FEFF00F7FFF700FBFA
          FF0094EBB90085BA88009CD5B100EAFFFC00CEFEEA008ADEA800B9F8DB00CAF7
          DA00B5F7CE00D6FDF30088B082008CCF9C00A9F5CA00A9E7B800BDFFE7006ED5
          9600A5F9D60094F1BD0072CAA40085E8A90057DA890059BD83008CF3B5008CAA
          7B0039AC730046D3750052E1840036C35A00AED3B80039D8660020C5550029CB
          630029C7550029D3630035CB730039AA4A004AAE5A0052CFA50031C3840029D3
          520015BD4D0024C44A0098BB9C00E8E3E8003CC96500529C5200ADB6A500F4ED
          EC00F7F3FC00F6F0F700F2EBF4008CDFB50094DFA7009CE3AD00EDE7E100FAF1
          F900F7F2F500E0E4EA0089BCA800CEF1CE00BDEBC600A5E5A900C6EED600F3E2
          D700F5F3F600FAF6FE00F7F2F700F4F1F600B7E8BD00FAF5FA00DDD4CA00FCF5
          FC00DBF6DE00C1D9BC00FFFCFF00EEEDED00FBF7F100FEF5FE00FDF6FD00FEF6
          FE00CBE8C900EFF9EF00E7F5E700C6DFC600E4E8E400FEF5FD00FDF8FE00FCF7
          FB00F3F0F300FEFAFE00DAD8DB00F1EEF500FEF8FE00EDE8ED00EFEAEF00F1EB
          F100FBF9FA00D2CED500C9C4CB00D8D3D800F6F5F600FFFEFF00F9F6F900EBE6
          EB00ECEAF000D3CACE00DAD5DA00CCC7CD00C5BFC500E2DEE200FDF9FD00FDFA
          FD00EBE5EB00ECE6EC00F4F2F400F3F2F200D5D0D500C1BBC100DFDDE200C9C2
          C500BFBBC000C2BDC200C8C5C800F1F1F100E9E4E900D7D6D700BAB6BB00B3AC
          B200B6B0B600BAB4BC00CEC9CE00C0BABE00D3D0D400C6C4C800BCB7BC00D3CD
          D300B9B5BA00FDFDFD00F1EFF100B8B2B900ACA5AC00B1ACB200CAC8CC00CCC7
          CB00C1BCC200C8C6C900B5B0B500C4BFC300BDB9BD00BBB9BB00E7E5E700A39F
          A300AAA6AA00B1AAB100B5ABB500C1B9B700CDCACD00BEB9BD00BCB8BF00CCC8
          CD00D2CFD200CFCACF00C8C3C900E4E1E400A09DA000A49EA400ACA8AB00BCB8
          BB00CFCCD200CBC8CE00C0BDC000C7C2C900B2AEB100BEB9BE00AFACAF00EAE9
          EA00BFBDBF009D989D009B989B00A5A1A400A6A1A600AEA9AE00F5F3F500D6D3
          D600DED9DE00B9B5B500C1BFC300B3B0B300C6C1C700969296009D9B9D009F99
          9F00EDECED00B3AFB400CAC5CA00B3AEB300C3BFC300CECDCE008F8A8F009793
          9800CDC9CE00B3ACA900B4AEAE00AAA5A900A9A5A900B1AFB200D0CAD000AFAB
          B2009F9B9F00A9A3A900D1CFD100A8A09C00BEBCC400B6B3B600D2D0D200C3C2
          C30099959900C0BDC7008E878400BDB6BB00B5B4B900C9C5D000BCB2AC009E9D
          9E009E979E00C3C1C600A29FA6009F938600C7C3CC00CBC6CB00A0979200B7B0
          B500706B6D00F7FEFF00E0E4EA00FDFDFD00F1F1040003000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          00000000000000000000000000000000000000FAF4FA00000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000B87EF9EFC500000000000000000000000000000000000000000000000000
          00000000000000000000000000000000F8F6E1D8CFD8E1F6E500000000000000
          0000000000000000000000000000000000000000000000000000000000000095
          F6D9A9F7CEA3D0CFE6F3F8000000000000000000000000000000000000000000
          00000000000000000000000000DBBBC7EAF3A5CFD8D9B4CEEAF474A2F5000000
          000000000000000000000000000000000000000000000000000000EC87A2C3CD
          E0C6F1AE758CC3B7B387F2ABEFED000000000000000000000000000000000000
          00000000000000000000DCCEE39EE08AD18BD7C4ECB796D6C4BE99EDA9EEEFF0
          000000000000000000000000000000000000000000000000E5D4E6D1A67DE3E7
          75E7C4E876E9EA9D7CC2B6B973CBDDEBBBDC0000000000000000000000000000
          00000000000000AF73E1C0B3D3DE75B3B7A68D9CB2765DBCE2BC88A6E3BDE4A4
          AB978C000000000000000000000000000000000000DC737EDD8BCEC5A66CC0B8
          B576B2A9CFDE7C72D29DC699CA9DDFBAE0A4CBB4000000000000000000000000
          0000000089BAD3D3D4D5AA86D6B6D77700A6D8D9B6D0C3A4B581A8BED37C7592
          A686DADB0000000000000000000000000000AD73CCCDA58AB8CE75C7BE5D006A
          6AC1CEB6CFD0A9D1B77ED2006CD3A2CAB390BD7B000000000000000000000000
          00BB7D9ABCBDBEBF758AC08F0078703D8E6A72C1C2C3C4C5C6B7C794C89BC990
          B4CA73CB000000000000000000000089AEAFB0B1909FB2B3ABB485007779B579
          A88E799C72A890B6B7AAB89E9D7C5C8596B9BA880000000000000000000000A1
          A2A3A0A4A575A6A7A877005C779B843D3D8E79798252727F9DA9AAAB91AC7EA8
          9B8573AD00000000000000000000009596979899949A8F00006B816B6B6B5C9B
          9C7982796F826F78786C9D9E9F9D9D90A0710055000000000000000000000089
          8A7D868B8C8D005C806B6B6B816B815C0072708E8E6F6F837172768F90919293
          946D850000000000000000000000007B7C7D7E7F5C5C68806E6B6B6B816B6B6E
          6E5C5C78718283716F6F845C8586878872000000000000000000000000000073
          747576776E616061616E6E6E6E6E5F592E08786E6E5470797070707A545C7841
          0000000000000000000000000000006C6D6B6B6161616161616161606161425B
          62645B6A616E61436F707144537200000000000000000000000000000000005E
          5C535F60615959595959596059444C626363646566675968696A496B48000000
          000000000000000000000000000000005154115949545454544A43554B01505A
          4D4E5A5A5B0E4A54595C5D000000000000000000000000000000000000000000
          00005152534A49545243554B135050565656564E192E3C574258000000000000
          00000000000000000000000000000000000000004842494A43434B4C4D4E1F1F
          1F4F1F4F1F502E13000000000000000000000000000000000000000000000000
          0000000000004142434427244517464745464647464647273F00000000000000
          0000000000000000000000000000000000000000000000003D24343A303B3E2D
          3E3E3E2D3E3B30302D3F40000000000000000000000000000000000000000000
          00000000000000002409373834393A303B3B3A32302F2F2C0C21053C00000000
          000000000000000000000000000000000000000000000000000000082E2A2F30
          3132313334353605020200000000000000000000000000000000000000000000
          000000000000000000000000002A262B2B2B2B2C2D0D00000000000000000000
          0000000000000000000000000000000000000000000000000000000000270A25
          0C0C252826290000000000000000000000000000000000000000000000000000
          0000000000000000000000000024232525252509261C00000000000000000000
          0000000000000000000000000000000000000000000000000000000000212212
          23121222211C0000000000000000000000000000000000000000000000000000
          000000000000000000000000001D181E1F1E0920211C00000000000000000000
          0000000000000000000000000000000000000000000000000000000000081618
          181A181B0C1C0000000000000000000000000000000000000000000000000000
          0000000000000000000000000014161618191815171300000000000000000000
          0000000000000000000000000000000000000000000000000000000000141516
          1616161517130000000000000000000000000000000000000000000000000000
          000000000000000000000000000E0F000F0F1011121300000000000000000000
          000000000000000000000000000000000000000000000000000000000008090A
          0B0B09090C0D0000000000000000000000000000000000000000000000000000
          0000000000000000000000000001020304050306070000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000}
        ParentFont = False
        OnClick = Action7Execute
      end
      object DB_xm: TDBEdit
        Left = 101
        Top = 73
        Width = 170
        Height = 19
        Ctl3D = False
        DataField = 'Xm'
        DataSource = Data.Mr_people_add
        ParentCtl3D = False
        TabOrder = 0
      end
      object DB_kh: TDBEdit
        Left = 101
        Top = 109
        Width = 146
        Height = 19
        Ctl3D = False
        DataField = 'Kh'
        DataSource = Data.Mr_people_add
        ParentCtl3D = False
        TabOrder = 1
      end
      object DB_ycje: TDBEdit
        Left = 99
        Top = 179
        Width = 170
        Height = 19
        Ctl3D = False
        DataField = 'Ycje'
        DataSource = Data.Mr_people_add
        ParentCtl3D = False
        TabOrder = 2
      end
      object DB_yj: TDBEdit
        Left = 99
        Top = 221
        Width = 170
        Height = 19
        Ctl3D = False
        DataField = 'Yj'
        DataSource = Data.Mr_people_add
        ParentCtl3D = False
        TabOrder = 3
      end
      object DB_xfxe: TDBEdit
        Left = 41
        Top = 409
        Width = 170
        Height = 19
        Ctl3D = False
        DataField = 'MrLjxe'
        DataSource = Data.Mr_people_add
        ParentCtl3D = False
        TabOrder = 4
      end
      object Cmx_bm: TComboBox
        Left = 100
        Top = 144
        Width = 129
        Height = 21
        ItemHeight = 13
        TabOrder = 5
      end
      object Cmx_zw: TComboBox
        Left = 100
        Top = 258
        Width = 127
        Height = 21
        ItemHeight = 13
        TabOrder = 6
      end
      object Cmx_mz: TComboBox
        Left = 100
        Top = 296
        Width = 125
        Height = 21
        ItemHeight = 13
        TabOrder = 7
      end
      object Cmx_jg: TComboBox
        Left = 100
        Top = 341
        Width = 121
        Height = 21
        ItemHeight = 13
        TabOrder = 8
      end
      object DB_Bm: TDBEdit
        Left = 242
        Top = 148
        Width = 71
        Height = 21
        DataField = 'Bm'
        DataSource = Data.Mr_people_add
        TabOrder = 9
        Visible = False
        OnChange = DB_BmChange
      end
      object DB_zw: TDBEdit
        Left = 240
        Top = 260
        Width = 63
        Height = 21
        DataField = 'Zw'
        DataSource = Data.Mr_people_add
        TabOrder = 10
        Visible = False
        OnChange = DB_zwChange
      end
      object DB_Mz: TDBEdit
        Left = 239
        Top = 294
        Width = 65
        Height = 21
        DataField = 'Mz'
        DataSource = Data.Mr_people_add
        TabOrder = 11
        Visible = False
        OnChange = DB_MzChange
      end
      object DB_jg: TDBEdit
        Left = 238
        Top = 327
        Width = 69
        Height = 21
        DataField = 'Jb'
        DataSource = Data.Mr_people_add
        TabOrder = 12
        Visible = False
        OnChange = DB_jgChange
      end
      object DB_bh: TDBEdit
        Left = 101
        Top = 36
        Width = 161
        Height = 19
        Ctl3D = False
        DataField = 'Bh'
        DataSource = Data.Mr_people_add
        ParentCtl3D = False
        ReadOnly = True
        TabOrder = 13
      end
      object Chk: TCheckBox
        Left = 200
        Top = 8
        Width = 137
        Height = 27
        BiDiMode = bdLeftToRight
        Caption = #20351#29992#36830#32493#24405#20837#27169#24335
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentBiDiMode = False
        ParentFont = False
        TabOrder = 14
      end
    end
    object GroupBox2: TGroupBox
      Left = 360
      Top = 11
      Width = 354
      Height = 229
      Caption = #38480#27425#35774#32622
      TabOrder = 1
      object Label11: TLabel
        Left = 16
        Top = 53
        Width = 82
        Height = 25
        AutoSize = False
        Caption = #31532#19968#26102#27573#65306
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label12: TLabel
        Left = 18
        Top = 105
        Width = 85
        Height = 25
        AutoSize = False
        Caption = #31532#20108#26102#27573#65306
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label13: TLabel