object Form15: TForm15
  Left = 0
  Top = 0
  BorderStyle = bsSingle
  Caption = #1042#1099#1076#1072#1095#1072' '#1082#1085#1080#1075
  ClientHeight = 503
  ClientWidth = 634
  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 = 72
    Top = 16
    Width = 134
    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 Label2: TLabel
    Left = 72
    Top = 48
    Width = 169
    Height = 15
    Caption = #1048#1076#1077#1085#1090#1080#1092#1080#1082#1072#1094#1080#1086#1085#1085#1099#1081' '#8470' '#1082#1085#1080#1075#1080
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
  end
  object Label3: TLabel
    Left = 344
    Top = 16
    Width = 70
    Height = 15
    Caption = #1044#1072#1090#1072' '#1074#1099#1076#1072#1095#1080
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
  end
  object Label4: TLabel
    Left = 344
    Top = 48
    Width = 77
    Height = 15
    Caption = #1044#1072#1090#1072' '#1074#1086#1079#1074#1088#1072#1090#1072
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
  end
  object Label5: TLabel
    Left = 120
    Top = 224
    Width = 93
    Height = 15
    Caption = #1055#1086#1080#1089#1082' '#1087#1086' '#1072#1074#1090#1086#1088#1091
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
  end
  object Label6: TLabel
    Left = 344
    Top = 224
    Width = 107
    Height = 15
    Caption = #1055#1086#1080#1089#1082' '#1087#1086' '#1095#1080#1090#1072#1090#1077#1083#1102
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
  end
  object Label7: TLabel
    Left = 288
    Top = 128
    Width = 3
    Height = 13
    Visible = False
  end
  object DBGrid1: TDBGrid
    Left = 8
    Top = 80
    Width = 329
    Height = 129
    DataSource = DataSource3
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'Tahoma'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'fam_avtor'
        Title.Alignment = taCenter
        Title.Caption = #1060#1072#1084#1080#1083#1080#1103' '#1072#1074#1090#1086#1088#1072
        Title.Font.Charset = RUSSIAN_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -13
        Title.Font.Name = 'Times New Roman'
        Title.Font.Style = [fsBold]
        Width = 98
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'nazvanie'
        Title.Alignment = taCenter
        Title.Caption = #1053#1072#1079#1074#1072#1085#1080#1077
        Title.Font.Charset = RUSSIAN_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -13
        Title.Font.Name = 'Times New Roman'
        Title.Font.Style = [fsBold]
        Width = 194
        Visible = True
      end>
  end
  object Edit2: TEdit
    Left = 216
    Top = 216
    Width = 113
    Height = 23
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    OnKeyUp = Edit2KeyUp
  end
  object DateTimePicker1: TDateTimePicker
    Left = 440
    Top = 8
    Width = 145
    Height = 23
    Date = 39375.002339768520000000
    Time = 39375.002339768520000000
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    OnClick = DateTimePicker1Click
    OnKeyPress = DateTimePicker1KeyPress
  end
  object Panel1: TPanel
    Left = 0
    Top = 459
    Width = 634
    Height = 44
    Align = alBottom
    TabOrder = 3
    object Button1: TButton
      Left = 488
      Top = 10
      Width = 131
      Height = 25
      Caption = #1047#1072#1082#1088#1099#1090#1100
      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 = 344
      Top = 10
      Width = 123
      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
      OnMouseMove = Button2MouseMove
    end
  end
  object DBEdit1: TDBEdit
    Left = 264
    Top = 8
    Width = 65
    Height = 23
    DataField = 'num_chit_b'
    DataSource = DataSource4
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    TabOrder = 4
  end
  object DBEdit2: TDBEdit
    Left = 264
    Top = 48
    Width = 65
    Height = 23
    DataField = 'inv_nomer'
    DataSource = DataSource3
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    TabOrder = 5
    OnKeyPress = DBEdit2KeyPress
  end
  object DBGrid3: TDBGrid
    Left = 336
    Top = 80
    Width = 297
    Height = 129
    DataSource = DataSource4
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    TabOrder = 6
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'Tahoma'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'familia'
        Title.Alignment = taCenter
        Title.Caption = #1060#1072#1084#1080#1083#1080#1103' '#1095#1080#1090#1072#1090#1077#1083#1103
        Title.Font.Charset = RUSSIAN_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -13
        Title.Font.Name = 'Times New Roman'
        Title.Font.Style = [fsBold]
        Width = 289
        Visible = True
      end>
  end
  object Edit4: TEdit
    Left = 456
    Top = 216
    Width = 105
    Height = 23
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    TabOrder = 7
    OnKeyUp = Edit4KeyUp
  end
  object DateTimePicker2: TDateTimePicker
    Left = 440
    Top = 48
    Width = 145
    Height = 23
    Date = 39375.002339768520000000
    Time = 39375.002339768520000000
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    TabOrder = 8
    OnClick = DateTimePicker2Click
  end
  object DBGrid2: TDBGrid
    Left = 136
    Top = 248
    Width = 417
    Height = 209
    DataSource = DataSource6
    Font.Charset = RUSSIAN_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    TabOrder = 9
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'Tahoma'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'inv_num'
        Title.Caption = #1048#1085#1074#1077#1085#1090#1072#1088#1085#1099#1081' '#8470
        Width = 60
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'num_chit_b'
        Title.Caption = #8470' '#1095#1080#1090'-'#1086#1075#1086' '#1073#1080#1083#1077#1090#1072
        Width = 79
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'data_vid'
        Title.Caption = #1044#1072#1090#1072' '#1074#1099#1076#1072#1095#1080
        Width = 58
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'data_vozvr'
        Title.Caption = #1044#1072#1090#1072' '#1076#1086#1083#1078#1085#1086#1075#1086' '#1074#1086#1079#1074#1088#1072#1090#1072
        Width = 113
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'coctoianie'
        Title.Caption = #1057#1086#1089#1090#1086#1103#1085#1080#1077
        Width = 62
        Visible = True
      end>
  end
  object DataSource3: TDataSource
    DataSet = ADOQuery3
    Left = 32
    Top = 160
  end
  object ADOQuery3: TADOQuery
    Connection = DM.ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from inventarnaia_kniga1'
      'where 1=1')
    Left = 64
    Top = 160
  end
  object ADOQuery4: TADOQuery
    Connection = DM.ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from formuliar_chitatelia2'
      'where 1=1')
    Left = 488
    Top = 152
  end
  object DataSource4: TDataSource
    DataSet = ADOQuery4
    Left = 456
    Top = 152
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery4
    Left = 360
    Top = 72
  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 = ftInteger
        Size = -1
        Value = 0
      end
      item
        Name = 'n'
        DataType = ftString
        Size = -1
        Value = ''
      end
      item
        Name = 't'
        DataType = ftDateTime
        Size = -1
        Value = 0d
      end>
    SQL.Strings = (
      'insert into vidacha_knig31 values(:q,:w,:e,:n,:t,"'#1044#1086#1083#1075'")')
    Left = 400
    Top = 72
  end
  object DataSource2: TDataSource
    DataSet = ADOQuery2
    Left = 152
    Top = 72
  end
  object ADOQuery2: TADOQuery
    Connection = DM.ADOConnection1
    Parameters = <>
    Left = 120
    Top = 72
  end
  object DataSource5: TDataSource
    DataSet = ADOQuery5
    Left = 592
    Top = 8
  end
  object ADOQuery5: TADOQuery
    Parameters = <>
    Left = 560
    Top = 8
  end
  object DataSource6: TDataSource
    DataSet = ADOQuery6
    Left = 272
    Top = 400
  end
  object ADOQuery6: TADOQuery
    Connection = DM.ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from vidacha_knig31 where coctoianie= '#39#1044#1086#1083#1075#39' ')
    Left = 352
    Top = 400
  end
end
