object Form3: TForm3
  Left = 0
  Top = 0
  BorderStyle = bsSingle
  Caption = #1044#1086#1073#1072#1074#1083#1077#1085#1080#1077' '#1074' '#1095#1080#1090#1072#1090#1077#1083#1100#1089#1082#1080#1077' '#1082#1072#1088#1090#1086#1095#1082#1080
  ClientHeight = 485
  ClientWidth = 365
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnActivate = FormActivate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 8
    Top = 8
    Width = 79
    Height = 15
    Caption = #1053#1086#1084#1077#1088' '#1079#1072#1087#1080#1089#1080
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
  end
  object Label2: TLabel
    Left = 8
    Top = 40
    Width = 140
    Height = 15
    Caption = #8470'  '#1095#1080#1090#1072#1090#1077#1083#1100#1089#1082#1086#1075#1086'  '#1073#1080#1083#1077#1090#1072
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
  end
  object Label3: TLabel
    Left = 8
    Top = 72
    Width = 51
    Height = 15
    Caption = #1060#1072#1084#1080#1083#1080#1103
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
  end
  object Label4: TLabel
    Left = 8
    Top = 104
    Width = 24
    Height = 15
    Caption = #1048#1084#1103
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
  end
  object Label5: TLabel
    Left = 8
    Top = 136
    Width = 51
    Height = 15
    Caption = #1054#1090#1095#1077#1089#1090#1074#1086
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
  end
  object Label6: TLabel
    Left = 8
    Top = 168
    Width = 20
    Height = 15
    Caption = #1062#1077#1093
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
  end
  object Label7: TLabel
    Left = 8
    Top = 200
    Width = 35
    Height = 15
    Caption = #1043#1086#1088#1086#1076
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
  end
  object Label8: TLabel
    Left = 8
    Top = 232
    Width = 35
    Height = 15
    Caption = #1059#1083#1080#1094#1072
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
  end
  object Label9: TLabel
    Left = 8
    Top = 264
    Width = 25
    Height = 15
    Caption = #1044#1086#1084
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
  end
  object Label10: TLabel
    Left = 8
    Top = 296
    Width = 52
    Height = 15
    Caption = #1050#1074#1072#1088#1090#1080#1088#1072
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
  end
  object Label11: TLabel
    Left = 8
    Top = 328
    Width = 97
    Height = 15
    Caption = #1057#1077#1088#1080#1103'    '#1087#1072#1089#1087#1086#1088#1090#1072
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
  end
  object Label12: TLabel
    Left = 8
    Top = 360
    Width = 92
    Height = 15
    Caption = #1053#1086#1084#1077#1088'   '#1087#1072#1089#1087#1086#1088#1090
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
  end
  object Label13: TLabel
    Left = 8
    Top = 392
    Width = 66
    Height = 15
    Caption = #1050#1077#1084'   '#1074#1099#1076#1072#1085
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
  end
  object Label14: TLabel
    Left = 152
    Top = 8
    Width = 3
    Height = 15
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
  end
  object Label15: TLabel
    Left = 160
    Top = 8
    Width = 41
    Height = 15
    Caption = 'Label15'
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
  end
  object Panel1: TPanel
    Left = 0
    Top = 440
    Width = 365
    Height = 45
    Align = alBottom
    TabOrder = 0
    object Button1: TButton
      Left = 232
      Top = 10
      Width = 129
      Height = 25
      Caption = #1054#1090#1084#1077#1085#1072
      Font.Charset = RUSSIAN_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Times New Roman'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 88
      Top = 10
      Width = 129
      Height = 25
      Caption = #1047#1072#1087#1080#1089#1072#1090#1100
      Font.Charset = RUSSIAN_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Times New Roman'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnClick = Button2Click
    end
  end
  object Edit1: TEdit
    Left = 160
    Top = 32
    Width = 73
    Height = 23
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    OnKeyPress = Edit1KeyPress
  end
  object Edit2: TEdit
    Left = 160
    Top = 64
    Width = 145
    Height = 23
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    OnKeyPress = Edit2KeyPress
  end
  object Edit3: TEdit
    Left = 160
    Top = 96
    Width = 121
    Height = 23
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    TabOrder = 3
    OnKeyPress = Edit3KeyPress
  end
  object Edit4: TEdit
    Left = 160
    Top = 128
    Width = 121
    Height = 23
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    TabOrder = 4
    OnKeyPress = Edit4KeyPress
  end
  object Edit5: TEdit
    Left = 160
    Top = 224
    Width = 161
    Height = 23
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    TabOrder = 5
    OnKeyPress = Edit5KeyPress
  end
  object Edit6: TEdit
    Left = 160
    Top = 256
    Width = 49
    Height = 23
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    TabOrder = 6
    OnKeyPress = Edit6KeyPress
  end
  object Edit7: TEdit
    Left = 160
    Top = 288
    Width = 49
    Height = 23
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    TabOrder = 7
    OnKeyPress = Edit7KeyPress
  end
  object Edit8: TEdit
    Left = 160
    Top = 320
    Width = 65
    Height = 23
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    TabOrder = 8
    OnKeyPress = Edit8KeyPress
  end
  object Edit9: TEdit
    Left = 160
    Top = 352
    Width = 65
    Height = 23
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    TabOrder = 9
    OnKeyPress = Edit9KeyPress
  end
  object Edit10: TEdit
    Left = 8
    Top = 648
    Width = 9
    Height = 21
    TabOrder = 10
    OnKeyUp = Edit10KeyUp
  end
  object Button3: TButton
    Left = 336
    Top = 160
    Width = 25
    Height = 23
    Caption = '...'
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    TabOrder = 11
    OnClick = Button3Click
  end
  object DBEdit1: TDBEdit
    Left = 160
    Top = 160
    Width = 169
    Height = 21
    DataField = 'name'
    DataSource = Form21.DataSource1
    TabOrder = 12
  end
  object DBEdit2: TDBEdit
    Left = 160
    Top = 192
    Width = 97
    Height = 21
    DataField = 'gorod'
    DataSource = Form21.DataSource2
    TabOrder = 13
  end
  object DBEdit3: TDBEdit
    Left = 160
    Top = 384
    Width = 161
    Height = 23
    DataField = 'vidan'
    DataSource = Form21.DataSource3
    TabOrder = 14
  end
  object Button6: TButton
    Left = 264
    Top = 192
    Width = 25
    Height = 23
    Caption = '...'
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    TabOrder = 15
    OnClick = Button6Click
  end
  object Button7: TButton
    Left = 328
    Top = 384
    Width = 25
    Height = 23
    Caption = '...'
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    TabOrder = 16
    OnClick = Button7Click
  end
  object ADOQuery1: TADOQuery
    Connection = DM.ADOConnection1
    Parameters = <
      item
        Name = 'q'
        DataType = ftInteger
        Size = -1
        Value = 0
      end
      item
        Name = 'w'
        DataType = ftInteger
        Size = -1
        Value = 0
      end
      item
        Name = 'e'
        DataType = ftString
        Size = -1
        Value = ''
      end
      item
        Name = 'r'
        DataType = ftString
        Size = -1
        Value = ''
      end
      item
        Name = 't'
        DataType = ftString
        Size = -1
        Value = ''
      end
      item
        Name = 'y'
        DataType = ftString
        Size = -1
        Value = ''
      end
      item
        Name = 'u'
        DataType = ftString
        Size = -1
        Value = ''
      end
      item
        Name = 'i'
        DataType = ftString
        Size = -1
        Value = ''
      end
      item
        Name = 'o'
        DataType = ftInteger
        Size = -1
        Value = 0
      end
      item
        Name = 'p'
        DataType = ftInteger
        Size = -1
        Value = 0
      end
      item
        Name = 'a'
        DataType = ftInteger
        Size = -1
        Value = 0
      end
      item
        Name = 's'
        DataType = ftInteger
        Size = -1
        Value = 0
      end
      item
        Name = 'd'
        DataType = ftString
        Size = -1
        Value = ''
      end>
    SQL.Strings = (
      
        'insert into formuliar_chitatelia2 values(:q,:w,:e,:r,:t,:y,:u,:i' +
        ',:o,:p,:a,:s,:d)')
    Left = 320
    Top = 40
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 320
    Top = 8
  end
  object ADOQuery2: TADOQuery
    Connection = DM.ADOConnection1
    Parameters = <>
    Left = 320
    Top = 104
  end
  object DataSource2: TDataSource
    DataSet = ADOQuery3
    Left = 320
    Top = 80
  end
  object ADOQuery3: TADOQuery
    Connection = DM.ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from formuliar_chitatelia2'
      'where 1=1')
    Left = 320
    Top = 128
  end
end
