object MN_FRM: TMN_FRM
  Left = 181
  Top = 65
  ActiveControl = WAED
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'MN_FRM'
  ClientHeight = 573
  ClientWidth = 792
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = True
  Position = poScreenCenter
  OnActivate = FormActivate
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel2: TBevel
    Left = 4
    Top = 553
    Width = 786
    Height = 19
  end
  object Label1: TLabel
    Left = 655
    Top = 556
    Width = 131
    Height = 13
    Caption = 'EmZet Computing 2002'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clNavy
    Font.Height = -11
    Font.Name = 'Microsoft Sans Serif'
    Font.Pitch = fpVariable
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label21: TLabel
    Left = 8
    Top = 556
    Width = 78
    Height = 13
    Caption = 'BazaArt II 1.0'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clNavy
    Font.Height = -11
    Font.Name = 'Microsoft Sans Serif'
    Font.Pitch = fpVariable
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Panel7: TPanel
    Left = 4
    Top = 4
    Width = 786
    Height = 546
    BevelOuter = bvLowered
    TabOrder = 0
    object Bevel1: TBevel
      Left = 1
      Top = 22
      Width = 790
      Height = 10
      Shape = bsBottomLine
    end
    object SpeedButton1: TSpeedButton
      Left = 4
      Top = 4
      Width = 105
      Height = 22
      GroupIndex = 1
      Down = True
      Caption = 'Wszystkie artyku'#322'y'
      Flat = True
      OnClick = SpeedButton1Click
    end
    object SpeedButton2: TSpeedButton
      Left = 116
      Top = 4
      Width = 105
      Height = 22
      GroupIndex = 1
      Caption = 'Wydania'
      Flat = True
      OnClick = SpeedButton2Click
    end
    object SpeedButton3: TSpeedButton
      Left = 228
      Top = 4
      Width = 105
      Height = 22
      GroupIndex = 1
      Caption = 'Autorzy'
      Flat = True
      OnClick = SpeedButton3Click
    end
    object SpeedButton4: TSpeedButton
      Left = 340
      Top = 4
      Width = 105
      Height = 22
      GroupIndex = 1
      Caption = 'Wyszukiwanie'
      Flat = True
      OnClick = SpeedButton4Click
    end
    object SpeedButton5: TSpeedButton
      Left = 452
      Top = 4
      Width = 105
      Height = 22
      GroupIndex = 1
      Caption = 'S'#322'owa kluczowe'
      Flat = True
      OnClick = SpeedButton5Click
    end
    object SpeedButton6: TSpeedButton
      Left = 564
      Top = 4
      Width = 105
      Height = 22
      GroupIndex = 1
      Caption = 'Indeks produkt'#243'w'
      Flat = True
      OnClick = SpeedButton6Click
    end
    object IP_PN: TPanel
      Left = 2
      Top = 32
      Width = 783
      Height = 513
      BevelOuter = bvNone
      TabOrder = 4
      object Label16: TLabel
        Left = 8
        Top = 6
        Width = 272
        Height = 13
        Caption = 'Wpisz pocz'#261'tkowe litery nazwy poszukiwanego produktu:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = 11
        Font.Name = 'MS Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
      end
      object Label18: TLabel
        Left = 8
        Top = 54
        Width = 72
        Height = 13
        Caption = 'Indeks sprz'#281'tu:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = 11
        Font.Name = 'MS Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
      end
      object Label19: TLabel
        Left = 400
        Top = 54
        Width = 116
        Height = 13
        Caption = 'Indeks oprogramowania:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = 11
        Font.Name = 'MS Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
      end
      object Label20: TLabel
        Left = 400
        Top = 6
        Width = 272
        Height = 13
        Caption = 'Wpisz pocz'#261'tkowe litery nazwy poszukiwanego produktu:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = 11
        Font.Name = 'MS Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
      end
      object ISED: TEdit
        Left = 8
        Top = 24
        Width = 377
        Height = 24
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Microsoft Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        OnChange = ISEDChange
      end
      object ISSG: TStringGrid
        Left = 8
        Top = 72
        Width = 377
        Height = 433
        ColCount = 3
        DefaultColWidth = 120
        DefaultRowHeight = 20
        FixedCols = 0
        RowCount = 100
        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine]
        ScrollBars = ssVertical
        TabOrder = 1
      end
      object IOED: TEdit
        Left = 400
        Top = 24
        Width = 377
        Height = 24
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Microsoft Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        OnChange = IOEDChange
      end
      object IOSG: TStringGrid
        Left = 400
        Top = 72
        Width = 377
        Height = 433
        ColCount = 3
        DefaultRowHeight = 20
        FixedCols = 0
        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine]
        ScrollBars = ssVertical
        TabOrder = 3
      end
    end
    object SK_PN: TPanel
      Left = 2
      Top = 32
      Width = 395
      Height = 513
      BevelOuter = bvNone
      TabOrder = 5
      object Label13: TLabel
        Left = 8
        Top = 6
        Width = 209
        Height = 13
        Caption = 'Wpisz pocz'#261'tkowe litery s'#322'owa kluczowego:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = 11
        Font.Name = 'MS Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
      end
      object Label14: TLabel
        Left = 8
        Top = 56
        Width = 127
        Height = 13
        Caption = 'Pasuj'#261'ce s'#322'owa kluczowe:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = 11
        Font.Name = 'MS Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
      end
      object Label15: TLabel
        Left = 8
        Top = 282
        Width = 134
        Height = 13
        Caption = 'Znalezione tytu'#322'y artyku'#322#243'w:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = 11
        Font.Name = 'MS Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
      end
      object SKED: TEdit
        Left = 8
        Top = 24
        Width = 377
        Height = 24
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Microsoft Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        OnChange = SKEDChange
      end
      object SKLB1: TListBox
        Left = 8
        Top = 72
        Width = 377
        Height = 201
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Microsoft Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ItemHeight = 16
        ParentFont = False
        TabOrder = 1
        OnClick = SKLB1Click
      end
      object SKLB2: TListBox
        Left = 8
        Top = 296
        Width = 377
        Height = 196
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Microsoft Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        IntegralHeight = True
        ItemHeight = 16
        ParentFont = False
        TabOrder = 2
        OnClick = SKLB2Click
      end
    end
    object WS_PN: TPanel
      Left = 2
      Top = 32
      Width = 395
      Height = 513
      BevelOuter = bvNone
      TabOrder = 6
      object SpeedButton7: TSpeedButton
        Left = 296
        Top = 72
        Width = 89
        Height = 25
        Caption = 'Szukaj'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Microsoft Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
        OnClick = SpeedButton7Click
      end
      object Label2: TLabel
        Left = 8
        Top = 8
        Width = 98
        Height = 13
        Caption = 'Poszukiwane s'#322'owo:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = 11
        Font.Name = 'MS Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
      end
      object Label4: TLabel
        Left = 8
        Top = 56
        Width = 110
        Height = 13
        Caption = 'Warunki rozszerzaj'#261'ce:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = 11
        Font.Name = 'MS Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
      end
      object Label5: TLabel
        Left = 8
        Top = 234
        Width = 134
        Height = 13
        Caption = 'Znalezione tytu'#322'y artyku'#322#243'w:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = 11
        Font.Name = 'MS Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
      end
      object Label6: TLabel
        Left = 8
        Top = 152
        Width = 112
        Height = 13
        Caption = 'Warunki ograniczaj'#261'ce:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = 11
        Font.Name = 'MS Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
      end
      object Label17: TLabel
        Left = 8
        Top = 6
        Width = 272
        Height = 13
        Caption = 'Wpisz pocz'#261'tkowe litery nazwy poszukiwanego produktu:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = 11
        Font.Name = 'MS Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
      end
      object WSED: TEdit
        Left = 8
        Top = 24
        Width = 377
        Height = 24
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Microsoft Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        OnChange = SKEDChange
      end
      object WSLB: TListBox
        Left = 8
        Top = 248
        Width = 377
        Height = 244
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Microsoft Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        IntegralHeight = True
        ItemHeight = 16
        ParentFont = False
        TabOrder = 8
        OnClick = WSLBClick
      end
      object TTCB: TCheckBox
        Left = 8
        Top = 72
        Width = 73
        Height = 24
        Caption = 'w tytule'
        Checked = True
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Microsoft Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
        State = cbChecked
        TabOrder = 1
        OnClick = TTCBClick
      end
      object OPCB: TCheckBox
        Left = 8
        Top = 96
        Width = 81
        Height = 24
        Caption = 'w opisie'
        Checked = True
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Microsoft Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
        State = cbChecked
        TabOrder = 2
        OnClick = OPCBClick
      end
      object SKCB: TCheckBox
        Left = 8
        Top = 120
        Width = 169
        Height = 24
        Caption = 'w s'#322'owach kluczowych'
        Checked = True
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Microsoft Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
        State = cbChecked
        TabOrder = 3
        OnClick = SKCBClick
      end
      object TACB: TCheckBox
        Left = 8
        Top = 200
        Width = 113
        Height = 24
        Caption = 'tylko u autora:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Microsoft Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
        TabOrder = 5
        OnClick = TACBClick
      end
      object AUCB: TComboBox
        Left = 120
        Top = 203
        Width = 265
        Height = 24
        Style = csDropDownList
        DropDownCount = 15
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Microsoft Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ItemHeight = 16
        ParentFont = False
        TabOrder = 6
        OnChange = AUCBChange
      end
      object TDCB: TCheckBox
        Left = 8
        Top = 168
        Width = 113
        Height = 24
        Caption = 'tylko w dziale:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Microsoft Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
        TabOrder = 4
        OnClick = TDCBClick
      end
      object DZCB: TComboBox
        Left = 120
        Top = 171
        Width = 265
        Height = 24
        Style = csDropDownList
        DropDownCount = 15
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Microsoft Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ItemHeight = 16
        ParentFont = False
        TabOrder = 7
        OnChange = DZCBChange
      end
    end
    object WD_PN: TPanel
      Left = 2
      Top = 32
      Width = 395
      Height = 513
      BevelOuter = bvNone
      TabOrder = 1
      object WDTV: TTreeView
        Left = 8
        Top = 8
        Width = 377
        Height = 490
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Microsoft Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        Indent = 19
        ParentFont = False
        ReadOnly = True
        TabOrder = 0
        OnChange = WDTVChange
        OnClick = WDTVClick
      end
    end
    object AT_PN: TPanel
      Left = 2
      Top = 32
      Width = 395
      Height = 513
      BevelOuter = bvNone
      TabOrder = 3
      object ATTV: TTreeView
        Left = 8
        Top = 8
        Width = 377
        Height = 490
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Microsoft Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        Indent = 19
        ParentFont = False
        ReadOnly = True
        TabOrder = 0
        OnChange = ATTVChange
        OnClick = ATTVClick
      end
    end
    object WA_PN: TPanel
      Left = 2
      Top = 32
      Width = 395
      Height = 513
      BevelOuter = bvNone
      TabOrder = 0
      object Label3: TLabel
        Left = 8
        Top = 6
        Width = 224
        Height = 13
        Caption = 'Wpisz pocz'#261'tkowe litery poszukiwanego tytu'#322'u:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = 11
        Font.Name = 'MS Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
      end
      object Label7: TLabel
        Left = 8
        Top = 54
        Width = 137
        Height = 13
        Caption = 'Tytu'#322'y wszystkich artyku'#322#243'w:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = 11
        Font.Name = 'MS Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
      end
      object WAED: TEdit
        Left = 8
        Top = 24
        Width = 377
        Height = 24
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Microsoft Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        OnChange = WAEDChange
      end
      object WALB: TListBox
        Left = 8
        Top = 72
        Width = 377
        Height = 420
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Microsoft Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        IntegralHeight = True
        ItemHeight = 16
        ParentFont = False
        TabOrder = 1
        OnClick = WALBClick
      end
    end
    object INFO_PN: TPanel
      Left = 397
      Top = 32
      Width = 388
      Height = 513
      BevelOuter = bvNone
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      object Label8: TLabel
        Left = 8
        Top = 8
        Width = 45
        Height = 13
        Caption = 'Wydanie:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = 11
        Font.Name = 'MS Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
      end
      object Label10: TLabel
        Left = 8
        Top = 58
        Width = 34
        Height = 13
        Caption = 'Strona:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = 11
        Font.Name = 'MS Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
      end
      object Label9: TLabel
        Left = 8
        Top = 106
        Width = 28
        Height = 13
        Caption = 'Dzia'#322':'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = 11
        Font.Name = 'MS Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
      end
      object Label11: TLabel
        Left = 8
        Top = 154
        Width = 28
        Height = 13
        Caption = 'Autor:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = 11
        Font.Name = 'MS Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
      end
      object Label12: TLabel
        Left = 8
        Top = 224
        Width = 24
        Height = 13
        Caption = 'Opis:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = 11
        Font.Name = 'MS Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
      end
      object ONLINEBM: TImage
        Left = 93
        Top = 400
        Width = 199
        Height = 94
        Cursor = crHandPoint
        AutoSize = True
        Picture.Data = {<image000.bmp>}
        Visible = False
        OnClick = ONLINEBMClick
      end
      object ADLB: TLabel
        Left = 8
        Top = 344
        Width = 66
        Height = 13
        Caption = 'Adres WWW:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = 11
        Font.Name = 'MS Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
      end
      object INFOWD: TPanel
        Left = 8
        Top = 24
        Width = 369
        Height = 25
        Alignment = taLeftJustify
        BevelInner = bvLowered
        BevelOuter = bvLowered
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Microsoft Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
        TabOrder = 0
      end
      object INFOST: TPanel
        Left = 8
        Top = 72
        Width = 369
        Height = 25
        Alignment = taLeftJustify
        BevelInner = bvLowered
        BevelOuter = bvLowered
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Microsoft Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
        TabOrder = 1
      end
      object INFODZ: TPanel
        Left = 8
        Top = 120
        Width = 369
        Height = 25
        Alignment = taLeftJustify
        BevelInner = bvLowered
        BevelOuter = bvLowered
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Microsoft Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
        TabOrder = 2
      end
      object INFOMO: TMemo
        Left = 8
        Top = 240
        Width = 369
        Height = 97
        TabStop = False
        Color = clBtnFace
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Microsoft Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
        ReadOnly = True
        TabOrder = 3
      end
      object INFOAU: TMemo
        Left = 8
        Top = 168
        Width = 369
        Height = 49
        TabStop = False
        Color = clBtnFace
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Microsoft Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
        ReadOnly = True
        TabOrder = 4
      end
      object Panel1: TPanel
        Left = 8
        Top = 360
        Width = 369
        Height = 25
        Alignment = taLeftJustify
        BevelInner = bvLowered
        BevelOuter = bvLowered
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Microsoft Sans Serif'
        Font.Pitch = fpVariable
        Font.Style = []
        ParentFont = False
        TabOrder = 5
        object INFOAD: TLabel
          Left = 4
          Top = 4
          Width = 362
          Height = 16
          Cursor = crHandPoint
          AutoSize = False
          Caption = 'Adres www'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlue
          Font.Height = -13
          Font.Name = 'Microsoft Sans Serif'
          Font.Pitch = fpVariable
          Font.Style = [fsUnderline]
          ParentFont = False
          OnClick = INFOADClick
        end
      end
    end
  end
end