home *** CD-ROM | disk | FTP | other *** search
- object SearchForm: TSearchForm
- Left = 299
- Top = 170
- Width = 264
- Height = 384
- BorderIcons = [biSystemMenu, biMinimize]
- BorderStyle = bsSizeToolWin
- Caption = 'Menu Navigator'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- FormStyle = fsStayOnTop
- Icon.Data = {<image000.ico>}
- OldCreateOrder = True
- OnActivate = FormActivate
- OnDestroy = FormDestroy
- OnDeactivate = FormDeactivate
- PixelsPerInch = 96
- TextHeight = 13
- object Panel1: TPanel
- Left = 0
- Top = 0
- Width = 256
- Height = 120
- Align = alTop
- BevelOuter = bvNone
- Caption = ' '
- TabOrder = 0
- object Label1: TLabel
- Left = 6
- Top = 2
- Width = 211
- Height = 13
- AutoSize = False
- Caption = 'Enter search string :'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Ed_search: TEdit
- Left = 6
- Top = 19
- Width = 125
- Height = 21
- TabOrder = 0
- Text = ' '
- OnChange = Ed_searchChange
- OnKeyPress = Ed_searchKeyPress
- end
- object Bt_search: TButton
- Left = 136
- Top = 17
- Width = 79
- Height = 25
- Caption = 'Find'
- TabOrder = 1
- OnClick = Bt_searchClick
- end
- object CB_TreeV: TCheckBox
- Left = 6
- Top = 51
- Width = 210
- Height = 17
- Caption = 'Tree view'
- TabOrder = 2
- OnClick = CB_TreeVClick
- end
- object CB_FastNav: TCheckBox
- Left = 6
- Top = 67
- Width = 210
- Height = 17
- Caption = 'Fast navigate'
- Checked = True
- State = cbChecked
- TabOrder = 3
- end
- object CB_FastS: TCheckBox
- Left = 6
- Top = 83
- Width = 210
- Height = 17
- Caption = 'Fast search'
- Checked = True
- State = cbChecked
- TabOrder = 4
- end
- object CB_AutoH: TCheckBox
- Left = 6
- Top = 99
- Width = 210
- Height = 17
- Caption = 'Auto hide'
- Checked = True
- State = cbChecked
- TabOrder = 5
- end
- end
- object Panel2: TPanel
- Left = 0
- Top = 324
- Width = 256
- Height = 32
- Align = alBottom
- BevelOuter = bvNone
- Caption = ' '
- TabOrder = 1
- object Bt_Navigate: TButton
- Left = 16
- Top = 4
- Width = 97
- Height = 25
- Caption = 'Navigate'
- TabOrder = 0
- OnClick = Bt_NavigateClick
- end
- object Bt_Do: TButton
- Left = 128
- Top = 4
- Width = 91
- Height = 25
- Caption = 'Execute'
- TabOrder = 1
- OnClick = Bt_DoClick
- end
- end
- object Panel3: TPanel
- Left = 0
- Top = 120
- Width = 256
- Height = 204
- Align = alClient
- BevelOuter = bvLowered
- Caption = ' '
- TabOrder = 2
- object TreeView1: TTreeView
- Left = 1
- Top = 1
- Width = 254
- Height = 202
- Align = alClient
- Indent = 19
- ReadOnly = True
- TabOrder = 0
- Visible = False
- OnClick = TreeView1Click
- end
- object Memo1: TMemo
- Left = 1
- Top = 1
- Width = 254
- Height = 202
- Align = alClient
- Lines.Strings = (
- ' ')
- ReadOnly = True
- ScrollBars = ssBoth
- TabOrder = 1
- WordWrap = False
- OnClick = Memo1Click
- end
- end
- object Timer1: TTimer
- Enabled = False
- Interval = 10000
- OnTimer = Timer1Timer
- Left = 8
- Top = 88
- end
- end
-