home *** CD-ROM | disk | FTP | other *** search
- object pageimportform: Tpageimportform
- Left = 154
- Top = 96
- ActiveControl = urltoget
- BorderIcons = []
- BorderStyle = bsSingle
- Caption = 'Link Wizard'
- ClientHeight = 355
- ClientWidth = 517
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = True
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Bevel1: TBevel
- Left = 8
- Top = 8
- Width = 505
- Height = 321
- end
- object Label9: TLabel
- Left = 16
- Top = 16
- Width = 15
- Height = 22
- Caption = '1.'
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label1: TLabel
- Left = 40
- Top = 16
- Width = 465
- Height = 33
- AutoSize = False
- Caption =
- 'Please enter a URL to spider and a username and password for tha' +
- 't page (if required). A list of all links on that page will be d' +
- 'isplayed in the window below.'
- WordWrap = True
- end
- object Label2: TLabel
- Left = 40
- Top = 104
- Width = 464
- Height = 26
- Caption =
- 'Once the page has been successfully spidered, a list (if any) of' +
- ' links will be displayed below. Select the ones you would like t' +
- 'o add to the current URL List.'
- WordWrap = True
- end
- object Label3: TLabel
- Left = 16
- Top = 104
- Width = 15
- Height = 22
- Caption = '2.'
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label4: TLabel
- Left = 16
- Top = 256
- Width = 15
- Height = 22
- Caption = '3.'
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label5: TLabel
- Left = 40
- Top = 256
- Width = 465
- Height = 33
- AutoSize = False
- Caption =
- 'Finally, click '#39'OK'#39' to commit these URL(s) to the current URL Li' +
- 'st. The description field for each of these URL(s) will be left ' +
- 'blank until individually edited.'
- WordWrap = True
- end
- object Label6: TLabel
- Left = 40
- Top = 52
- Width = 25
- Height = 13
- Caption = 'URL:'
- end
- object Label7: TLabel
- Left = 40
- Top = 78
- Width = 51
- Height = 13
- Caption = 'Username:'
- end
- object Label8: TLabel
- Left = 222
- Top = 78
- Width = 49
- Height = 13
- Caption = 'Password:'
- end
- object StatusBar1: TStatusBar
- Left = 0
- Top = 336
- Width = 517
- Height = 19
- Panels = <
- item
- Width = 50
- end>
- SimplePanel = False
- end
- object cancelbtn: TBitBtn
- Left = 352
- Top = 296
- Width = 75
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- TabOrder = 11
- OnClick = cancelbtnClick
- Glyph.Data = {
- DE010000424DDE01000000000000760000002800000024000000120000000100
- 0400000000006801000000000000000000001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 333333333333333333333333000033338833333333333333333F333333333333
- 0000333911833333983333333388F333333F3333000033391118333911833333
- 38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333
- 911118111118333338F3338F833338F3000033333911111111833333338F3338
- 3333F8330000333333911111183333333338F333333F83330000333333311111
- 8333333333338F3333383333000033333339111183333333333338F333833333
- 00003333339111118333333333333833338F3333000033333911181118333333
- 33338333338F333300003333911183911183333333383338F338F33300003333
- 9118333911183333338F33838F338F33000033333913333391113333338FF833
- 38F338F300003333333333333919333333388333338FFF830000333333333333
- 3333333333333333333888330000333333333333333333333333333333333333
- 0000}
- NumGlyphs = 2
- end
- object BitBtn1: TBitBtn
- Left = 432
- Top = 296
- Width = 73
- Height = 25
- Caption = 'Help'
- TabOrder = 12
- OnClick = BitBtn1Click
- Kind = bkHelp
- end
- object okbtn: TBitBtn
- Left = 272
- Top = 296
- Width = 75
- Height = 25
- Caption = 'OK'
- TabOrder = 10
- OnClick = okbtnClick
- Glyph.Data = {
- DE010000424DDE01000000000000760000002800000024000000120000000100
- 0400000000006801000000000000000000001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333333333333333330000333333333333333333333333F33333333333
- 00003333344333333333333333388F3333333333000033334224333333333333
- 338338F3333333330000333422224333333333333833338F3333333300003342
- 222224333333333383333338F3333333000034222A22224333333338F338F333
- 8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
- 33333338F83338F338F33333000033A33333A222433333338333338F338F3333
- 0000333333333A222433333333333338F338F33300003333333333A222433333
- 333333338F338F33000033333333333A222433333333333338F338F300003333
- 33333333A222433333333333338F338F00003333333333333A22433333333333
- 3338F38F000033333333333333A223333333333333338F830000333333333333
- 333A333333333333333338330000333333333333333333333333333333333333
- 0000}
- NumGlyphs = 2
- end
- object urltoget: TEdit
- Left = 72
- Top = 48
- Width = 321
- Height = 21
- TabOrder = 0
- end
- object getbtn: TBitBtn
- Left = 400
- Top = 48
- Width = 49
- Height = 25
- Caption = 'Get'
- Default = True
- TabOrder = 4
- OnClick = getbtnClick
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00370777033333
- 3330337F3F7F33333F3787070003333707303F737773333373F7007703333330
- 700077337F3333373777887007333337007733F773F333337733700070333333
- 077037773733333F7F37703707333300080737F373333377737F003333333307
- 78087733FFF3337FFF7F33300033330008073F3777F33F777F73073070370733
- 078073F7F7FF73F37FF7700070007037007837773777F73377FF007777700730
- 70007733FFF77F37377707700077033707307F37773F7FFF7337080777070003
- 3330737F3F7F777F333778080707770333333F7F737F3F7F3333080787070003
- 33337F73FF737773333307800077033333337337773373333333}
- NumGlyphs = 2
- end
- object displayurls: TCheckListBox
- Left = 40
- Top = 136
- Width = 465
- Height = 113
- ItemHeight = 13
- PopupMenu = PopupMenu1
- TabOrder = 6
- OnMouseDown = displayurlsMouseDown
- end
- object username: TEdit
- Left = 96
- Top = 76
- Width = 121
- Height = 21
- TabOrder = 1
- end
- object password: TEdit
- Left = 280
- Top = 76
- Width = 121
- Height = 21
- PasswordChar = '*'
- TabOrder = 2
- end
- object maskpw: TCheckBox
- Left = 408
- Top = 80
- Width = 97
- Height = 17
- Caption = 'Mask Password'
- TabOrder = 3
- OnClick = maskpwClick
- end
- object abortbtn: TBitBtn
- Left = 200
- Top = 296
- Width = 67
- Height = 25
- Cancel = True
- Caption = 'Abort'
- Enabled = False
- TabOrder = 9
- OnClick = abortbtnClick
- Glyph.Data = {
- DE010000424DDE01000000000000760000002800000024000000120000000100
- 0400000000006801000000000000000000001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333333FFFFF333333000033333388888833333333333F888888FFF333
- 000033338811111188333333338833FFF388FF33000033381119999111833333
- 38F338888F338FF30000339119933331111833338F388333383338F300003391
- 13333381111833338F8F3333833F38F3000039118333381119118338F38F3338
- 33F8F38F000039183333811193918338F8F333833F838F8F0000391833381119
- 33918338F8F33833F8338F8F000039183381119333918338F8F3833F83338F8F
- 000039183811193333918338F8F833F83333838F000039118111933339118338
- F3833F83333833830000339111193333391833338F33F8333FF838F300003391
- 11833338111833338F338FFFF883F83300003339111888811183333338FF3888
- 83FF83330000333399111111993333333388FFFFFF8833330000333333999999
- 3333333333338888883333330000333333333333333333333333333333333333
- 0000}
- NumGlyphs = 2
- end
- object selectbtn: TBitBtn
- Left = 110
- Top = 296
- Width = 85
- Height = 25
- Caption = 'Select All'
- TabOrder = 8
- OnClick = selectbtnClick
- Glyph.Data = {
- F2010000424DF201000000000000760000002800000024000000130000000100
- 0400000000007C01000000000000000000001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333334433333
- 3333333333388F3333333333000033334224333333333333338338F333333333
- 0000333422224333333333333833338F33333333000033422222243333333333
- 83333338F3333333000034222A22224333333338F33F33338F33333300003222
- A2A2224333333338F383F3338F33333300003A2A222A222433333338F8333F33
- 38F33333000034A22222A22243333338833333F3338F333300004222A2222A22
- 2433338F338F333F3338F3330000222A3A2224A22243338F3838F338F3338F33
- 0000A2A333A2224A2224338F83338F338F3338F300003A33333A2224A2224338
- 333338F338F3338F000033333333A2224A2243333333338F338F338F00003333
- 33333A2224A2233333333338F338F83300003333333333A2224A333333333333
- 8F338F33000033333333333A222433333333333338F338F30000333333333333
- A224333333333333338F38F300003333333333333A223333333333333338F8F3
- 000033333333333333A3333333333333333383330000}
- NumGlyphs = 2
- end
- object BitBtn2: TBitBtn
- Left = 16
- Top = 296
- Width = 89
- Height = 25
- Caption = 'Drill Down'
- TabOrder = 7
- OnClick = BitBtn2Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555000000
- 000055555F77777777775555000FFFFFFFF0555F777F5FFFF55755000F0F0000
- FFF05F777F7F77775557000F0F0FFFFFFFF0777F7F7F5FFFFFF70F0F0F0F0000
- 00F07F7F7F7F777777570F0F0F0FFFFFFFF07F7F7F7F5FFFFFF70F0F0F0F0000
- 00F07F7F7F7F777777570F0F0F0FFFFFFFF07F7F7F7F5FFF55570F0F0F0F000F
- FFF07F7F7F7F77755FF70F0F0F0FFFFF00007F7F7F7F5FF577770F0F0F0F00FF
- 0F057F7F7F7F77557F750F0F0F0FFFFF00557F7F7F7FFFFF77550F0F0F000000
- 05557F7F7F77777775550F0F0000000555557F7F7777777555550F0000000555
- 55557F7777777555555500000005555555557777777555555555}
- NumGlyphs = 2
- end
- object lastbtn: TBitBtn
- Left = 456
- Top = 48
- Width = 49
- Height = 25
- Caption = 'First'
- TabOrder = 5
- OnClick = lastbtnClick
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00370777033333
- 3330337F3F7F33333F3787070003333707303F737773333373F7007703333330
- 700077337F3333373777887007333337007733F773F333337733700070333333
- 077037773733333F7F37703707333300080737F373333377737F003333333307
- 78087733FFF3337FFF7F33300033330008073F3777F33F777F73073070370733
- 078073F7F7FF73F37FF7700070007037007837773777F73377FF007777700730
- 70007733FFF77F37377707700077033707307F37773F7FFF7337080777070003
- 3330737F3F7F777F333778080707770333333F7F737F3F7F3333080787070003
- 33337F73FF737773333307800077033333337337773373333333}
- NumGlyphs = 2
- end
- object PopupMenu1: ToxPopupMenu
- OwnerDraw = False
- AboutReg = 67174656
- Options = [oxmBackground, oxmMultiLine, oxmUseTagAsImageIndex]
- Font3D = ox3Normal
- Background.Style = oxmVertGradient
- Background.Gradient = clWhite
- SelectionStyle = oxmNormSel
- Left = 8
- Top = 216
- object DrillDown1: TMenuItem
- Caption = '&Drill Down'
- Default = True
- OnClick = DrillDown1Click
- end
- end
- end
-