PC World Komputer 1999 mARCH/PCWK3A99.iso/Polskie/Malabibl/_SETUP.1/biblio.exe/0/RCDATA/TFRMGLOWNA/TFRMGLOWNA.txt

Text File | 1998-07-13 | 74KB | 2,101 lines

object frmGlowna: TfrmGlowna
  Left = 28
  Top = 127
  Width = 642
  Height = 450
  HelpContext = 40
  Caption = 'Biblioteka'
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  Menu = MainMenu1
  Scaled = False
  ShowHint = True
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 120
  TextHeight = 20
  object tnZakladki: TTabbedNotebook
    Left = 0
    Top = 0
    Width = 634
    Height = 396
    HelpContext = 40
    Align = alClient
    PageIndex = 3
    TabsPerRow = 5
    TabFont.Charset = DEFAULT_CHARSET
    TabFont.Color = clBtnText
    TabFont.Height = -11
    TabFont.Name = 'MS Sans Serif'
    TabFont.Style = []
    TabOrder = 0
    OnChange = tnZakladkiChange
    object TTabPage
      Left = 4
      Top = 31
      HelpContext = 1
      Caption = 'Wypo�yczanie'
      object GroupBox1: TGroupBox
        Left = 0
        Top = 0
        Width = 626
        Height = 227
        Align = alClient
        Caption = 'U�ytkownik'
        Font.Charset = EASTEUROPE_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 0
        object Panel14: TPanel
          Left = 2
          Top = 18
          Width = 261
          Height = 207
          Align = alLeft
          BevelOuter = bvNone
          TabOrder = 0
          object Label1: TLabel
            Left = 12
            Top = 14
            Width = 76
            Height = 13
            Caption = 'Nazwisko i Imi�:'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
          end
          object lstNazwiska: TListBox
            Left = 12
            Top = 28
            Width = 235
            Height = 97
            Font.Charset = EASTEUROPE_CHARSET
            Font.Color = clWindowText
            Font.Height = -13
            Font.Name = 'MS Sans Serif'
            Font.Style = [fsBold]
            ItemHeight = 16
            ParentFont = False
            Sorted = True
            TabOrder = 0
            OnClick = lstNazwiskaClick
          end
          object tbNazwisko: TEdit
            Left = 12
            Top = 132
            Width = 187
            Height = 24
            TabOrder = 1
            OnChange = tbNazwiskoChange
          end
          object cmdNowyUzytkownik: TBitBtn
            Left = 204
            Top = 132
            Width = 45
            Height = 23
            Caption = 'Nowy'
            Font.Charset = EASTEUROPE_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
            TabOrder = 2
            OnClick = cmdNowyUzytkownikClick
          end
          object cmdPrzyjmijKsiazke: TButton
            Left = 14
            Top = 180
            Width = 233
            Height = 31
            Caption = 'Przyjmij ksi��k�'
            Enabled = False
            TabOrder = 3
            OnClick = cmdPrzyjmijKsiazkeClick
          end
        end
        object Panel18: TPanel
          Left = 263
          Top = 18
          Width = 361
          Height = 207
          Align = alClient
          BevelOuter = bvNone
          Caption = 'Panel18'
          TabOrder = 1
          object Panel22: TPanel
            Left = 0
            Top = 0
            Width = 361
            Height = 19
            Align = alTop
            BevelOuter = bvNone
            TabOrder = 0
            object Label2: TLabel
              Left = 7
              Top = 0
              Width = 163
              Height = 13
              Caption = 'Ksi��ki w posiadaniu u�ytkownika:'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clBlack
              Font.Height = -11
              Font.Name = 'MS Sans Serif'
              Font.Style = []
              ParentFont = False
            end
          end
          object Panel26: TPanel
            Left = 0
            Top = 19
            Width = 361
            Height = 188
            Align = alClient
            BevelOuter = bvNone
            BorderWidth = 8
            Caption = 'Panel26'
            TabOrder = 1
            object grdKsiazkiWypozyczone: TDBGrid
              Left = 8
              Top = 8
              Width = 345
              Height = 172
              Align = alClient
              DataSource = dsKsiazkiWypozyczone
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -13
              Font.Name = 'System'
              Font.Style = []
              Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
              ParentFont = False
              TabOrder = 0
              TitleFont.Charset = EASTEUROPE_CHARSET
              TitleFont.Color = clWindowText
              TitleFont.Height = -11
              TitleFont.Name = 'MS Sans Serif'
              TitleFont.Style = []
              Columns = <
                item
                  FieldName = 'Sygnatura'
                  Width = 67
                end
                item
                  FieldName = 'DataWypozyczenia'
                  Title.Caption = 'Data wypo�yczenia'
                  Width = 102
                end
                item
                  FieldName = 'Autor'
                  Width = 185
                end
                item
                  FieldName = 'Tytul'
                  Title.Caption = 'Tytu�'
                end>
            end
          end
        end
      end
      object panKsiazkaWypozyczana: TGroupBox
        Left = 0
        Top = 227
        Width = 626
        Height = 134
        Align = alBottom
        Caption = 'Ksi��ka wypo�yczana '
        Font.Charset = EASTEUROPE_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 1
        object Label3: TLabel
          Left = 12
          Top = 18
          Width = 51
          Height = 13
          Caption = 'Sygnatura:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label5: TLabel
          Left = 248
          Top = 14
          Width = 28
          Height = 13
          Caption = 'Autor:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label6: TLabel
          Left = 248
          Top = 62
          Width = 28
          Height = 13
          Caption = 'Tytu�:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object cmdWypozyczKsiazke: TButton
          Left = 14
          Top = 100
          Width = 211
          Height = 29
          Caption = 'Wypo�ycz ksi��k�'
          Enabled = False
          TabOrder = 0
          OnClick = cmdWypozyczKsiazkeClick
        end
        object tbSygnaturaWypozyczanej: TEdit
          Left = 12
          Top = 34
          Width = 117
          Height = 24
          HelpContext = 1
          TabOrder = 1
          OnChange = tbSygnaturaWypozyczanejChange
        end
        object cmdSzukajWgSygWypozyczanej: TButton
          Left = 136
          Top = 34
          Width = 91
          Height = 21
          HelpContext = 3
          Caption = 'Szukaj'
          Default = True
          Enabled = False
          TabOrder = 2
          OnClick = cmdSzukajWgSygWypozyczanejClick
        end
        object tbAutor: TDBEdit
          Left = 248
          Top = 30
          Width = 349
          Height = 24
          DataField = 'Autor'
          DataSource = dsKsiazkaWypozyczana
          ReadOnly = True
          TabOrder = 3
        end
        object memTytul: TDBMemo
          Left = 248
          Top = 76
          Width = 351
          Height = 53
          DataField = 'Tytul'
          DataSource = dsKsiazkaWypozyczana
          ReadOnly = True
          TabOrder = 4
        end
      end
    end
    object TTabPage
      Left = 4
      Top = 31
      HelpContext = 3
      Caption = 'Wypo�yczenia'
      object Panel6: TPanel
        Left = 0
        Top = 0
        Width = 626
        Height = 33
        Align = alTop
        BevelOuter = bvNone
        Font.Charset = EASTEUROPE_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        object SpeedButton1: TSpeedButton
          Left = 612
          Top = 4
          Width = 25
          Height = 25
          Glyph.Data = {
            EE000000424DEE000000000000007600000028000000100000000F0000000100
            0400000000007800000084120000841200001000000000000000000000000000
            8000008000000080800080000000800080008080000080808000C0C0C0000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888880088888
            8888888880088888888888880088884448880888008888444888008008888888
            8888000008888844788800000000884478880000000888844888000000888888
            4478000008874488744700008884478884440008888447888444008888884488
            744708888888844444788888888888888888}
          OnClick = cmdHelpClick
        end
        object cmdSzukajWypozyczenia: TBitBtn
          Left = 4
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Wybieranie'
          HelpContext = 1000
          TabOrder = 0
          TabStop = False
          OnClick = cmdSzukajWypozyczeniaClick
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000130B0000130B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
            333333333333333FF3FF3333333333CC30003333333333773777333333333C33
            3000333FF33337F33777339933333C3333333377F33337F3333F339933333C33
            33003377333337F33377333333333C333300333F333337F33377339333333C33
            3333337FF3333733333F33993333C33333003377FF33733333773339933C3333
            330033377FF73F33337733339933C33333333FF377F373F3333F993399333C33
            330077F377F337F33377993399333C33330077FF773337F33377399993333C33
            33333777733337F333FF333333333C33300033333333373FF7773333333333CC
            3000333333333377377733333333333333333333333333333333}
          NumGlyphs = 2
          Spacing = 0
        end
        object cmdWypozyczeniaWszystkie: TBitBtn
          Left = 98
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Poka� wszystkie wypo�yczenia'
          HelpContext = 1002
          TabOrder = 1
          TabStop = False
          OnClick = cmdWypozyczeniaWszystkieClick
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555000000
            000055555F77777777775555000FFFFFFFF0555F777F5FFFF55755000F0F0000
            FFF05F777F7F77775557000F0F0FFFFFFFF0777F7F7F5FFFFFF70F0F0F0F0000
            00F07F7F7F7F777777570F0F0F0FFFFFFFF07F7F7F7F5FFFFFF70F0F0F0F0000
            00F07F7F7F7F777777570F0F0F0FFFFFFFF07F7F7F7F5FFF55570F0F0F0F000F
            FFF07F7F7F7F77755FF70F0F0F0FFFFF00007F7F7F7F5FF577770F0F0F0F00FF
            0F057F7F7F7F77557F750F0F0F0FFFFF00557F7F7F7FFFFF77550F0F0F000000
            05557F7F7F77777775550F0F0000000555557F7F7777777555550F0000000555
            55557F7777777555555500000005555555557777777555555555}
          NumGlyphs = 2
          Spacing = -1
        end
        object cmdWypPokazKsiazke: TBitBtn
          Left = 150
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Poka� ksi��k�'
          HelpContext = 1003
          TabOrder = 2
          TabStop = False
          OnClick = cmdWypPokazKsiazkeClick
          Glyph.Data = {
            EE000000424DEE000000000000007600000028000000100000000F0000000100
            04000000000078000000CE0E0000C40E00001000000000000000000000000000
            80000080000000808000800000008000800080800000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEEE000EEE
            EEEEEEEEE0C0800EEEEEEEEE0CC0FFF00EEEEEE0CCC08FFFF00EEE0CCCC7008F
            FF00E0CCCC7CCC008F8E0CCCC7CCCCCC008E0CCC7CCCCCCCCC000CC7CCCCCCCC
            CC0E0C7CCCCCCCCCC0EE07CCCCCCCCCC0EEEE00CCCCCCCC0EEEEEEE00CCCCC0E
            EEEEEEEEE00CC0EEEEEEEEEEEEE00EEEEEEE}
          Spacing = -1
        end
        object cmdWypPokazUzytkownika: TBitBtn
          Left = 124
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Poka� u�ytkownika'
          HelpContext = 1004
          TabOrder = 3
          TabStop = False
          OnClick = cmdWypPokazUzytkownikaClick
          Glyph.Data = {
            F6000000424DF60000000000000076000000280000000E000000100000000100
            04000000000080000000CE0E0000C40E00001000000000000000000000000000
            80000080000000808000800000008000800080800000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00BB0000000000
            0B00BBBB0FFFFFF0BB00BBBB0FFFFF0BBB00BB0000FFF00BBB00B0FFFFFFF000
            BB00B0FFFFFFF0000B00B000FFFF00000000B0FFFFFFF00000000FFFFFFFF000
            0000B0F0FFFF00000000BB00FF0000000000BB0FFF000000000000F000000000
            00000000000000000B00000000000000BB00BB000000000BBB00}
        end
        object cmdRapWypozyczenia: TBitBtn
          Left = 38
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Raport'
          HelpContext = 1011
          TabOrder = 4
          TabStop = False
          OnClick = cmdRapWypozyczeniaClick
          Glyph.Data = {
            E6000000424DE6000000000000007600000028000000100000000E0000000100
            04000000000070000000CE0E0000C40E00001000000000000000000000000000
            80000080000000808000800000008000800080800000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00BBBBBB000BBB
            BBBBBBBB0078800BBBBBBB00777888800BBB807777788888800B8F7777F88888
            88808F77FF77788888808FFF7799777888808F77AA7778807880B88F777887F0
            788BBBB88F87FFFF0BBBBBBBB88FFFFFF0BBBBBBBBB8FFFFFF00BBBBBBBB8FFF
            88BBBBBBBBBBB888BBBB}
          Spacing = -1
        end
        object cmbSortowanieWypozyczenia: TComboBox
          Left = 186
          Top = 8
          Width = 149
          Height = 21
          HelpContext = 1013
          TabStop = False
          Style = csDropDownList
          ItemHeight = 13
          TabOrder = 5
          OnChange = cmbSortowanieWypozyczeniaChange
        end
        object cmdPodgladWypozyczenia: TBitBtn
          Left = 64
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Podgl�d raportu'
          HelpContext = 1012
          TabOrder = 6
          TabStop = False
          OnClick = cmdPodgladWypozyczeniaClick
          Glyph.Data = {
            F6000000424DF600000000000000760000002800000010000000100000000100
            04000000000080000000CE0E0000C40E00001000000000000000000000000000
            8000008000000080800080000000800080008080000080808000C0C0C0000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00AAAAAAAAAAAA
            AAAA000000000000AA000FFFFFFFFFF0A0000FFFFFFF0000700A0FFFFFF07887
            07AA0FFFFF0788E770AA0FFFFF088887A0AA0FFFFF08E887A0AA0FFFFF07EE87
            70AA0FFFFFF078870AAA0FFFFFFF0000AAAA0FFFFFFFFFF0AAAA0FFFFFFF0000
            AAAA0FFFFFFF080AAAAA0FFFFFFF00AAAAAA000000000AAAAAAA}
          Spacing = -1
        end
      end
      object Panel7: TPanel
        Left = 0
        Top = 33
        Width = 626
        Height = 284
        Align = alClient
        BevelInner = bvLowered
        BevelOuter = bvNone
        BorderWidth = 8
        Caption = 'Panel7'
        TabOrder = 1
        object grdWypozyczenia: TDBGrid
          Left = 9
          Top = 9
          Width = 608
          Height = 266
          Align = alClient
          DataSource = dsWypozyczenia
          Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
          TabOrder = 0
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -13
          TitleFont.Name = 'System'
          TitleFont.Style = []
          Columns = <
            item
              FieldName = 'Nazwisko'
              Width = 189
            end
            item
              FieldName = 'DataWypozyczenia'
              Width = 109
            end
            item
              FieldName = 'Autor'
              Width = 171
            end
            item
              FieldName = 'Tytul'
              Width = 133
            end
            item
              FieldName = 'Sygnatura'
            end
            item
              FieldName = 'Operator'
            end>
        end
      end
      object panStatusBar: TPanel
        Left = 0
        Top = 317
        Width = 626
        Height = 44
        Align = alBottom
        BevelInner = bvLowered
        Caption = 'panStatusBar'
        TabOrder = 2
        object panLewy: TPanel
          Left = 2
          Top = 2
          Width = 71
          Height = 40
          Align = alLeft
          BevelOuter = bvNone
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
          object panLiczbaWypozyczen: TPanel
            Left = 8
            Top = 4
            Width = 53
            Height = 19
            HelpContext = 1009
            BevelOuter = bvLowered
            TabOrder = 0
          end
        end
        object Panel4: TPanel
          Left = 73
          Top = 2
          Width = 551
          Height = 40
          HelpContext = 1010
          Align = alClient
          BevelOuter = bvNone
          BorderWidth = 4
          TabOrder = 1
          object pisPytanieWypozyczenia: TOPisak
            Left = 4
            Top = 4
            Width = 543
            Height = 32
            Align = alClient
            Color = clBtnFace
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentColor = False
            ParentFont = False
          end
        end
      end
    end
    object TTabPage
      Left = 4
      Top = 31
      HelpContext = 41
      Caption = 'U�ytkownicy'
      object Panel3: TPanel
        Left = 0
        Top = 0
        Width = 626
        Height = 31
        Align = alTop
        BevelOuter = bvNone
        Font.Charset = EASTEUROPE_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        object cmdHelp: TSpeedButton
          Left = 612
          Top = 4
          Width = 25
          Height = 25
          Glyph.Data = {
            EE000000424DEE000000000000007600000028000000100000000F0000000100
            0400000000007800000084120000841200001000000000000000000000000000
            8000008000000080800080000000800080008080000080808000C0C0C0000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888880088888
            8888888880088888888888880088884448880888008888444888008008888888
            8888000008888844788800000000884478880000000888844888000000888888
            4478000008874488744700008884478884440008888447888444008888884488
            744708888888844444788888888888888888}
          OnClick = cmdHelpClick
        end
        object cmdDodajUzytkownika: TBitBtn
          Left = 280
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Dodawanie u�ytkownika'
          HelpContext = 1005
          TabOrder = 0
          TabStop = False
          OnClick = cmdDodajUzytkownikaClick
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000130B0000130B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
            333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
            0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
            07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
            07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
            0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
            33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
            B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
            3BB33773333773333773B333333B3333333B7333333733333337}
          NumGlyphs = 2
          Spacing = -1
        end
        object cmdUsunUzytkownika: TBitBtn
          Left = 332
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Usuwanie u�ytkownika'
          HelpContext = 1006
          TabOrder = 1
          TabStop = False
          OnClick = cmdUsunUzytkownikaClick
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333000000000
            3333333777777777F3333330F777777033333337F3F3F3F7F3333330F0808070
            33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
            33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
            333333F7F7F7F7F7F3F33030F080707030333737F7F7F7F7F7333300F0808070
            03333377F7F7F7F773333330F080707033333337F7F7F7F7F333333070707070
            33333337F7F7F7F7FF3333000000000003333377777777777F33330F88877777
            0333337FFFFFFFFF7F3333000000000003333377777777777333333330777033
            3333333337FFF7F3333333333000003333333333377777333333}
          NumGlyphs = 2
          Spacing = -1
        end
        object cmdEdytujUzytkownika: TBitBtn
          Left = 306
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Edytowanie u�ytkownika'
          TabOrder = 2
          TabStop = False
          OnClick = cmdEdytujUzytkownikaClick
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
            000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
            00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
            F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
            0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
            FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
            FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
            0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
            00333377737FFFFF773333303300000003333337337777777333}
          NumGlyphs = 2
          Spacing = -1
        end
        object cmdSzukajUzytkownika: TBitBtn
          Left = 4
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Wybieranie'
          HelpContext = 1000
          TabOrder = 3
          TabStop = False
          OnClick = cmdSzukajUzytkownikaClick
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000130B0000130B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
            333333333333333FF3FF3333333333CC30003333333333773777333333333C33
            3000333FF33337F33777339933333C3333333377F33337F3333F339933333C33
            33003377333337F33377333333333C333300333F333337F33377339333333C33
            3333337FF3333733333F33993333C33333003377FF33733333773339933C3333
            330033377FF73F33337733339933C33333333FF377F373F3333F993399333C33
            330077F377F337F33377993399333C33330077FF773337F33377399993333C33
            33333777733337F333FF333333333C33300033333333373FF7773333333333CC
            3000333333333377377733333333333333333333333333333333}
          NumGlyphs = 2
          Spacing = -1
        end
        object cmdWszyscyUzytkownicy: TBitBtn
          Left = 96
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Poka� wszystkich u�ytkownik�w'
          HelpContext = 1002
          TabOrder = 4
          TabStop = False
          OnClick = cmdWszyscyUzytkownicyClick
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555000000
            000055555F77777777775555000FFFFFFFF0555F777F5FFFF55755000F0F0000
            FFF05F777F7F77775557000F0F0FFFFFFFF0777F7F7F5FFFFFF70F0F0F0F0000
            00F07F7F7F7F777777570F0F0F0FFFFFFFF07F7F7F7F5FFFFFF70F0F0F0F0000
            00F07F7F7F7F777777570F0F0F0FFFFFFFF07F7F7F7F5FFF55570F0F0F0F000F
            FFF07F7F7F7F77755FF70F0F0F0FFFFF00007F7F7F7F5FF577770F0F0F0F00FF
            0F057F7F7F7F77557F750F0F0F0FFFFF00557F7F7F7FFFFF77550F0F0F000000
            05557F7F7F77777775550F0F0000000555557F7F7777777555550F0000000555
            55557F7777777555555500000005555555557777777555555555}
          NumGlyphs = 2
          Spacing = -1
        end
        object cmdRapUzytkownicy: TBitBtn
          Left = 38
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Raport'
          HelpContext = 1011
          TabOrder = 5
          TabStop = False
          OnClick = cmdRapUzytkownicyClick
          Glyph.Data = {
            E6000000424DE6000000000000007600000028000000100000000E0000000100
            04000000000070000000CE0E0000C40E00001000000000000000000000000000
            80000080000000808000800000008000800080800000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00BBBBBB000BBB
            BBBBBBBB0078800BBBBBBB00777888800BBB807777788888800B8F7777F88888
            88808F77FF77788888808FFF7799777888808F77AA7778807880B88F777887F0
            788BBBB88F87FFFF0BBBBBBBB88FFFFFF0BBBBBBBBB8FFFFFF00BBBBBBBB8FFF
            88BBBBBBBBBBB888BBBB}
          Spacing = -1
        end
        object cmsSortowanieUzytkownicy: TComboBox
          Left = 128
          Top = 8
          Width = 145
          Height = 21
          HelpContext = 1013
          TabStop = False
          Style = csDropDownList
          ItemHeight = 13
          TabOrder = 6
          Visible = False
        end
        object cmdPodgladUzytkownicy: TBitBtn
          Left = 64
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Podgl�d raportu'
          HelpContext = 1012
          TabOrder = 7
          TabStop = False
          OnClick = cmdPodgladUzytkownicyClick
          Glyph.Data = {
            F6000000424DF600000000000000760000002800000010000000100000000100
            04000000000080000000CE0E0000C40E00001000000000000000000000000000
            8000008000000080800080000000800080008080000080808000C0C0C0000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00AAAAAAAAAAAA
            AAAA000000000000AA000FFFFFFFFFF0A0000FFFFFFF0000700A0FFFFFF07887
            07AA0FFFFF0788E770AA0FFFFF088887A0AA0FFFFF08E887A0AA0FFFFF07EE87
            70AA0FFFFFF078870AAA0FFFFFFF0000AAAA0FFFFFFFFFF0AAAA0FFFFFFF0000
            AAAA0FFFFFFF080AAAAA0FFFFFFF00AAAAAA000000000AAAAAAA}
          Spacing = -1
        end
      end
      object Panel8: TPanel
        Left = 0
        Top = 31
        Width = 626
        Height = 286
        Align = alClient
        BevelInner = bvLowered
        BevelOuter = bvNone
        BorderWidth = 8
        Caption = 'Panel8'
        TabOrder = 1
        object grdUzytkownicy: TDBGrid
          Left = 9
          Top = 9
          Width = 608
          Height = 268
          Align = alClient
          DataSource = dsUzytkownicy
          Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
          TabOrder = 0
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -13
          TitleFont.Name = 'System'
          TitleFont.Style = []
          Columns = <
            item
              FieldName = 'Nazwisko'
              Width = 247
            end
            item
              FieldName = 'Adres'
              Width = 141
            end
            item
              FieldName = 'Miasto'
              Width = 142
            end
            item
              FieldName = 'KodPocztowy'
            end>
        end
      end
      object Panel12: TPanel
        Left = 0
        Top = 317
        Width = 626
        Height = 44
        Align = alBottom
        BevelInner = bvLowered
        Caption = 'panStatusBar'
        TabOrder = 2
        object Panel13: TPanel
          Left = 2
          Top = 2
          Width = 71
          Height = 40
          Align = alLeft
          BevelOuter = bvNone
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
          object panLiczbaUzytkownikow: TPanel
            Left = 6
            Top = 4
            Width = 53
            Height = 19
            HelpContext = 1009
            BevelOuter = bvLowered
            TabOrder = 0
          end
        end
        object Panel15: TPanel
          Left = 73
          Top = 2
          Width = 551
          Height = 40
          HelpContext = 1010
          Align = alClient
          BevelOuter = bvNone
          BorderWidth = 4
          TabOrder = 1
          object pisPytanieUzytkownicy: TOPisak
            Left = 4
            Top = 4
            Width = 543
            Height = 32
            Align = alClient
            Color = clBtnFace
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentColor = False
            ParentFont = False
          end
        end
      end
    end
    object TTabPage
      Left = 4
      Top = 31
      HelpContext = 42
      Caption = 'Ksi��ki'
      object Panel1: TPanel
        Left = 0
        Top = 0
        Width = 626
        Height = 31
        Align = alTop
        BevelOuter = bvNone
        Font.Charset = EASTEUROPE_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        object SpeedButton2: TSpeedButton
          Left = 612
          Top = 4
          Width = 25
          Height = 25
          Glyph.Data = {
            EE000000424DEE000000000000007600000028000000100000000F0000000100
            0400000000007800000084120000841200001000000000000000000000000000
            8000008000000080800080000000800080008080000080808000C0C0C0000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888880088888
            8888888880088888888888880088884448880888008888444888008008888888
            8888000008888844788800000000884478880000000888844888000000888888
            4478000008874488744700008884478884440008888447888444008888884488
            744708888888844444788888888888888888}
          OnClick = cmdHelpClick
        end
        object cmdDodajKsiazke: TBitBtn
          Left = 450
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Dodawanie ksi��ki'
          HelpContext = 1005
          TabOrder = 0
          TabStop = False
          OnClick = cmdDodajKsiazkeClick
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000130B0000130B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
            333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
            0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
            07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
            07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
            0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
            33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
            B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
            3BB33773333773333773B333333B3333333B7333333733333337}
          NumGlyphs = 2
          Spacing = -1
        end
        object cmdUsunKsiazke: TBitBtn
          Left = 502
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Usuwanie ksi��ki'
          HelpContext = 1006
          TabOrder = 1
          TabStop = False
          OnClick = cmdUsunKsiazkeClick
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333000000000
            3333333777777777F3333330F777777033333337F3F3F3F7F3333330F0808070
            33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
            33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
            333333F7F7F7F7F7F3F33030F080707030333737F7F7F7F7F7333300F0808070
            03333377F7F7F7F773333330F080707033333337F7F7F7F7F333333070707070
            33333337F7F7F7F7FF3333000000000003333377777777777F33330F88877777
            0333337FFFFFFFFF7F3333000000000003333377777777777333333330777033
            3333333337FFF7F3333333333000003333333333377777333333}
          NumGlyphs = 2
          Spacing = -1
        end
        object cmdPokazWszystkieKsiazki: TBitBtn
          Left = 238
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Poka� wszystkie ksi��ki'
          HelpContext = 1002
          TabOrder = 2
          TabStop = False
          OnClick = cmdPokazWszystkieKsiazkiClick
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555000000
            000055555F77777777775555000FFFFFFFF0555F777F5FFFF55755000F0F0000
            FFF05F777F7F77775557000F0F0FFFFFFFF0777F7F7F5FFFFFF70F0F0F0F0000
            00F07F7F7F7F777777570F0F0F0FFFFFFFF07F7F7F7F5FFFFFF70F0F0F0F0000
            00F07F7F7F7F777777570F0F0F0FFFFFFFF07F7F7F7F5FFF55570F0F0F0F000F
            FFF07F7F7F7F77755FF70F0F0F0FFFFF00007F7F7F7F5FF577770F0F0F0F00FF
            0F057F7F7F7F77557F750F0F0F0FFFFF00557F7F7F7FFFFF77550F0F0F000000
            05557F7F7F77777775550F0F0000000555557F7F7777777555550F0000000555
            55557F7777777555555500000005555555557777777555555555}
          NumGlyphs = 2
          Spacing = -1
        end
        object cmdSzukajKsiazek: TBitBtn
          Left = 4
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Wybieranie'
          HelpContext = 1000
          TabOrder = 3
          TabStop = False
          OnClick = cmdSzukajKsiazekClick
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000130B0000130B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
            333333333333333FF3FF3333333333CC30003333333333773777333333333C33
            3000333FF33337F33777339933333C3333333377F33337F3333F339933333C33
            33003377333337F33377333333333C333300333F333337F33377339333333C33
            3333337FF3333733333F33993333C33333003377FF33733333773339933C3333
            330033377FF73F33337733339933C33333333FF377F373F3333F993399333C33
            330077F377F337F33377993399333C33330077FF773337F33377399993333C33
            33333777733337F333FF333333333C33300033333333373FF7773333333333CC
            3000333333333377377733333333333333333333333333333333}
          NumGlyphs = 2
          Spacing = -1
        end
        object cmdEdytujKsiazke: TBitBtn
          Left = 478
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Edytowanie ksi��ki'
          TabOrder = 4
          TabStop = False
          OnClick = cmdEdytujKsiazkeClick
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
            000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
            00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
            F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
            0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
            FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
            FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
            0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
            00333377737FFFFF773333303300000003333337337777777333}
          NumGlyphs = 2
          Spacing = -1
        end
        object cmdRapKsiazki: TBitBtn
          Left = 38
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Raport'
          HelpContext = 1011
          TabOrder = 5
          TabStop = False
          OnClick = cmdRapKsiazkiClick
          Glyph.Data = {
            E6000000424DE6000000000000007600000028000000100000000E0000000100
            04000000000070000000CE0E0000C40E00001000000000000000000000000000
            80000080000000808000800000008000800080800000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00BBBBBB000BBB
            BBBBBBBB0078800BBBBBBB00777888800BBB807777788888800B8F7777F88888
            88808F77FF77788888808FFF7799777888808F77AA7778807880B88F777887F0
            788BBBB88F87FFFF0BBBBBBBB88FFFFFF0BBBBBBBBB8FFFFFF00BBBBBBBB8FFF
            88BBBBBBBBBBB888BBBB}
          Spacing = -1
        end
        object cmbTypRaportuK: TComboBox
          Left = 92
          Top = 8
          Width = 107
          Height = 21
          Hint = 'Rodzaj raportu'
          HelpContext = 31
          TabStop = False
          Style = csDropDownList
          ItemHeight = 13
          TabOrder = 6
        end
        object cmdUtworzFiszki: TBitBtn
          Left = 204
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Tworzenie fiszek'
          HelpContext = 1008
          TabOrder = 7
          TabStop = False
          OnClick = cmdUtworzFiszkiClick
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000CE0E0000C40E00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
            3333333333333333333333333333333333333FFFFFFFFFFFFFFF000000000000
            000077777777777777770FFFFFFFFFFFFFF07F333FF3333333370FF777FFFFFF
            FFF07F377733333333370FFFFFFFFFFFFFF07F333FFFFF3F33370FF777777FFF
            FFF07F377777733333370FFFFFFFFFFFFFF07F3333333333FFF70FFFFFFFFFF7
            77F07F333333337773370FFFFFFFFFFFFFF07FFFFFFFFFFFFFF7000000000000
            0000777777777777777733333333333333333333333333333333333333333333
            3333333333333333333333333333333333333333333333333333333333333333
            3333333333333333333333333333333333333333333333333333}
          NumGlyphs = 2
        end
        object cmdPodgladKsiazki: TBitBtn
          Left = 64
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Podgl�d raportu'
          HelpContext = 1012
          TabOrder = 8
          TabStop = False
          OnClick = cmdPodgladKsiazkiClick
          Glyph.Data = {
            F6000000424DF600000000000000760000002800000010000000100000000100
            04000000000080000000CE0E0000C40E00001000000000000000000000000000
            8000008000000080800080000000800080008080000080808000C0C0C0000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00AAAAAAAAAAAA
            AAAA000000000000AA000FFFFFFFFFF0A0000FFFFFFF0000700A0FFFFFF07887
            07AA0FFFFF0788E770AA0FFFFF088887A0AA0FFFFF08E887A0AA0FFFFF07EE87
            70AA0FFFFFF078870AAA0FFFFFFF0000AAAA0FFFFFFFFFF0AAAA0FFFFFFF0000
            AAAA0FFFFFFF080AAAAA0FFFFFFF00AAAAAA000000000AAAAAAA}
          Spacing = -1
        end
        object cmbSortowanieKsiazki: TComboBox
          Left = 298
          Top = 8
          Width = 145
          Height = 21
          HelpContext = 1013
          TabStop = False
          Style = csDropDownList
          ItemHeight = 13
          TabOrder = 9
          OnChange = cmbSortowanieKsiazkiChange
        end
        object cmdOpisKsiazki: TBitBtn
          Left = 264
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Poka� ksi��k�'
          HelpContext = 1003
          TabOrder = 10
          TabStop = False
          OnClick = cmdOpisKsiazkiClick
          Glyph.Data = {
            EE000000424DEE000000000000007600000028000000100000000F0000000100
            04000000000078000000CE0E0000C40E00001000000000000000000000000000
            80000080000000808000800000008000800080800000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEEE000EEE
            EEEEEEEEE0C0800EEEEEEEEE0CC0FFF00EEEEEE0CCC08FFFF00EEE0CCCC7008F
            FF00E0CCCC7CCC008F8E0CCCC7CCCCCC008E0CCC7CCCCCCCCC000CC7CCCCCCCC
            CC0E0C7CCCCCCCCCC0EE07CCCCCCCCCC0EEEE00CCCCCCCC0EEEEEEE00CCCCC0E
            EEEEEEEEE00CC0EEEEEEEEEEEEE00EEEEEEE}
          Spacing = -1
        end
      end
      object Panel9: TPanel
        Left = 0
        Top = 31
        Width = 626
        Height = 286
        Align = alClient
        BevelInner = bvLowered
        BevelOuter = bvNone
        BorderWidth = 8
        Caption = 'Panel9'
        TabOrder = 1
        object grdKsiazki: TDBGrid
          Left = 9
          Top = 9
          Width = 608
          Height = 268
          Align = alClient
          DataSource = dsKsiazki
          Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
          TabOrder = 0
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -13
          TitleFont.Name = 'System'
          TitleFont.Style = []
          OnDblClick = grdKsiazkiDblClick
          Columns = <
            item
              FieldName = 'Autor'
              Width = 219
            end
            item
              FieldName = 'Tytul'
              Width = 306
            end
            item
              FieldName = 'Sygnatura'
            end
            item
              FieldName = 'RokWydania'
            end
            item
              FieldName = 'MiejsceWydania'
              Width = 82
            end
            item
              FieldName = 'Wydawnictwo'
            end
            item
              FieldName = 'NrInwentarzowy'
            end
            item
              FieldName = 'KluczTematyczny'
            end
            item
              FieldName = 'LiczbaStron'
            end
            item
              FieldName = 'Wielkosc'
            end
            item
              FieldName = 'Tom'
            end
            item
              FieldName = 'TytulOrginalu'
            end
            item
              FieldName = 'ISBN'
            end
            item
              FieldName = 'Tlumaczenie'
            end
            item
              FieldName = 'PracaZbiorowa'
            end
            item
              FieldName = 'AutorTlumaczenia'
            end
            item
              FieldName = 'KsiazkaWypozyczona'
            end
            item
              FieldName = 'PoleDodatkowe1'
            end>
        end
      end
      object Panel16: TPanel
        Left = 0
        Top = 317
        Width = 626
        Height = 44
        Align = alBottom
        BevelInner = bvLowered
        Caption = 'panStatusBar'
        TabOrder = 2
        object Panel17: TPanel
          Left = 2
          Top = 2
          Width = 71
          Height = 40
          Align = alLeft
          BevelOuter = bvNone
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
          object panLiczbaKsiazek: TPanel
            Left = 6
            Top = 4
            Width = 53
            Height = 19
            HelpContext = 1009
            BevelOuter = bvLowered
            TabOrder = 0
          end
        end
        object Panel19: TPanel
          Left = 73
          Top = 2
          Width = 551
          Height = 40
          HelpContext = 1010
          Align = alClient
          BevelOuter = bvNone
          BorderWidth = 4
          TabOrder = 1
          object pisPytanieKsiazki: TOPisak
            Left = 4
            Top = 4
            Width = 543
            Height = 32
            Align = alClient
            Color = clBtnFace
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentColor = False
            ParentFont = False
          end
        end
      end
    end
    object TTabPage
      Left = 4
      Top = 31
      HelpContext = 2
      Caption = 'Archiwum'
      object Panel2: TPanel
        Left = 0
        Top = 0
        Width = 626
        Height = 33
        Align = alTop
        BevelOuter = bvNone
        Font.Charset = EASTEUROPE_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        object SpeedButton3: TSpeedButton
          Left = 612
          Top = 4
          Width = 25
          Height = 25
          Glyph.Data = {
            EE000000424DEE000000000000007600000028000000100000000F0000000100
            0400000000007800000084120000841200001000000000000000000000000000
            8000008000000080800080000000800080008080000080808000C0C0C0000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888880088888
            8888888880088888888888880088884448880888008888444888008008888888
            8888000008888844788800000000884478880000000888844888000000888888
            4478000008874488744700008884478884440008888447888444008888884488
            744708888888844444788888888888888888}
          OnClick = cmdHelpClick
        end
        object cmdSzukajArchiwum: TBitBtn
          Left = 6
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Wybieranie'
          HelpContext = 1000
          TabOrder = 0
          TabStop = False
          OnClick = cmdSzukajArchiwumClick
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000130B0000130B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
            333333333333333FF3FF3333333333CC30003333333333773777333333333C33
            3000333FF33337F33777339933333C3333333377F33337F3333F339933333C33
            33003377333337F33377333333333C333300333F333337F33377339333333C33
            3333337FF3333733333F33993333C33333003377FF33733333773339933C3333
            330033377FF73F33337733339933C33333333FF377F373F3333F993399333C33
            330077F377F337F33377993399333C33330077FF773337F33377399993333C33
            33333777733337F333FF333333333C33300033333333373FF7773333333333CC
            3000333333333377377733333333333333333333333333333333}
          NumGlyphs = 2
          Spacing = -1
        end
        object cmdWszystkieArchiwa: TBitBtn
          Left = 104
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Poka� ca�e archiwum'
          HelpContext = 1002
          TabOrder = 1
          TabStop = False
          OnClick = cmdWszystkieArchiwaClick
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555000000
            000055555F77777777775555000FFFFFFFF0555F777F5FFFF55755000F0F0000
            FFF05F777F7F77775557000F0F0FFFFFFFF0777F7F7F5FFFFFF70F0F0F0F0000
            00F07F7F7F7F777777570F0F0F0FFFFFFFF07F7F7F7F5FFFFFF70F0F0F0F0000
            00F07F7F7F7F777777570F0F0F0FFFFFFFF07F7F7F7F5FFF55570F0F0F0F000F
            FFF07F7F7F7F77755FF70F0F0F0FFFFF00007F7F7F7F5FF577770F0F0F0F00FF
            0F057F7F7F7F77557F750F0F0F0FFFFF00557F7F7F7FFFFF77550F0F0F000000
            05557F7F7F77777775550F0F0000000555557F7F7777777555550F0000000555
            55557F7777777555555500000005555555557777777555555555}
          NumGlyphs = 2
          Spacing = -1
        end
        object cmdArchPokazKsiazke: TBitBtn
          Left = 130
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Poka� ksi��k�'
          HelpContext = 1003
          TabOrder = 2
          TabStop = False
          OnClick = cmdArchPokazKsiazkeClick
          Glyph.Data = {
            EE000000424DEE000000000000007600000028000000100000000F0000000100
            04000000000078000000CE0E0000C40E00001000000000000000000000000000
            80000080000000808000800000008000800080800000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEEE000EEE
            EEEEEEEEE0C0800EEEEEEEEE0CC0FFF00EEEEEE0CCC08FFFF00EEE0CCCC7008F
            FF00E0CCCC7CCC008F8E0CCCC7CCCCCC008E0CCC7CCCCCCCCC000CC7CCCCCCCC
            CC0E0C7CCCCCCCCCC0EE07CCCCCCCCCC0EEEE00CCCCCCCC0EEEEEEE00CCCCC0E
            EEEEEEEEE00CC0EEEEEEEEEEEEE00EEEEEEE}
          Spacing = -1
        end
        object cmdArchPokazUzytkownika: TBitBtn
          Left = 156
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Poka� u�ytkownika'
          HelpContext = 1004
          TabOrder = 3
          TabStop = False
          OnClick = cmdArchPokazUzytkownikaClick
          Glyph.Data = {
            F6000000424DF60000000000000076000000280000000E000000100000000100
            04000000000080000000CE0E0000C40E00001000000000000000000000000000
            80000080000000808000800000008000800080800000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00BB0000000000
            0B00BBBB0FFFFFF0BB00BBBB0FFFFF0BBB00BB0000FFF00BBB00B0FFFFFFF000
            BB00B0FFFFFFF0000B00B000FFFF00000000B0FFFFFFF00000000FFFFFFFF000
            0000B0F0FFFF00000000BB00FF0000000000BB0FFF000000000000F000000000
            00000000000000000B00000000000000BB00BB000000000BBB00}
          Spacing = -1
        end
        object cmdRapArchiwum: TBitBtn
          Left = 42
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Raport'
          HelpContext = 1011
          TabOrder = 4
          TabStop = False
          OnClick = cmdRapArchiwumClick
          Glyph.Data = {
            E6000000424DE6000000000000007600000028000000100000000E0000000100
            04000000000070000000CE0E0000C40E00001000000000000000000000000000
            80000080000000808000800000008000800080800000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00BBBBBB000BBB
            BBBBBBBB0078800BBBBBBB00777888800BBB807777788888800B8F7777F88888
            88808F77FF77788888808FFF7799777888808F77AA7778807880B88F777887F0
            788BBBB88F87FFFF0BBBBBBBB88FFFFFF0BBBBBBBBB8FFFFFF00BBBBBBBB8FFF
            88BBBBBBBBBBB888BBBB}
          Spacing = -1
        end
        object cmdPodgladArchiwum: TBitBtn
          Left = 68
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Podgl�d raportu'
          HelpContext = 1012
          TabOrder = 5
          TabStop = False
          OnClick = cmdPodgladArchiwumClick
          Glyph.Data = {
            F6000000424DF600000000000000760000002800000010000000100000000100
            04000000000080000000CE0E0000C40E00001000000000000000000000000000
            8000008000000080800080000000800080008080000080808000C0C0C0000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00AAAAAAAAAAAA
            AAAA000000000000AA000FFFFFFFFFF0A0000FFFFFFF0000700A0FFFFFF07887
            07AA0FFFFF0788E770AA0FFFFF088887A0AA0FFFFF08E887A0AA0FFFFF07EE87
            70AA0FFFFFF078870AAA0FFFFFFF0000AAAA0FFFFFFFFFF0AAAA0FFFFFFF0000
            AAAA0FFFFFFF080AAAAA0FFFFFFF00AAAAAA000000000AAAAAAA}
          Spacing = -1
        end
        object cmbSortowanieArchiwum: TComboBox
          Left = 188
          Top = 8
          Width = 153
          Height = 21
          HelpContext = 1013
          Style = csDropDownList
          ItemHeight = 13
          TabOrder = 6
          OnChange = cmbSortowanieArchiwumChange
        end
      end
      object Panel5: TPanel
        Left = 0
        Top = 33
        Width = 626
        Height = 284
        Align = alClient
        BevelInner = bvLowered
        BevelOuter = bvNone
        BorderWidth = 8
        Caption = 'Panel5'
        TabOrder = 1
        object grdArchiwum: TDBGrid
          Left = 9
          Top = 9
          Width = 608
          Height = 266
          Align = alClient
          DataSource = dsArchiwum
          Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
          TabOrder = 0
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -13
          TitleFont.Name = 'System'
          TitleFont.Style = []
          Columns = <
            item
              FieldName = 'DataZwrotu'
              Width = 90
            end
            item
              FieldName = 'DataWypozyczenia'
              Width = 133
            end
            item
              FieldName = 'Sygnatura'
              Width = 79
            end
            item
              FieldName = 'Nazwisko'
              Width = 171
            end
            item
              FieldName = 'Operator'
              Width = 114
            end>
        end
      end
      object Panel20: TPanel
        Left = 0
        Top = 317
        Width = 626
        Height = 44
        Align = alBottom
        BevelInner = bvLowered
        Caption = 'panStatusBar'
        TabOrder = 2
        object Panel21: TPanel
          Left = 2
          Top = 2
          Width = 71
          Height = 40
          Align = alLeft
          BevelOuter = bvNone
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
          object panLiczbaArchiwow: TPanel
            Left = 6
            Top = 4
            Width = 53
            Height = 19
            HelpContext = 1009
            BevelOuter = bvLowered
            TabOrder = 0
          end
        end
        object Panel23: TPanel
          Left = 73
          Top = 2
          Width = 551
          Height = 40
          HelpContext = 1010
          Align = alClient
          BevelOuter = bvNone
          BorderWidth = 4
          TabOrder = 1
          object pisPytanieArchiwum: TOPisak
            Left = 4
            Top = 4
            Width = 543
            Height = 32
            Align = alClient
            Color = clBtnFace
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentColor = False
            ParentFont = False
          end
        end
      end
    end
    object TTabPage
      Left = 4
      Top = 31
      Caption = 'Fiszki'
      object Panel10: TPanel
        Left = 0
        Top = 0
        Width = 626
        Height = 31
        Align = alTop
        BevelOuter = bvNone
        Font.Charset = EASTEUROPE_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        object SpeedButton4: TSpeedButton
          Left = 612
          Top = 4
          Width = 25
          Height = 25
          Glyph.Data = {
            EE000000424DEE000000000000007600000028000000100000000F0000000100
            0400000000007800000084120000841200001000000000000000000000000000
            8000008000000080800080000000800080008080000080808000C0C0C0000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888880088888
            8888888880088888888888880088884448880888008888444888008008888888
            8888000008888844788800000000884478880000000888844888000000888888
            4478000008874488744700008884478884440008888447888444008888884488
            744708888888844444788888888888888888}
          OnClick = cmdHelpClick
        end
        object cmdFiszkiWybieraj: TBitBtn
          Left = 6
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Wybieranie'
          HelpContext = 1000
          TabOrder = 0
          TabStop = False
          OnClick = cmdFiszkiWybierajClick
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000130B0000130B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
            333333333333333FF3FF3333333333CC30003333333333773777333333333C33
            3000333FF33337F33777339933333C3333333377F33337F3333F339933333C33
            33003377333337F33377333333333C333300333F333337F33377339333333C33
            3333337FF3333733333F33993333C33333003377FF33733333773339933C3333
            330033377FF73F33337733339933C33333333FF377F373F3333F993399333C33
            330077F377F337F33377993399333C33330077FF773337F33377399993333C33
            33333777733337F333FF333333333C33300033333333373FF7773333333333CC
            3000333333333377377733333333333333333333333333333333}
          NumGlyphs = 2
          Spacing = -1
        end
        object cmdRaportFiszek: TBitBtn
          Left = 40
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Raport'
          HelpContext = 1011
          TabOrder = 1
          TabStop = False
          OnClick = cmdRaportFiszekClick
          Glyph.Data = {
            E6000000424DE6000000000000007600000028000000100000000E0000000100
            04000000000070000000CE0E0000C40E00001000000000000000000000000000
            80000080000000808000800000008000800080800000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00BBBBBB000BBB
            BBBBBBBB0078800BBBBBBB00777888800BBB807777788888800B8F7777F88888
            88808F77FF77788888808FFF7799777888808F77AA7778807880B88F777887F0
            788BBBB88F87FFFF0BBBBBBBB88FFFFFF0BBBBBBBBB8FFFFFF00BBBBBBBB8FFF
            88BBBBBBBBBBB888BBBB}
          Spacing = -1
        end
        object cmdPokazWszystkieFiszki: TBitBtn
          Left = 102
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Poka� wszystkie fiszki'
          HelpContext = 1002
          TabOrder = 3
          TabStop = False
          OnClick = cmdPokazWszystkieFiszkiClick
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555000000
            000055555F77777777775555000FFFFFFFF0555F777F5FFFF55755000F0F0000
            FFF05F777F7F77775557000F0F0FFFFFFFF0777F7F7F5FFFFFF70F0F0F0F0000
            00F07F7F7F7F777777570F0F0F0FFFFFFFF07F7F7F7F5FFFFFF70F0F0F0F0000
            00F07F7F7F7F777777570F0F0F0FFFFFFFF07F7F7F7F5FFF55570F0F0F0F000F
            FFF07F7F7F7F77755FF70F0F0F0FFFFF00007F7F7F7F5FF577770F0F0F0F00FF
            0F057F7F7F7F77557F750F0F0F0FFFFF00557F7F7F7FFFFF77550F0F0F000000
            05557F7F7F77777775550F0F0000000555557F7F7777777555550F0000000555
            55557F7777777555555500000005555555557777777555555555}
          NumGlyphs = 2
          Spacing = -1
        end
        object cmdUsunFiszke: TBitBtn
          Left = 310
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Usuwanie fiszki'
          HelpContext = 1006
          TabOrder = 6
          TabStop = False
          OnClick = cmdUsunFiszkeClick
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333000000000
            3333333777777777F3333330F777777033333337F3F3F3F7F3333330F0808070
            33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
            33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
            333333F7F7F7F7F7F3F33030F080707030333737F7F7F7F7F7333300F0808070
            03333377F7F7F7F773333330F080707033333337F7F7F7F7F333333070707070
            33333337F7F7F7F7FF3333000000000003333377777777777F33330F88877777
            0333337FFFFFFFFF7F3333000000000003333377777777777333333330777033
            3333333337FFF7F3333333333000003333333333377777333333}
          NumGlyphs = 2
          Spacing = -1
        end
        object cmdEdytujFiszke: TBitBtn
          Left = 284
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Edytowanie fiszki'
          TabOrder = 5
          TabStop = False
          OnClick = cmdEdytujFiszkeClick
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
            000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
            00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
            F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
            0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
            FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
            FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
            0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
            00333377737FFFFF773333303300000003333337337777777333}
          NumGlyphs = 2
          Spacing = -1
        end
        object cmdPodgladFiszki: TBitBtn
          Left = 66
          Top = 6
          Width = 26
          Height = 24
          Hint = 'Podgl�d raportu'
          HelpContext = 1012
          TabOrder = 2
          TabStop = False
          OnClick = cmdPodgladFiszkiClick
          Glyph.Data = {
            F6000000424DF600000000000000760000002800000010000000100000000100
            04000000000080000000CE0E0000C40E00001000000000000000000000000000
            8000008000000080800080000000800080008080000080808000C0C0C0000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00AAAAAAAAAAAA
            AAAA000000000000AA000FFFFFFFFFF0A0000FFFFFFF0000700A0FFFFFF07887
            07AA0FFFFF0788E770AA0FFFFF088887A0AA0FFFFF08E887A0AA0FFFFF07EE87
            70AA0FFFFFF078870AAA0FFFFFFF0000AAAA0FFFFFFFFFF0AAAA0FFFFFFF0000
            AAAA0FFFFFFF080AAAAA0FFFFFFF00AAAAAA000000000AAAAAAA}
          Spacing = -1
        end
        object cmbSortowanieFiszki: TComboBox
          Left = 132
          Top = 8
          Width = 145
          Height = 21
          HelpContext = 1013
          ItemHeight = 13
          TabOrder = 4
          Text = 'cmbSortowanieFiszki'
          Visible = False
        end
      end
      object Panel11: TPanel
        Left = 0
        Top = 31
        Width = 626
        Height = 286
        Align = alClient
        BevelInner = bvLowered
        BevelOuter = bvNone
        BorderWidth = 8
        Caption = 'Panel11'
        TabOrder = 1
        object grdFiszki: TDBGrid
          Left = 9
          Top = 9
          Width = 608
          Height = 268
          Align = alClient
          DataSource = dsFiszki
          Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
          TabOrder = 0
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -13
          TitleFont.Name = 'System'
          TitleFont.Style = []
          Columns = <
            item
              FieldName = 'Sygnatura'
              Width = 108
            end
            item
              FieldName = 'Autor'
              Width = 310
            end
            item
              FieldName = 'Skrypt'
              Width = 171
            end>
        end
      end
      object Panel24: TPanel
        Left = 0
        Top = 317
        Width = 626
        Height = 44
        Align = alBottom
        BevelInner = bvLowered
        TabOrder = 2
        object Panel25: TPanel
          Left = 2
          Top = 2
          Width = 71
          Height = 40
          Align = alLeft
          BevelOuter = bvNone
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
          object panLiczbaFiszek: TPanel
            Left = 6
            Top = 4
            Width = 53
            Height = 19
            HelpContext = 1009
            BevelOuter = bvLowered
            TabOrder = 0
          end
        end
        object Panel27: TPanel
          Left = 73
          Top = 2
          Width = 551
          Height = 40
          HelpContext = 1010
          Align = alClient
          BevelOuter = bvNone
          BorderWidth = 4
          TabOrder = 1
          object pisPytanieFiszki: TOPisak
            Left = 4
            Top = 4
            Width = 543
            Height = 32
            Align = alClient
            Color = clBtnFace
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentColor = False
            ParentFont = False
          end
        end
      end
    end
  end
  object dbaseBiblioteka: TDatabase
    Connected = True
    DatabaseName = 'Biblioteka'
    DriverName = 'STANDARD'
    Params.Strings = (
      'PATH=G:\programy\biblio~1')
    SessionName = 'Default'
    Left = 535
    Top = 27
  end
  object sqlZadaniowy: TQuery
    DatabaseName = 'Biblioteka'
    Left = 285
    Top = 74
  end
  object tableKsiazkaWypozyczana: TTable
    DatabaseName = 'Biblioteka'
    IndexFieldNames = 'Sygnatura'
    TableName = 'KSIAZKI.DB'
    Left = 567
    Top = 28
  end
  object dsKsiazkaWypozyczana: TDataSource
    DataSet = tableKsiazkaWypozyczana
    Left = 519
    Top = 170
  end
  object dsArchiwum: TDataSource
    DataSet = MD.tableArchiwum
    Left = 511
    Top = 234
  end
  object dsKsiazki: TDataSource
    DataSet = MD.tableKsiazki
    Left = 431
    Top = 240
  end
  object dsUzytkownicy: TDataSource
    DataSet = MD.tableUzytkownicy
    Left = 397
    Top = 104
  end
  object dsWypozyczenia: TDataSource
    DataSet = MD.tableWypozyczenia
    Left = 353
    Top = 218
  end
  object sqlKsiazkiWypozyczone: TQuery
    DatabaseName = 'Biblioteka'
    RequestLive = True
    SQL.Strings = (

        'select Autor, Tytul, Sygnatura, DataWypozyczenia, Nr, NrKsiazki ' +
        'from WYPOZYCE')
    Left = 205
    Top = 128
  end
  object dsKsiazkiWypozyczone: TDataSource
    DataSet = sqlKsiazkiWypozyczone
    Left = 319
    Top = 158
  end
  object MainMenu1: TMainMenu
    Left = 442
    Top = 170
    object memProgram: TMenuItem
      Caption = 'Program'
      object memHasla: TMenuItem
        Caption = 'Has�a'
        OnClick = memHaslaClick
      end
      object mnuZmianaoperatora: TMenuItem
        Caption = 'Zmiana operatora'
        OnClick = mnuZmianaoperatoraClick
      end
      object mnuTworzenieSkryptow: TMenuItem
        Caption = 'Tworzenie skrypt�w'
        OnClick = mnuTworzenieSkryptowClick
      end
      object mnuUstawieniaDrukarki: TMenuItem
        Caption = 'Ustawienia drukarki'
        OnClick = mnuUstawieniaDrukarkiClick
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object memKoniec: TMenuItem
        Caption = 'Koniec'
        OnClick = memKoniecClick
      end
    end
    object mnuBazaDanych: TMenuItem
      Caption = 'Narz�dzia'
      object mnuOpcjeArchiwizacji: TMenuItem
        Caption = 'Opcje archiwizacji...'
        OnClick = mnuOpcjeArchiwizacjiClick
      end
      object mnuArchiwizacja: TMenuItem
        Caption = 'Archiwizacja...'
        OnClick = mnuArchiwizacjaClick
      end
      object mnuImportDanych: TMenuItem
        Caption = 'Imort danych...'
        OnClick = mnuImportDanychClick
      end
      object mnuUsuwanieBaz: TMenuItem
        Caption = 'Usuwanie baz..'
        OnClick = mnuUsuwanieBazClick
      end
      object mnuDiagnostyka: TMenuItem
        Caption = 'Diagnostyka...'
        OnClick = mnuDiagnostykaClick
      end
      object mnuRejestracja: TMenuItem
        Caption = 'Rejestracja...'
        OnClick = mnuRejestracjaClick
      end
      object mnuOpcje: TMenuItem
        Caption = 'Opcje...'
        OnClick = mnuOpcjeClick
      end
    end
    object memPomoc: TMenuItem
      Caption = 'Pomoc'
      object mnuSpisTresci: TMenuItem
        Caption = 'Spis tre�ci...'
        OnClick = mnuSpisTresciClick
      end
      object N2: TMenuItem
        Caption = '-'
      end
      object mnuZamowienie: TMenuItem
        Caption = 'Zam�wienie programu...'
        OnClick = mnuZamowienieClick
      end
      object mnuOProgramie: TMenuItem
        Caption = 'O programie...'
        OnClick = mnuOProgramieClick
      end
      object mnuOAutorze: TMenuItem
        Caption = 'O autorze...'
        OnClick = mnuOAutorzeClick
      end
    end
  end
  object dsFiszki: TDataSource
    DataSet = MD.tableFiszki
    Left = 390
    Top = 138
  end
  object tmrCzasHasla: TTimer
    Enabled = False
    OnTimer = tmrCzasHaslaTimer
    Left = 547
    Top = 125
  end
  object PrinterSetupDialog: TPrinterSetupDialog
    Left = 496
    Top = 119
  end
end