uinsert.dfm

在公司做的一个小的系统源代码

    end
    object Label13: TLabel
      Left = 368
      Top = 40
      Width = 42
      Height = 13
      Caption = #21058#22411'  '#65306
    end
    object Label12: TLabel
      Left = 512
      Top = 120
      Width = 75
      Height = 13
      Caption = #36136#37327#23618#27425'  '#65306'   '
    end
    object Label9: TLabel
      Left = 360
      Top = 120
      Width = 96
      Height = 13
      Caption = #20013#26631#38646#21806#20215#26684'  '#65306'  '
    end
    object Label8: TLabel
      Left = 184
      Top = 120
      Width = 42
      Height = 13
      Caption = #21333#20301'  '#65306
    end
    object Label7: TLabel
      Left = 8
      Top = 120
      Width = 57
      Height = 13
      Caption = #35268#26684' '#65306'      '
    end
    object Label16: TLabel
      Left = 136
      Top = 8
      Width = 87
      Height = 13
      Caption = '                             '
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label15: TLabel
      Left = 8
      Top = 8
      Width = 114
      Height = 13
      Caption = '                                      '
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label17: TLabel
      Left = 104
      Top = 8
      Width = 9
      Height = 13
      Caption = '   '
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object edtscqy: TRichEdit
      Left = 8
      Top = 64
      Width = 169
      Height = 49
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      Lines.Strings = (
        '')
      ParentFont = False
      TabOrder = 0
      OnChange = edtscqyChange
      OnKeyDown = edtscqyKeyDown
      OnKeyPress = edtscqyKeyPress
      OnMouseDown = edtscqyMouseDown
    end
    object edtypmc: TRichEdit
      Left = 184
      Top = 64
      Width = 169
      Height = 49
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      Lines.Strings = (
        '')
      ParentFont = False
      TabOrder = 1
      OnChange = edtypmcChange
      OnKeyDown = edtypmcKeyDown
      OnKeyPress = edtypmcKeyPress
      OnMouseDown = edtypmcMouseDown
    end
    object edtspm: TRichEdit
      Left = 512
      Top = 64
      Width = 145
      Height = 49
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      Lines.Strings = (
        '')
      ParentFont = False
      TabOrder = 3
      OnChange = edtspmChange
      OnKeyDown = edtspmKeyDown
      OnKeyPress = edtspmKeyPress
      OnMouseDown = edtspmMouseDown
    end
    object edtjx: TRichEdit
      Left = 360
      Top = 64
      Width = 145
      Height = 49
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      Lines.Strings = (
        '')
      ParentFont = False
      TabOrder = 2
      OnChange = edtjxChange
      OnKeyDown = edtjxKeyDown
      OnKeyPress = edtjxKeyPress
      OnMouseDown = edtjxMouseDown
    end
    object GroupBox1: TGroupBox
      Left = 664
      Top = -8
      Width = 329
      Height = 193
      TabOrder = 8
      object Label3: TLabel
        Left = 8
        Top = 16
        Width = 75
        Height = 13
        Caption = #21457#25991#21333#20301'  '#65306'   '
      end
      object Label4: TLabel
        Left = 24
        Top = 144
        Width = 72
        Height = 13
        Caption = #20013#26631#26085#26399'   '#65306' '
      end
      object Label14: TLabel
        Left = 23
        Top = 72
        Width = 42
        Height = 13
        Caption = #25991#21495#65306'  '
      end
      object edtfwdw: TEdit
        Left = 8
        Top = 40
        Width = 153
        Height = 20
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 0
      end
      object DateTimePicker1: TDateTimePicker
        Left = 8
        Top = 160
        Width = 153
        Height = 25
        CalAlignment = dtaLeft
        Date = 37823.6024198843
        Time = 37823.6024198843
        DateFormat = dfShort
        DateMode = dmComboBox
        Kind = dtkDate
        ParseInput = False
        TabOrder = 2
        OnChange = DateTimePicker1Change
        OnKeyDown = DateTimePicker1KeyDown
      end
      object edtwh: TRichEdit
        Left = 8
        Top = 88
        Width = 153
        Height = 49
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        Lines.Strings = (
          '')
        ParentFont = False
        TabOrder = 1
        OnChange = edtwhChange
        OnKeyDown = edtwhKeyDown
        OnKeyPress = edtwhKeyPress
        OnMouseDown = edtwhMouseDown
      end
    end
    object edtzlcc: TRichEdit
      Left = 512
      Top = 136
      Width = 145
      Height = 49
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 7
      OnChange = edtzlccChange
      OnKeyDown = edtzlccKeyDown
      OnKeyPress = edtzlccKeyPress
      OnMouseDown = edtzlccMouseDown
    end
    object edtdw: TRichEdit
      Left = 184
      Top = 136
      Width = 169
      Height = 49
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 5
      OnChange = edtdwChange
      OnKeyDown = edtdwKeyDown
      OnKeyPress = edtdwKeyPress
      OnMouseDown = edtdwMouseDown
    end
    object edtgg: TRichEdit
      Left = 8
      Top = 136
      Width = 169
      Height = 49
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 4
      OnChange = edtggChange
      OnKeyDown = edtggKeyDown
      OnKeyPress = edtggKeyPress
      OnMouseDown = edtggMouseDown
    end
    object edtlsjg: TEdit
      Left = 360
      Top = 136
      Width = 145
      Height = 49
      AutoSize = False
      TabOrder = 6
      OnChange = edtlsjgChange
      OnExit = edtlsjgExit
      OnKeyDown = edtlsjgKeyDown
      OnKeyPress = edtlsjgKeyPress
      OnMouseDown = edtlsjgMouseDown
    end
    object TGroupBox
      Left = 0
      Top = -8
      Width = 665
      Height = 41
      TabOrder = 9
      object Label2: TLabel
        Left = 224
        Top = 8
        Width = 250
        Height = 25
        Caption = #25307#26631#37319#36141#33647#21697#20449#24687#24405#20837
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -24
        Font.Name = #21326#25991#26032#39759
        Font.Style = [fsBold]
        ParentFont = False
      end
    end
  end
  object adoqzbcg: TADOQuery
    Connection = dm.ADOConnection1
    Parameters = <>
    SQL.Strings = (
      '')
    Left = 112
    Top = 216
  end
  object DataSource1: TDataSource
    DataSet = adoqzbcg
    OnDataChange = DataSource1DataChange
    Left = 168
    Top = 216
  end
  object ADOQuery1: TADOQuery
    Connection = dm.ADOConnection1
    Parameters = <>
    Left = 416
    Top = 232
  end
  object ADOQuery2: TADOQuery
    Connection = dm.ADOConnection1
    Parameters = <>
    Left = 608
    Top = 152
  end
end