mc_insert.~dfm

1、系统环境要求：所有程序均在Windows98/XP操作系统下测试运行。 2、建议用户在系统上安装DELPHI7.0企业版。 3、如果数据库为SQL Server数据库

          Width = 67
          Visible = True
        end>
    end
  end
  object BitBtn1: TBitBtn
    Left = 153
    Top = 289
    Width = 224
    Height = 25
    Caption = #32479#35745#25351#23450#26102#38388#20869#30340'['#24120#29992#36153#29992']'#20449#24687
    Font.Charset = GB2312_CHARSET
    Font.Color = clRed
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 6
    OnClick = BitBtn1Click
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333333333330000333333333333333333333333F33333333333
      00003333344333333333333333388F3333333333000033334224333333333333
      338338F3333333330000333422224333333333333833338F3333333300003342
      222224333333333383333338F3333333000034222A22224333333338F338F333
      8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
      33333338F83338F338F33333000033A33333A222433333338333338F338F3333
      0000333333333A222433333333333338F338F33300003333333333A222433333
      333333338F338F33000033333333333A222433333333333338F338F300003333
      33333333A222433333333333338F338F00003333333333333A22433333333333
      3338F38F000033333333333333A223333333333333338F830000333333333333
      333A333333333333333338330000333333333333333333333333333333333333
      0000}
    NumGlyphs = 2
  end
  object BitBtn4: TBitBtn
    Left = 603
    Top = 289
    Width = 184
    Height = 25
    Caption = #36864#20986#25910#36153#21333#22635#20889'[&Q]'
    TabOrder = 7
    OnClick = BitBtn4Click
    Glyph.Data = {
      42020000424D4202000000000000420000002800000010000000100000000100
      1000030000000002000000000000000000000000000000000000007C0000E003
      00001F0000001F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
      1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C000000000000EF3DEF3DEF3D
      00001F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C000000000000EF3DEF3DEF3D
      00001F7C1F7C00001F7CFF7F000000000000FF7F000000000000EF3DEF3DEF3D
      00001F7C1F7C1F7C1F7CFF7FFF7FFF7F00000000000000000000EF3DEF3DEF3D
      00001F7C1F7C1F7C1F7C1F7C00000000000000001F7C00000000EF3DF75EEF3D
      00001F7C1F7C000000001F7C000000001F7C000000001F7C1F7CEF3DEF3DEF3D
      00001F7C1F7C1F7C1F7C1F7C1F7C000000000000000000000000EF3DEF3DEF3D
      00001F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C000000001F7C0000EF3DEF3DEF3D
      00001F7C1F7C1F7C1F7C1F7C1F7C1F7CFF7F0000000000000000EF3DEF3DEF3D
      00001F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7CFF7F0000000000000000EF3DEF3D
      00001F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7CFF7F00000000000000000000
      00001F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7CFF7FFF7FFF7FFF7FFF7FFF7F
      FF7F1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C0F000F000F000F001F7C
      1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C0F001F7C1F7C0F001F7C
      1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C0F000F000F000F000F00
      0F001F7C1F7C}
  end
  object BitBtn2: TBitBtn
    Left = 378
    Top = 289
    Width = 224
    Height = 25
    Caption = #32479#35745#25351#23450#26102#38388#20869#30340'['#20854#23427#36153#29992']'#20449#24687
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlue
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 8
    OnClick = BitBtn2Click
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333333333330000333333333333333333333333F33333333333
      00003333344333333333333333388F3333333333000033334224333333333333
      338338F3333333330000333422224333333333333833338F3333333300003342
      222224333333333383333338F3333333000034222A22224333333338F338F333
      8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
      33333338F83338F338F33333000033A33333A222433333338333338F338F3333
      0000333333333A222433333333333338F338F33300003333333333A222433333
      333333338F338F33000033333333333A222433333333333338F338F300003333
      33333333A222433333333333338F338F00003333333333333A22433333333333
      3338F38F000033333333333333A223333333333333338F830000333333333333
      333A333333333333333338330000333333333333333333333333333333333333
      0000}
    NumGlyphs = 2
  end
  object GroupBox7: TGroupBox
    Left = 152
    Top = 317
    Width = 635
    Height = 140
    Caption = #21382#21490#24120#29992#36153#29992#65306
    TabOrder = 9
    Visible = False
    object Label31: TLabel
      Left = 9
      Top = 119
      Width = 72
      Height = 12
      Caption = #35745#36153#36215#22987#26085#26399
    end
    object Label32: TLabel
      Left = 217
      Top = 119
      Width = 72
      Height = 12
      Caption = #35745#36153#32456#27490#26085#26399
    end
    object DBGrid5: TDBGrid
      Left = 8
      Top = 16
      Width = 618
      Height = 89
      DataSource = DataSource9
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
    end
    object DateTimePicker7: TDateTimePicker
      Left = 90
      Top = 115
      Width = 117
      Height = 20
      CalAlignment = dtaLeft
      Date = 37199
      Time = 37199
      DateFormat = dfLong
      DateMode = dmComboBox
      Kind = dtkDate
      ParseInput = False
      TabOrder = 1
    end
    object DateTimePicker8: TDateTimePicker
      Left = 295
      Top = 115
      Width = 117
      Height = 20
      CalAlignment = dtaLeft
      Date = 37199
      Time = 37199
      DateFormat = dfLong
      DateMode = dmComboBox
      Kind = dtkDate
      ParseInput = False
      TabOrder = 2
    end
    object BitBtn10: TBitBtn
      Left = 416
      Top = 112
      Width = 211
      Height = 25
      Caption = #26816#32034#25968#25454#20449#24687
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 3
      OnClick = BitBtn10Click
      Glyph.Data = {
        DE010000424DDE01000000000000760000002800000024000000120000000100
        0400000000006801000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333444444
        33333333333F8888883F33330000324334222222443333388F3833333388F333
        000032244222222222433338F8833FFFFF338F3300003222222AAAAA22243338
        F333F88888F338F30000322222A33333A2224338F33F8333338F338F00003222
        223333333A224338F33833333338F38F00003222222333333A444338FFFF8F33
        3338888300003AAAAAAA33333333333888888833333333330000333333333333
        333333333333333333FFFFFF000033333333333344444433FFFF333333888888
        00003A444333333A22222438888F333338F3333800003A2243333333A2222438
        F38F333333833338000033A224333334422224338338FFFFF8833338000033A2
        22444442222224338F3388888333FF380000333A2222222222AA243338FF3333
        33FF88F800003333AA222222AA33A3333388FFFFFF8833830000333333AAAAAA
        3333333333338888883333330000333333333333333333333333333333333333
        0000}
      NumGlyphs = 2
    end
  end
  object GroupBox8: TGroupBox
    Left = 152
    Top = 139
    Width = 635
    Height = 142
    Caption = #20854#23427#21382#21490#36153#29992#65306
    TabOrder = 10
    Visible = False
    object Label33: TLabel
      Left = 9
      Top = 116
      Width = 72
      Height = 12
      Caption = #35745#36153#36215#22987#26085#26399
    end
    object Label34: TLabel
      Left = 217
      Top = 116
      Width = 72
      Height = 12
      Caption = #35745#36153#32456#27490#26085#26399
    end
    object DBGrid6: TDBGrid
      Left = 8
      Top = 16
      Width = 619
      Height = 89
      DataSource = DataSource10
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
    end
    object DateTimePicker9: TDateTimePicker
      Left = 90
      Top = 112
      Width = 117
      Height = 20
      CalAlignment = dtaLeft
      Date = 37199
      Time = 37199
      DateFormat = dfLong
      DateMode = dmComboBox
      Kind = dtkDate
      ParseInput = False
      TabOrder = 1
    end
    object DateTimePicker10: TDateTimePicker
      Left = 295
      Top = 112
      Width = 117
      Height = 20
      CalAlignment = dtaLeft
      Date = 37199
      Time = 37199
      DateFormat = dfLong
      DateMode = dmComboBox
      Kind = dtkDate
      ParseInput = False
      TabOrder = 2
    end
    object BitBtn11: TBitBtn
      Left = 416
      Top = 109
      Width = 211
      Height = 25
      Caption = #26816#32034#25968#25454#20449#24687
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 3
      OnClick = BitBtn11Click
      Glyph.Data = {
        DE010000424DDE01000000000000760000002800000024000000120000000100
        0400000000006801000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333444444
        33333333333F8888883F33330000324334222222443333388F3833333388F333
        000032244222222222433338F8833FFFFF338F3300003222222AAAAA22243338
        F333F88888F338F30000322222A33333A2224338F33F8333338F338F00003222
        223333333A224338F33833333338F38F00003222222333333A444338FFFF8F33
        3338888300003AAAAAAA33333333333888888833333333330000333333333333
        333333333333333333FFFFFF000033333333333344444433FFFF333333888888
        00003A444333333A22222438888F333338F3333800003A2243333333A2222438
        F38F333333833338000033A224333334422224338338FFFFF8833338000033A2
        22444442222224338F3388888333FF380000333A2222222222AA243338FF3333
        33FF88F800003333AA222222AA33A3333388FFFFFF8833830000333333AAAAAA
        3333333333338888883333330000333333333333333333333333333333333333
        0000}
      NumGlyphs = 2
    end
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 60
    Top = 11
  end
  object Query1: TQuery
    Active = True
    DatabaseName = 'WYGL'
    SQL.Strings = (
      'Select '#23567#21306#32534#21495','#23567#21306#21517' From '#23567#21306#20449#24687#34920)
    Left = 92
    Top = 11
    object Query1BDEDesigner: TStringField
      FieldName = #23567#21306#32534#21495
      Origin = 'WYGL.'#23567#21306#20449#24687#34920'.'#23567#21306#32534#21495
      FixedChar = True
      Size = 10
    end
    object Query1BDEDesigner2: TStringField
      FieldName = #23567#21306#21517
      Origin = 'WYGL.'#23567#21306#20449#24687#34920'.'#23567#21306#21517
      FixedChar = True
      Size = 10
    end
  end
  object DataSource2: TDataSource
    DataSet = Table1
    Left = 36
    Top = 120
  end
  object Table1: TTable
    Active = True
    DatabaseName = 'WYGL'
    IndexFieldNames = #25152#23646#21306#22495
    MasterFields = #23567#21306#21517
    MasterSource = DataSource1
    TableName = 'dbo.'#22823#27004#20449#24687#34920
    Left = 68
    Top = 120
    object Table1BDEDesigner: TStringField
      FieldName = #22823#27004#32534#21495
      Required = True
      FixedChar = True
      Size = 10
    end
    object Table1BDEDesigner2: TStringField
      FieldName = #22823#27004#21517#31216
      FixedChar = True
    end
    object Table1BDEDesigner7: TStringField
      FieldName = #25152#23646#21306#22495
      FixedChar = True
    end
  end
  object Table2: TTable
    Active = True
    AfterScroll = Table2AfterScroll
    DatabaseName = 'WYGL'
    IndexFieldNames = #22823#27004#32534#21495
    MasterFields = #22823#27004#32534#21495
    MasterSource = DataSource2
    TableName = 'dbo.'#25151#23627#20449#24687#34920
    Left = 76
    Top = 335
    object Table2BDEDesigner: TStringField
      FieldName = #25151#38388#32534#21495
      Required = True
      FixedChar = True
    end
    object Table2BDEDesigner2: TStringField
      FieldName = #21306#21517
      FixedChar = True
    end
    object Table2BDEDesigner3: TStringField
      FieldName = #22823#27004#21517
      FixedChar = True
    end
    object Table2BDEDesigner4: TStringField
      FieldName = #25151#38388#21495#30721
      FixedChar = True
      Size = 10
    end
    object Table2BDEDesigner6: TStringField
      FieldName = #25151#20027#22995#21517
      FixedChar = True
      Size = 10
    end
    object Table2BDEDesigner18: TStringField
      FieldName = #26159#21542#31354#38386
      FixedChar = True
      Size = 10
    end
    object Table2BDEDesigner5: TStringField
      FieldName = #21333#20803
      FixedChar = True
      Size = 10
    end
    object Table2BDEDesigner7: TStringField
      FieldName = #22823#27004#32534#21495
      FixedChar = True
    end
  end
  object DataSource3: TDataSource
    DataSet = Table2