home *** CD-ROM | disk | FTP | other *** search
- object frmOptions: TfrmOptions
- Left = 166
- Top = 248
- Width = 384
- Height = 315
- Hint = 'Options'
- ActiveControl = edtBrowser
- BorderIcons = [biSystemMenu]
- Caption = 'Options'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Icon.Data = {<image000.ico>}
- Position = poScreenCenter
- Scaled = False
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object Bevel1: TBevel
- Left = 8
- Top = 8
- Width = 361
- Height = 225
- end
- object lbledtBrowser: TEnhLabel
- Left = 16
- Top = 15
- Width = 98
- Height = 13
- Caption = '&Web Browser Name:'
- FocusControl = edtBrowser
- end
- object btnBrowserName: TSpeedButton
- Left = 332
- Top = 28
- Width = 25
- Height = 25
- Hint = '|Select browser name'
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
- 5555555555555555555555555555555555555555555555555555555555555555
- 555555555555555555555555555555555555555FFFFFFFFFF555550000000000
- 55555577777777775F55500B8B8B8B8B05555775F555555575F550F0B8B8B8B8
- B05557F75F555555575F50BF0B8B8B8B8B0557F575FFFFFFFF7F50FBF0000000
- 000557F557777777777550BFBFBFBFB0555557F555555557F55550FBFBFBFBF0
- 555557F555555FF7555550BFBFBF00055555575F555577755555550BFBF05555
- 55555575FFF75555555555700007555555555557777555555555555555555555
- 5555555555555555555555555555555555555555555555555555}
- NumGlyphs = 2
- OnClick = btnBrowserNameClick
- end
- object lbledtDefOutName: TEnhLabel
- Left = 16
- Top = 59
- Width = 103
- Height = 13
- Caption = 'Default &Output Name:'
- FocusControl = edtDefOutName
- end
- object btnOutputName: TSpeedButton
- Left = 332
- Top = 73
- Width = 25
- Height = 25
- Hint = '|Select output name'
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
- 5555555555555555555555555555555555555555555555555555555555555555
- 555555555555555555555555555555555555555FFFFFFFFFF555550000000000
- 55555577777777775F55500B8B8B8B8B05555775F555555575F550F0B8B8B8B8
- B05557F75F555555575F50BF0B8B8B8B8B0557F575FFFFFFFF7F50FBF0000000
- 000557F557777777777550BFBFBFBFB0555557F555555557F55550FBFBFBFBF0
- 555557F555555FF7555550BFBFBF00055555575F555577755555550BFBF05555
- 55555575FFF75555555555700007555555555557777555555555555555555555
- 5555555555555555555555555555555555555555555555555555}
- NumGlyphs = 2
- OnClick = btnOutputNameClick
- end
- object lbledtPattern: TEnhLabel
- Left = 16
- Top = 101
- Width = 135
- Height = 13
- Caption = 'Default &Background Pattern:'
- FocusControl = edtPattern
- end
- object btnBackground: TSpeedButton
- Left = 332
- Top = 114
- Width = 25
- Height = 25
- Hint = '|Select background pattern'
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
- 5555555555555555555555555555555555555555555555555555555555555555
- 555555555555555555555555555555555555555FFFFFFFFFF555550000000000
- 55555577777777775F55500B8B8B8B8B05555775F555555575F550F0B8B8B8B8
- B05557F75F555555575F50BF0B8B8B8B8B0557F575FFFFFFFF7F50FBF0000000
- 000557F557777777777550BFBFBFBFB0555557F555555557F55550FBFBFBFBF0
- 555557F555555FF7555550BFBFBF00055555575F555577755555550BFBF05555
- 55555575FFF75555555555700007555555555557777555555555555555555555
- 5555555555555555555555555555555555555555555555555555}
- NumGlyphs = 2
- OnClick = btnBackgroundClick
- end
- object lbllbxBackColor: TEnhLabel
- Left = 16
- Top = 145
- Width = 125
- Height = 13
- Caption = 'Default Background &Color:'
- FocusControl = lbxBackColor
- end
- object lbledtBase: TEnhLabel
- Left = 16
- Top = 187
- Width = 52
- Height = 13
- Caption = '&URL Base:'
- FocusControl = edtBase
- end
- object Bevel2: TBevel
- Left = 8
- Top = 240
- Width = 361
- Height = 41
- end
- object edtBrowser: TLblEdit
- Left = 16
- Top = 30
- Width = 305
- Height = 21
- Hint =
- '|HTML browser path and filename (leave blank to use registry set' +
- 'tings)'
- ParentShowHint = False
- PopupMenu = ef_InputBoxMenu
- ShowHint = True
- TabOrder = 0
- OverwriteMode = False
- UndoWhenEsc = True
- WordWrap = False
- LabelPos = lpTop
- LabelMargin = 2
- LabelComponent = lbledtBrowser
- LabelRelLeft = 0
- LabelRelTop = -15
- end
- object edtDefOutName: TLblEdit
- Left = 16
- Top = 74
- Width = 305
- Height = 21
- Hint = '|Default name of HTML document produced by filter action'
- ParentShowHint = False
- PopupMenu = ef_InputBoxMenu
- ShowHint = True
- TabOrder = 1
- Text = 'images.htm'
- OverwriteMode = False
- UndoWhenEsc = True
- WordWrap = False
- LabelPos = lpTop
- LabelMargin = 2
- LabelComponent = lbledtDefOutName
- LabelRelLeft = 0
- LabelRelTop = -15
- end
- object edtPattern: TLblEdit
- Left = 16
- Top = 116
- Width = 305
- Height = 21
- Hint = '|Default background pattern name'
- ParentShowHint = False
- PopupMenu = ef_InputBoxMenu
- ShowHint = True
- TabOrder = 2
- OverwriteMode = False
- UndoWhenEsc = True
- WordWrap = False
- LabelPos = lpTop
- LabelMargin = 2
- LabelComponent = lbledtPattern
- LabelRelLeft = 0
- LabelRelTop = -15
- end
- object lbxBackColor: TLblComboBox
- Left = 16
- Top = 160
- Width = 345
- Height = 21
- Hint = '|Default color used for HTML background'
- ItemHeight = 13
- ParentShowHint = False
- PopupMenu = ef_InputBoxMenu
- ShowHint = True
- TabOrder = 3
- AddNewToStart = False
- AddNewToList = False
- CaseSensitive = False
- DestroyObjects = False
- LimitToList = True
- OverwriteMode = False
- ReadOnly = False
- UndoWhenEsc = True
- LabelPos = lpTop
- LabelMargin = 2
- LabelComponent = lbllbxBackColor
- LabelRelLeft = 0
- LabelRelTop = -15
- end
- object btnSave: TBitBtn
- Left = 16
- Top = 248
- Width = 89
- Height = 25
- Hint = '|Save current settings and close dialog box'
- Caption = '&Save'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 5
- OnClick = btnSaveClick
- Kind = bkOK
- end
- object btnCancel: TBitBtn
- Left = 272
- Top = 248
- Width = 89
- Height = 25
- Hint = '|Cancel changes to settings and close dialog box'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 6
- Kind = bkCancel
- end
- object edtBase: TLblEdit
- Left = 16
- Top = 202
- Width = 345
- Height = 21
- Hint = '|URL base location (e.g. http://www.unige.ch)'
- ParentShowHint = False
- PopupMenu = ef_InputBoxMenu
- ShowHint = True
- TabOrder = 4
- Text = 'file:///'
- OverwriteMode = False
- UndoWhenEsc = False
- WordWrap = False
- LabelPos = lpTop
- LabelMargin = 2
- LabelComponent = lbledtBase
- LabelRelLeft = 0
- LabelRelTop = -15
- end
- object InputBoxMaster1: TInputBoxMaster
- InputBoxMenu = ef_InputBoxMenu
- OverwriteMode = False
- UseContextMenu = True
- Left = 192
- Top = 248
- end
- object ef_InputBoxMenu: TInputBoxMenu
- Left = 152
- Top = 248
- object ef_InputBoxMenu_Undo: TMenuItem
- Caption = '&Undo'
- Hint = 'Undo changes to input text'
- end
- object ef_InputBoxMenu_Overwrite: TMenuItem
- Tag = 1
- Caption = '&Overwrite Mode'
- Hint = 'Toggle Insert/Overwrite mode'
- end
- object ef_InputBoxMenu_Break1: TMenuItem
- Tag = 2
- Caption = '-'
- end
- object ef_InputBoxMenu_Cut: TMenuItem
- Tag = 3
- Caption = 'Cu&t'
- Hint = 'Cut selected text to clipboard'
- end
- object ef_InputBoxMenu_Copy: TMenuItem
- Tag = 4
- Caption = '&Copy'
- Hint = 'Copy selected text to clipboard'
- end
- object ef_InputBoxMenu_Paste: TMenuItem
- Tag = 5
- Caption = '&Paste'
- Hint = 'Paste text from clipboard to input box'
- end
- object ef_InputBoxMenu_Delete: TMenuItem
- Tag = 6
- Caption = '&Delete'
- Hint = 'Delete selected text'
- end
- object ef_InputBoxMenu_Clear: TMenuItem
- Tag = 7
- Caption = 'C&lear All'
- Hint = 'Clear all text from input box'
- end
- object ef_InputBoxMenu_Break2: TMenuItem
- Tag = 8
- Caption = '-'
- end
- object ef_InputBoxMenu_SelectAll: TMenuItem
- Tag = 9
- Caption = 'Select &All'
- Hint = 'Select all text in input box'
- end
- end
- end
-