child_lab.dfm

一个桌面数据库应用的源码,适合初学数据库编程的新手.

object frm_YQ_Lab: Tfrm_YQ_Lab
  Left = 283
  Top = 134
  AutoScroll = False
  Caption = #20202#22120#24211#32500#25252
  ClientHeight = 409
  ClientWidth = 445
  Color = clBtnFace
  Constraints.MinHeight = 275
  Constraints.MinWidth = 355
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  FormStyle = fsMDIChild
  Icon.Data = {
    0000010001001010100000000000280100001600000028000000100000002000
    00000100040000000000C0000000000000000000000000000000000000000000
    0000000080000080000000808000800000008000800080800000C0C0C0008080
    80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    000000000000000000000000000000CCC0C00C0CCC0000C000C00C0C00C000C0
    00CCCC0CCCC000C000C00C0C00C000C000CCCC0CCC000000000000000000FFFF
    0000FFFF0000FFFF0000C3C30000C0030000FE7F0000FE7F0000F18F0000C183
    0000FFFF0000C5A30000DDAD0000DC210000DDAD0000DC230000FFFF0000}
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 257
    Height = 33
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 0
    object DBNavigator: TDBNavigator
      Left = 8
      Top = 4
      Width = 200
      Height = 25
      DataSource = DataSource1
      VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbDelete, nbPost, nbCancel]
      Flat = True
      Ctl3D = False
      Hints.Strings = (
        #31532#19968#31508#35760#24405
        #21069#19968#31508#35760#24405
        #19979#19968#31508#35760#24405
        #26411#19968#31508#35760#24405
        #25554#20837#35760#24405
        #21024#38500#35760#24405
        #32534#36753#35760#24405
        #20445#23384#35760#24405
        #21462#28040#32534#36753)
      ParentCtl3D = False
      TabOrder = 0
    end
  end
  object Panel3: TPanel
    Left = 8
    Top = 56
    Width = 401
    Height = 297
    BevelInner = bvLowered
    BevelOuter = bvLowered
    TabOrder = 1
    object PageControl1: TPageControl
      Left = 10
      Top = 10
      Width = 351
      Height = 215
      ActivePage = TabSheet1
      TabIndex = 0
      TabOrder = 0
      OnChange = PageControl1Change
      object TabSheet1: TTabSheet
        Caption = #21333#26465#35760#24405
        ImageIndex = 10
        object Label10: TLabel
          Left = 8
          Top = 136
          Width = 24
          Height = 12
          Caption = #22791#27880
          FocusControl = EditDBEdit10
        end
        object Label9: TLabel
          Left = 168
          Top = 96
          Width = 48
          Height = 12
          Caption = #25152#23646#23454#39564
          FocusControl = EditDBEdit9
        end
        object Label8: TLabel
          Left = 8
          Top = 96
          Width = 24
          Height = 12
          Caption = #20998#31867
          FocusControl = EditDBEdit8
        end
        object Label7: TLabel
          Left = 264
          Top = 56
          Width = 48
          Height = 12
          Caption = #25918#32622#20301#32622
          FocusControl = EditDBEdit7
        end
        object Label6: TLabel
          Left = 96
          Top = 56
          Width = 24
          Height = 12
          Caption = #29366#20917
        end
        object Label5: TLabel
          Left = 8
          Top = 56
          Width = 24
          Height = 12
          Caption = #20215#26684
          FocusControl = EditDBEdit5
        end
        object Label1: TLabel
          Left = 8
          Top = 16
          Width = 48
          Height = 12
          Caption = #20202#22120#32534#21495
          FocusControl = EditDBEdit
        end
        object Label2: TLabel
          Left = 136
          Top = 16
          Width = 48
          Height = 12
          Caption = #20202#22120#21517#31216
          FocusControl = EditDBEdit2
        end
        object Label4: TLabel
          Left = 168
          Top = 56
          Width = 48
          Height = 12
          Caption = #21551#29992#26085#26399
          FocusControl = EditDBEdit4
        end
        object Label3: TLabel
          Left = 264
          Top = 16
          Width = 24
          Height = 12
          Caption = #22411#21495
          FocusControl = EditDBEdit3
        end
        object EditDBEdit10: TDBEdit
          Left = 8
          Top = 152
          Width = 321
          Height = 20
          DataField = #22791#27880
          DataSource = DataSource1
          TabOrder = 0
        end
        object EditDBEdit5: TDBEdit
          Left = 8
          Top = 72
          Width = 73
          Height = 20
          DataField = #20215#26684
          DataSource = DataSource1
          TabOrder = 1
        end
        object EditDBEdit7: TDBEdit
          Left = 264
          Top = 72
          Width = 65
          Height = 20
          DataField = #25918#32622#20301#32622
          DataSource = DataSource1
          TabOrder = 2
        end
        object EditDBEdit8: TDBEdit
          Left = 8
          Top = 112
          Width = 55
          Height = 20
          DataField = #20998#31867
          DataSource = DataSource1
          TabOrder = 3
        end
        object EditDBEdit9: TDBEdit
          Left = 168
          Top = 112
          Width = 57
          Height = 20
          DataField = #25152#23646#23454#39564
          DataSource = DataSource1
          TabOrder = 4
        end
        object EditDBEdit: TDBEdit
          Left = 8
          Top = 32
          Width = 115
          Height = 20
          DataField = #20202#22120#32534#21495
          DataSource = DataSource1
          TabOrder = 5
        end
        object EditDBEdit2: TDBEdit
          Left = 135
          Top = 32
          Width = 115
          Height = 20
          DataField = #20202#22120#21517#31216
          DataSource = DataSource1
          TabOrder = 6
        end
        object EditDBEdit3: TDBEdit
          Left = 264
          Top = 32
          Width = 65
          Height = 20
          DataField = #22411#21495
          DataSource = DataSource1
          TabOrder = 7
        end
        object EditDBEdit4: TDBEdit
          Left = 168
          Top = 72
          Width = 81
          Height = 20
          DataField = #21551#29992#26085#26399
          DataSource = DataSource1
          TabOrder = 8
        end
        object DBEdit2: TDBEdit
          Left = 240
          Top = 112
          Width = 89
          Height = 20
          Color = clBtnFace
          DataField = #21517#31216
          DataSource = DataSource3
          ReadOnly = True
          TabOrder = 9
        end
        object DBComboBox1: TDBComboBox
          Left = 80
          Top = 112
          Width = 73
          Height = 20
          DataField = #29366#20917
          DataSource = DataSource1
          ItemHeight = 12
          Items.Strings = (
            ''
            #22909
            #33391#22909
            #21208#29992
            #25253#24223
            #24453#20462)
          TabOrder = 10
        end
        object DBEdit1: TDBEdit
          Left = 80
          Top = 112
          Width = 73
          Height = 20
          Color = clBtnFace
          DataField = #21517#31216
          DataSource = DataSource2
          ReadOnly = True
          TabOrder = 11
        end
        object DBComboBox2: TDBComboBox
          Left = 96
          Top = 72
          Width = 59
          Height = 20
          DataField = #29366#20917
          DataSource = DataSource1
          ItemHeight = 12
          Items.Strings = (
            ''
            #22909
            #33391#22909
            #21208#29992
            #25253#24223
            #24453#20462)
          TabOrder = 12
        end
      end
      object TabSheet2: TTabSheet
        Caption = #26597#35810#35760#24405
        ImageIndex = 24
        object DBGrid1: TDBGrid
          Left = 16
          Top = 120
          Width = 297
          Height = 118
          DataSource = DataSource1
          TabOrder = 0
          TitleFont.Charset = GB2312_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -12
          TitleFont.Name = #23435#20307
          TitleFont.Style = []
        end
        object Panel2: TPanel
          Left = 0
          Top = 0
          Width = 343
          Height = 97
          Align = alTop
          BevelInner = bvRaised
          BevelOuter = bvLowered
          TabOrder = 1
          object Label22: TLabel
            Left = 8
            Top = 16
            Width = 36
            Height = 12
            Caption = #20202#22120#21517
          end
          object Label21: TLabel
            Left = 120
            Top = 16
            Width = 24