home *** CD-ROM | disk | FTP | other *** search
- object URL: TURL
- Left = 58
- Top = 108
- BorderIcons = [biSystemMenu]
- BorderStyle = bsSingle
- Caption = 'Hyperlink Manager'
- ClientHeight = 302
- ClientWidth = 730
- Color = clSilver
- Font.Color = clWindowText
- Font.Height = -18
- Font.Name = 'System'
- Font.Style = []
- Position = poScreenCenter
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 120
- TextHeight = 20
- object TabbedNotebook1: TTabbedNotebook
- Left = 0
- Top = 0
- Width = 730
- Height = 302
- Align = alClient
- TabFont.Color = clBtnText
- TabFont.Height = -13
- TabFont.Name = 'MS Sans Serif'
- TabFont.Style = []
- TabOrder = 0
- object TTabPage
- Left = 4
- Top = 31
- Caption = 'Links'
- object Panel1: TPanel
- Left = 5
- Top = 4
- Width = 377
- Height = 262
- Caption = 'Panel1'
- TabOrder = 0
- object ListBox1: TListBox
- Left = 4
- Top = 4
- Width = 369
- Height = 181
- ItemHeight = 20
- TabOrder = 0
- end
- object RadioButton13: TRadioButton
- Left = 7
- Top = 196
- Width = 87
- Height = 17
- Caption = 'Group 1'
- Checked = True
- TabOrder = 1
- TabStop = True
- OnClick = RadioButton13Click
- end
- object RadioButton14: TRadioButton
- Left = 99
- Top = 196
- Width = 87
- Height = 17
- Caption = 'Group 2'
- TabOrder = 2
- OnClick = RadioButton14Click
- end
- object RadioButton15: TRadioButton
- Left = 191
- Top = 196
- Width = 87
- Height = 17
- Caption = 'Group 3'
- TabOrder = 3
- OnClick = RadioButton15Click
- end
- object RadioButton16: TRadioButton
- Left = 283
- Top = 196
- Width = 87
- Height = 17
- Caption = 'Group 4'
- TabOrder = 4
- OnClick = RadioButton16Click
- end
- object Button4: TButton
- Left = 92
- Top = 226
- Width = 81
- Height = 27
- Caption = 'Use'
- Font.Color = clWindowText
- Font.Height = -17
- Font.Name = 'Times New Roman'
- Font.Style = []
- ParentFont = False
- TabOrder = 5
- OnClick = Button4Click
- end
- object Button5: TButton
- Left = 204
- Top = 226
- Width = 81
- Height = 27
- Caption = 'Delete'
- Font.Color = clWindowText
- Font.Height = -17
- Font.Name = 'Times New Roman'
- Font.Style = []
- ParentFont = False
- TabOrder = 6
- OnClick = Button5Click
- end
- end
- object GroupBox1: TGroupBox
- Left = 386
- Top = 4
- Width = 329
- Height = 262
- Caption = 'New Link'
- Color = clSilver
- ParentColor = False
- TabOrder = 1
- object Edit1: TEdit
- Left = 8
- Top = 132
- Width = 313
- Height = 28
- TabOrder = 1
- OnChange = Edit1Change
- end
- object CheckBox1: TCheckBox
- Left = 131
- Top = 170
- Width = 183
- Height = 31
- Caption = 'Include Path To File'
- Enabled = False
- Font.Color = clBlack
- Font.Height = -18
- Font.Name = 'System'
- Font.Style = []
- ParentFont = False
- TabOrder = 3
- end
- object Button1: TButton
- Left = 6
- Top = 212
- Width = 155
- Height = 33
- Caption = 'Add To Group'
- Font.Color = clBlack
- Font.Height = -17
- Font.Name = 'Times New Roman'
- Font.Style = []
- ParentFont = False
- TabOrder = 4
- OnClick = Button1Click
- end
- object Button2: TButton
- Left = 168
- Top = 212
- Width = 154
- Height = 33
- Caption = 'Use Without Adding'
- Font.Color = clBlack
- Font.Height = -17
- Font.Name = 'Times New Roman'
- Font.Style = []
- ModalResult = 1
- ParentFont = False
- TabOrder = 5
- OnClick = Button2Click
- end
- object Button3: TButton
- Left = 23
- Top = 168
- Width = 81
- Height = 33
- Caption = 'Browse'
- Enabled = False
- Font.Color = clBlack
- Font.Height = -17
- Font.Name = 'Times New Roman'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- OnClick = Button3Click
- end
- object Panel2: TPanel
- Left = 8
- Top = 24
- Width = 313
- Height = 97
- TabOrder = 0
- object RadioButton1: TRadioButton
- Left = 17
- Top = 28
- Width = 75
- Height = 17
- Caption = 'file'
- Font.Color = clMaroon
- Font.Height = -17
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 1
- OnClick = RadioButton1Click
- end
- object RadioButton2: TRadioButton
- Left = 17
- Top = 48
- Width = 75
- Height = 17
- Caption = 'http'
- Font.Color = clMaroon
- Font.Height = -17
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 2
- OnClick = RadioButton4Click
- end
- object RadioButton3: TRadioButton
- Left = 17
- Top = 68
- Width = 75
- Height = 17
- Caption = 'ftp'
- Font.Color = clMaroon
- Font.Height = -17
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 3
- OnClick = RadioButton4Click
- end
- object RadioButton4: TRadioButton
- Left = 17
- Top = 8
- Width = 75
- Height = 17
- Caption = 'local'
- Checked = True
- Font.Color = clMaroon
- Font.Height = -17
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- TabStop = True
- OnClick = RadioButton4Click
- end
- object RadioButton5: TRadioButton
- Left = 114
- Top = 8
- Width = 75
- Height = 17
- Caption = 'telnet'
- Font.Color = clMaroon
- Font.Height = -17
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 4
- OnClick = RadioButton4Click
- end
- object RadioButton6: TRadioButton
- Left = 114
- Top = 48
- Width = 75
- Height = 17
- Caption = 'wais'
- Font.Color = clMaroon
- Font.Height = -17
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 6
- OnClick = RadioButton4Click
- end
- object RadioButton7: TRadioButton
- Left = 114
- Top = 28
- Width = 75
- Height = 17
- Caption = 'cid'
- Font.Color = clMaroon
- Font.Height = -17
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 5
- OnClick = RadioButton4Click
- end
- object RadioButton8: TRadioButton
- Left = 114
- Top = 68
- Width = 75
- Height = 20
- Caption = 'gopher'
- Font.Color = clMaroon
- Font.Height = -17
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 7
- OnClick = RadioButton4Click
- end
- object RadioButton10: TRadioButton
- Left = 222
- Top = 8
- Width = 75
- Height = 17
- Caption = 'news'
- Font.Color = clMaroon
- Font.Height = -17
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 8
- OnClick = RadioButton4Click
- end
- object RadioButton11: TRadioButton
- Left = 222
- Top = 28
- Width = 75
- Height = 17
- Caption = 'nntp'
- Font.Color = clMaroon
- Font.Height = -17
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 9
- OnClick = RadioButton4Click
- end
- object RadioButton12: TRadioButton
- Left = 222
- Top = 48
- Width = 75
- Height = 17
- Caption = 'mid'
- Font.Color = clMaroon
- Font.Height = -17
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 10
- OnClick = RadioButton4Click
- end
- object RadioButton9: TRadioButton
- Left = 222
- Top = 68
- Width = 75
- Height = 17
- Caption = 'mailto'
- Font.Color = clMaroon
- Font.Height = -17
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 11
- OnClick = RadioButton4Click
- end
- end
- end
- end
- object TTabPage
- Left = 4
- Top = 31
- Caption = 'Anchors'
- object Label1: TLabel
- Left = 17
- Top = 24
- Width = 158
- Height = 20
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'New Anchor Name:'
- Color = clSilver
- Font.Color = clBlue
- Font.Height = -17
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentColor = False
- ParentFont = False
- end
- object Edit2: TEdit
- Left = 182
- Top = 20
- Width = 415
- Height = 28
- Color = clSilver
- Font.Color = clMaroon
- Font.Height = -17
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- OnChange = Edit2Change
- end
- object BitBtn1: TBitBtn
- Left = 606
- Top = 20
- Width = 105
- Height = 29
- Caption = 'OK'
- Default = True
- Enabled = False
- ModalResult = 1
- TabOrder = 1
- OnClick = BitBtn1Click
- Glyph.Data = {
- BE060000424DBE06000000000000360400002800000024000000120000000100
- 0800000000008802000000000000000000000000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
- A600000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000F0FBFF00A4A0A000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303
- 0303030303030303030303030303030303030303030303030303030303030303
- 03030303030303030303030303030303030303030303FF030303030303030303
- 03030303030303040403030303030303030303030303030303F8F8FF03030303
- 03030303030303030303040202040303030303030303030303030303F80303F8
- FF030303030303030303030303040202020204030303030303030303030303F8
- 03030303F8FF0303030303030303030304020202020202040303030303030303
- 0303F8030303030303F8FF030303030303030304020202FA0202020204030303
- 0303030303F8FF0303F8FF030303F8FF03030303030303020202FA03FA020202
- 040303030303030303F8FF03F803F8FF0303F8FF03030303030303FA02FA0303
- 03FA0202020403030303030303F8FFF8030303F8FF0303F8FF03030303030303
- FA0303030303FA0202020403030303030303F80303030303F8FF0303F8FF0303
- 0303030303030303030303FA0202020403030303030303030303030303F8FF03
- 03F8FF03030303030303030303030303FA020202040303030303030303030303
- 0303F8FF0303F8FF03030303030303030303030303FA02020204030303030303
- 03030303030303F8FF0303F8FF03030303030303030303030303FA0202020403
- 030303030303030303030303F8FF0303F8FF03030303030303030303030303FA
- 0202040303030303030303030303030303F8FF03F8FF03030303030303030303
- 03030303FA0202030303030303030303030303030303F8FFF803030303030303
- 030303030303030303FA0303030303030303030303030303030303F803030303
- 0303030303030303030303030303030303030303030303030303030303030303
- 0303}
- NumGlyphs = 2
- end
- object GroupBox2: TGroupBox
- Left = 8
- Top = 60
- Width = 705
- Height = 201
- Caption = 'Existing Anchors'
- Font.Color = clBlue
- Font.Height = -18
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 2
- object ListBox2: TListBox
- Left = 8
- Top = 28
- Width = 573
- Height = 165
- Color = clSilver
- Font.Color = clBlack
- Font.Height = -18
- Font.Name = 'System'
- Font.Style = [fsBold]
- ItemHeight = 20
- ParentFont = False
- TabOrder = 0
- end
- object Button6: TButton
- Left = 592
- Top = 160
- Width = 101
- Height = 33
- Caption = 'Refresh'
- Font.Color = clBlue
- Font.Height = -17
- Font.Name = 'Times New Roman'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- OnClick = Button6Click
- end
- end
- end
- end
- object OpenDialog1: TOpenDialog
- FileEditStyle = fsEdit
- Filter =
- 'HTML Files|*.htm|Image Files|*.gif;*.jpg;*.tif|GIF Images|*.gif|' +
- 'JPEG Images|*.jpg|TIFF Images|*.tif|All Files|*.*'
- Options = [ofReadOnly, ofHideReadOnly, ofPathMustExist, ofFileMustExist]
- end
- end
-