object MN_FRM: TMN_FRM Left = 191 Top = 106 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 = 654 Top = 556 Width = 131 Height = 13 Alignment = taRightJustify Caption = 'EmZet Computing 2003' 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 = 81 Height = 13 Caption = 'BazaPrg 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 programy' Flat = True OnClick = SpeedButton1Click end object SpeedButton2: TSpeedButton Left = 116 Top = 4 Width = 105 Height = 22 GroupIndex = 1 Caption = 'Wy&dania' Flat = True OnClick = SpeedButton2Click end object SpeedButton4: TSpeedButton Left = 228 Top = 4 Width = 105 Height = 22 GroupIndex = 1 Caption = 'Wy&szukiwanie' Flat = True OnClick = SpeedButton4Click end object WS_PN: TPanel Left = 2 Top = 32 Width = 395 Height = 513 BevelOuter = bvNone TabOrder = 2 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 = 298 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 = 124 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 = 127 Height = 13 Caption = 'Wpisz poszukiwane has'#322'o:' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = 11 Font.Name = 'MS Sans Serif' Font.Pitch = fpVariable Font.Style = [] ParentFont = False end object Label2: TLabel Left = 8 Top = 200 Width = 78 Height = 13 Caption = 'Warunki og'#243'lne:' 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 end object WSLB: TListBox Left = 8 Top = 318 Width = 377 Height = 180 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 = 96 Width = 89 Height = 24 Caption = 'w nazwie' 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 = TTCBClick end object OPCB: TCheckBox Left = 8 Top = 72 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 = 1 OnClick = OPCBClick end object TWCB: TCheckBox Left = 8 Top = 142 Width = 113 Height = 24 Caption = 'tylko na p'#322'ycie:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'Microsoft Sans Serif' Font.Pitch = fpVariable Font.Style = [] ParentFont = False TabOrder = 3 OnClick = TWCBClick end object WDCB: TComboBox Left = 128 Top = 143 Width = 257 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 = 4 OnChange = WDCBChange end object GroupBox1: TGroupBox Left = 7 Top = 216 Width = 378 Height = 75 Caption = ' has'#322'o jest: ' Ctl3D = True Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentCtl3D = False ParentFont = False TabOrder = 6 object Label8: TLabel Left = 30 Top = 54 Width = 316 Height = 13 Caption = '(wyizolowanym przez spacje, znaki przestankowe i znaki specjalne' + ')' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object KCZRB: TRadioButton Left = 12 Top = 38 Width = 205 Height = 17 Caption = 'kompletnym ci'#261'giem znak'#243'w' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 end object DFPRB: TRadioButton Left = 12 Top = 20 Width = 309 Height = 17 Caption = 'dowolnym fragmentem przeszukiwanego pola' Checked = True Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 TabStop = True end end object TTBGCB: TCheckBox Left = 8 Top = 170 Width = 377 Height = 24 Caption = 'has'#322'o jest pocz'#261'tkiem nazwy programu' 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 = TTBGCBClick end object BitBtn1: TBitBtn Left = 304 Top = 64 Width = 83 Height = 25 Caption = 'Szukaj' Default = True Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 7 OnClick = SpeedButton7Click end end object WD_PN: TPanel Left = 2 Top = 32 Width = 395 Height = 513 BevelOuter = bvNone TabOrder = 0 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 = [] HideSelection = False Indent = 19 ParentFont = False ReadOnly = True TabOrder = 0 OnChange = WDTVChange OnClick = WDTVClick end end object WA_PN: TPanel Left = 2 Top = 32 Width = 395 Height = 513 BevelOuter = bvNone TabOrder = 3 object Label3: TLabel Left = 8 Top = 7 Width = 274 Height = 13 Caption = 'Wpisz pocz'#261'tkowe litery nazwy poszukiwanego programu:' 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 = 248 Top = 56 Width = 89 Height = 13 Caption = 'Liczba program'#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 LB_PRG_CNT: TLabel Left = 336 Top = 56 Width = 48 Height = 13 Alignment = taRightJustify AutoSize = False Caption = '0000' 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 = 56 Width = 144 Height = 13 Caption = 'Nazwy wszystkich program'#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 WPED: 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 = WPEDChange end object WPTV: TTreeView Left = 8 Top = 72 Width = 377 Height = 426 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'Microsoft Sans Serif' Font.Pitch = fpVariable Font.Style = [] HideSelection = False Indent = 18 ParentFont = False ReadOnly = True TabOrder = 1 OnChange = WPTVChange OnClick = WPTVClick 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 = 1 object Label12: TLabel Left = 8 Top = 8 Width = 52 Height = 13 Caption = 'Informacje:' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = 11 Font.Name = 'MS Sans Serif' Font.Pitch = fpVariable Font.Style = [] ParentFont = False end object INFOAD: TLabel Left = 8 Top = 482 Width = 66 Height = 16 Cursor = crHandPoint 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 object ADLB: TLabel Left = 8 Top = 468 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 INFORE: TRichEdit Left = 8 Top = 24 Width = 369 Height = 441 TabStop = False BorderWidth = 3 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 0 end end end end