object MN_FRM: TMN_FRM Left = 195 Top = 111 BorderIcons = [biSystemMenu, biMinimize] BorderStyle = bsSingle Caption = 'MN_FRM' ClientHeight = 425 ClientWidth = 804 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = True Scaled = False OnCreate = FormCreate OnDestroy = FormDestroy PixelsPerInch = 96 TextHeight = 13 object IK1: TImage Left = 734 Top = 40 Width = 32 Height = 32 Picture.Data = {} Visible = False end object IK4: TImage Left = 734 Top = 160 Width = 32 Height = 32 Picture.Data = {} Visible = False end object IK3: TImage Left = 734 Top = 120 Width = 32 Height = 32 Picture.Data = {} Visible = False end object IK2: TImage Left = 734 Top = 80 Width = 32 Height = 32 Picture.Data = {} Visible = False end object PLB_PB: TPaintBox Left = 8 Top = 72 Width = 280 Height = 302 Color = clSilver ParentColor = False end object IKD: TImage Left = 734 Top = 200 Width = 32 Height = 32 Picture.Data = {} Visible = False end object IKFT: TImage Left = 734 Top = 240 Width = 32 Height = 32 Picture.Data = {} Visible = False end object IKFO: TImage Left = 734 Top = 280 Width = 32 Height = 32 Picture.Data = {} Visible = False end object PAGECTRL: TPageControl Left = 8 Top = 8 Width = 401 Height = 409 ActivePage = WAPAGE Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 0 OnChange = PAGECTRLChange object WAPAGE: TTabSheet Caption = ' Wszystkie artyku�y ' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False object Label2: TLabel Left = 8 Top = 6 Width = 224 Height = 13 Caption = 'Wpisz pocz�tkowe litery poszukiwanego tytu�u:' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object WAPB: TPaintBox Left = 8 Top = 48 Width = 361 Height = 326 Color = clSilver ParentColor = False OnMouseDown = WAPBMouseDown OnPaint = WAPBPaint end object WAED: TEdit Left = 8 Top = 22 Width = 377 Height = 19 Ctl3D = False Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentCtl3D = False ParentFont = False TabOrder = 0 OnChange = WAEDChange end object WASB: TScrollBar Left = 372 Top = 49 Width = 13 Height = 325 Kind = sbVertical PageSize = 0 TabOrder = 1 OnChange = WASBChange end end object KTPAGE: TTabSheet Caption = ' Kategorie ' object KTTABPAGE: TTabControl Left = 6 Top = 6 Width = 379 Height = 371 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 Tabs.Strings = ( ' Wydania ' ' Dzia�y ' ' Autorzy ' ' Oprogramowanie ' ' Sprz�t ' ' R�ne ') TabIndex = 0 OnChange = KTTABPAGEChange object KTPB: TPaintBox Left = 8 Top = 34 Width = 345 Height = 326 Color = clSilver ParentColor = False OnMouseDown = KTPBMouseDown OnPaint = KTPBPaint end object KTSB: TScrollBar Left = 356 Top = 35 Width = 13 Height = 325 Kind = sbVertical PageSize = 0 TabOrder = 0 OnChange = KTSBChange end object DRB98: TRadioButton Left = 8 Top = 32 Width = 49 Height = 17 Caption = '1998' TabOrder = 1 Visible = False OnClick = DRBXXClick end object DRB99: TRadioButton Left = 64 Top = 32 Width = 81 Height = 17 Caption = '1999/2000' Checked = True TabOrder = 2 TabStop = True Visible = False OnClick = DRBXXClick end end end object WSPAGE: TTabSheet Caption = ' Wyszukiwanie ' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False object Label1: TLabel Left = 8 Top = 8 Width = 98 Height = 13 Caption = 'Poszukiwane s�owo:' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label3: TLabel Left = 8 Top = 48 Width = 35 Height = 13 Caption = 'Szukaj:' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object SEARCHBTN: TSpeedButton Left = 184 Top = 59 Width = 97 Height = 35 Caption = 'Szukaj' Font.Charset = DEFAULT_CHARSET Font.Color = clRed Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False OnClick = SEARCHBTNClick end object WSPB: TPaintBox Left = 8 Top = 228 Width = 361 Height = 146 Color = clSilver ParentColor = False OnMouseDown = WSPBMouseDown OnPaint = WSPBPaint end object Label5: TLabel Left = 8 Top = 210 Width = 134 Height = 13 Caption = 'Znalezione tytu�y artyku��w:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Image2: TImage Left = 89 Top = 64 Width = 16 Height = 17 Picture.Data = {} end object Image3: TImage Left = 89 Top = 88 Width = 16 Height = 17 Picture.Data = {} end object CBTYTUL: TCheckBox Left = 8 Top = 64 Width = 81 Height = 17 Caption = ' w tytule ==>' Checked = True Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False State = cbChecked TabOrder = 1 end object CBOPIS: TCheckBox Left = 8 Top = 88 Width = 81 Height = 17 Caption = ' w opisie ==>' Checked = True Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False State = cbChecked TabOrder = 2 end object WSED: TEdit Left = 8 Top = 24 Width = 377 Height = 19 Ctl3D = False ParentCtl3D = False TabOrder = 0 end object CBKAT: TCheckBox Left = 8 Top = 136 Width = 73 Height = 17 Caption = ' w kategorii ' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 5 OnClick = CBKATClick end object CBDZIAL: TCheckBox Left = 8 Top = 112 Width = 73 Height = 17 Caption = ' w dziale ' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 3 OnClick = CBDZIALClick end object DZIALCB: TComboBox Left = 88 Top = 110 Width = 297 Height = 21 Ctl3D = False DropDownCount = 19 Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 0 ParentCtl3D = False ParentFont = False TabOrder = 4 Text = 'DZIALCB' OnChange = DZIALCBChange end object KATCB: TComboBox Left = 88 Top = 134 Width = 297 Height = 21 Ctl3D = False DropDownCount = 17 Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 0 ParentCtl3D = False ParentFont = False TabOrder = 6 Text = 'KATCB' OnChange = KATCBChange end object SEARCHPB: TProgressBar Left = 9 Top = 187 Width = 373 Height = 17 Min = 0 Max = 100 TabOrder = 10 end object WSSB: TScrollBar Left = 372 Top = 229 Width = 13 Height = 145 Kind = sbVertical PageSize = 0 TabOrder = 9 OnChange = WSSBChange end object AUTORCB: TComboBox Left = 88 Top = 158 Width = 297 Height = 21 Ctl3D = False DropDownCount = 15 Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 0 ParentCtl3D = False ParentFont = False TabOrder = 8 Text = 'AUTORCB' OnChange = AUTORCBChange end object CBAUTOR: TCheckBox Left = 8 Top = 160 Width = 62 Height = 17 Caption = ' u autora ' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 7 OnClick = CBAUTORClick end end object ISPAGE: TTabSheet Caption = ' Indeks ' object Label4: TLabel Left = 8 Top = 6 Width = 209 Height = 13 Caption = 'Wpisz pocz�tkowe litery s�owa kluczowego:' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object SKPB: TPaintBox Left = 8 Top = 66 Width = 361 Height = 110 Color = clSilver ParentColor = False OnMouseDown = SKPBMouseDown OnPaint = SKPBPaint end object Label6: TLabel Left = 8 Top = 210 Width = 134 Height = 13 Caption = 'Znalezione tytu�y artyku��w:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object ZAPB: TPaintBox Left = 8 Top = 228 Width = 361 Height = 146 Color = clSilver ParentColor = False OnMouseDown = ZAPBMouseDown OnPaint = ZAPBPaint end object Label7: TLabel Left = 8 Top = 48 Width = 127 Height = 13 Caption = 'Pasuj�ce s�owa kluczowe:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object ISED: TEdit Left = 8 Top = 22 Width = 377 Height = 19 Ctl3D = False Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentCtl3D = False ParentFont = False TabOrder = 0 OnChange = ISEDChange end object SKSB: TScrollBar Left = 372 Top = 67 Width = 13 Height = 109 Kind = sbVertical PageSize = 0 TabOrder = 1 OnChange = SKSBChange end object ZASB: TScrollBar Left = 372 Top = 229 Width = 13 Height = 145 Kind = sbVertical PageSize = 0 TabOrder = 2 OnChange = ZASBChange end object SRCHSKPB: TProgressBar Left = 9 Top = 187 Width = 373 Height = 17 Min = 0 Max = 100 TabOrder = 3 end end end object Panel1: TPanel Left = 416 Top = 136 Width = 209 Height = 281 BevelWidth = 2 Ctl3D = False ParentCtl3D = False TabOrder = 1 object Label8: TLabel Left = 8 Top = 8 Width = 45 Height = 13 Caption = 'Wydanie:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label9: TLabel Left = 8 Top = 48 Width = 28 Height = 13 Caption = 'Dzia�:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label10: TLabel Left = 112 Top = 8 Width = 34 Height = 13 Caption = 'Strona:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label11: TLabel Left = 8 Top = 88 Width = 28 Height = 13 Caption = 'Autor:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label12: TLabel Left = 8 Top = 158 Width = 24 Height = 13 Caption = 'Opis:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object SIIWED: TEdit Left = 8 Top = 24 Width = 89 Height = 17 BorderStyle = bsNone Color = clWhite Ctl3D = False Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentCtl3D = False ParentFont = False TabOrder = 0 end object SIIDED: TEdit Left = 8 Top = 64 Width = 193 Height = 17 BorderStyle = bsNone Color = clWhite Ctl3D = False Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentCtl3D = False ParentFont = False TabOrder = 1 end object SIISED: TEdit Left = 112 Top = 24 Width = 89 Height = 17 BorderStyle = bsNone Color = clWhite Ctl3D = False Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentCtl3D = False ParentFont = False TabOrder = 2 end object SIIOMO: TMemo Left = 8 Top = 176 Width = 193 Height = 97 BorderStyle = bsNone Color = clWhite Ctl3D = False Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentCtl3D = False ParentFont = False ReadOnly = True ScrollBars = ssVertical TabOrder = 3 end object SIIAMO: TMemo Left = 8 Top = 104 Width = 193 Height = 49 BorderStyle = bsNone Color = clWhite Ctl3D = False Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentCtl3D = False ParentFont = False ReadOnly = True ScrollBars = ssVertical TabOrder = 4 WantReturns = False end end object Panel2: TPanel Left = 416 Top = 31 Width = 209 Height = 105 BevelWidth = 2 Caption = 'Panel2' Ctl3D = False ParentCtl3D = False TabOrder = 2 object Image1: TImage Left = 4 Top = 4 Width = 201 Height = 97 Picture.Data = {} end end object Panel3: TPanel Left = 416 Top = 8 Width = 209 Height = 23 BevelWidth = 2 Caption = '(C) EmZet Computing 1999' Ctl3D = False Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentCtl3D = False ParentFont = False TabOrder = 3 end end