Chip 2003 January/ChipCD_1.03.iso/sharewar/offline/oc_setup.exe/%MAINDIR%/oc.exe/0/RCDATA/TNEWTASKFRM/TNEWTASKFRM.txt

Text File | 2002-10-30 | 8.6 KB | 347 lines

object NewTAskFrm: TNewTAskFrm
  Left = 389
  Top = 212
  HelpContext = 1023
  BorderStyle = bsDialog
  Caption = 'New Task'
  ClientHeight = 327
  ClientWidth = 480
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = 11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  PrintScale = poNone
  Scaled = False
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 288
    Width = 480
    Height = 39
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 1
    object btOk: TBitBtn
      Left = 228
      Top = 9
      Width = 75
      Height = 25
      Anchors = [akRight, akBottom]
      TabOrder = 0
      Kind = bkOK
    end
    object btCancel: TBitBtn
      Left = 312
      Top = 9
      Width = 75
      Height = 25
      Anchors = [akRight, akBottom]
      TabOrder = 1
      Kind = bkCancel
    end
    object tbHelp: TBitBtn
      Left = 396
      Top = 9
      Width = 75
      Height = 25
      Anchors = [akRight, akBottom]
      TabOrder = 2
      Kind = bkHelp
    end
  end
  object pcNewTask: TPageControl
    Left = 0
    Top = 0
    Width = 480
    Height = 288
    ActivePage = tsGeneral
    Align = alClient
    TabOrder = 0
    OnChange = pcNewTaskChange
    object tsGeneral: TTabSheet
      HelpContext = 1023
      BorderWidth = 3
      Caption = 'General'
      object Label10: TLabel
        Left = 7
        Top = 17
        Width = 116
        Height = 13
        Caption = 'Starting address (URL) : '
        Layout = tlCenter
      end
      object Label11: TLabel
        Left = 7
        Top = 78
        Width = 99
        Height = 13
        Caption = 'Retrieve pages up to'
        Layout = tlCenter
      end
      object Label2: TLabel
        Left = 174
        Top = 78
        Width = 134
        Height = 13
        Caption = 'links away from this address.'
        Layout = tlCenter
      end
      object lbTaskName: TLabel
        Left = 7
        Top = 115
        Width = 62
        Height = 13
        Caption = 'Task name : '
        Layout = tlCenter
      end
      object seLevels: TxxxSpinEdit
        Left = 120
        Top = 74
        Width = 41
        Height = 21
        Hint =
          'The number of levels to download beginning from '#13#10'the starting U' +
          'RL. Setting this to 0 will download '#13#10'only a single page referen' +
          'ced by the supplied URL. '#13#10'Setting this to 1 will download the p' +
          'age referenced by '#13#10'the URL and all the pages linked to this pag' +
          'e. '#13#10'The number of levels can be up to 255 but '#13#10'it is not recom' +
          'mended to set it higher than 4 unless '#13#10'you use filters.'
        Value = 0
        MaxValue = 99
        MinValue = 0
        OnChanging = seLevelsChanging
      end
      object edTaskName: TxxxEdit
        Left = 8
        Top = 132
        Width = 449
        Height = 21
        Hint = 'Assign a name to the task. The name is for your reference only.'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        KeyFilter = kfAll
      end
      object cbNewVer: TCheckBox
        Left = 8
        Top = 180
        Width = 179
        Height = 17
        Caption = 'Download new version of task'
        TabOrder = 2
      end
      object edUrl: TIconizedEdit
        Left = 8
        Top = 36
        Width = 449
        Height = 21
        TabOrder = 3
        Text = 'edUrl'
        OnExit = cbUrlEditExit
        IconLeft = 4
        IconTop = 0
      end
    end
    object TabSheet2: TTabSheet
      HelpContext = 1039
      BorderWidth = 3
      Caption = 'Filters'
      ImageIndex = 3
      inline FiltersFrame: TFilterFrame
        Width = 466
        Height = 254
        Align = alClient
        inherited Splitter1: TSplitter
          Height = 254
        end
        inherited Panel3: TPanel
          Height = 254
          inherited tvFilters: TTreeView
            Height = 248
          end
        end
        inherited plFlt1: TPanel
          Width = 338
          Height = 254
          inherited GroupBox1: TGroupBox
            Width = 332
            Height = 165
            inherited plFilter: TPanel
              Width = 328
              Height = 148
              inherited lbFltCaption: TLabel
                Width = 322
              end
              inherited mmHTMLPagesUrlMask: TMemo
                Width = 322
                Height = 89
                Lines.Strings = ()
              end
              inherited Panel6: TPanel
                Top = 118
                Width = 322
                inherited Label3: TLabel
                  Height = 13
                end
                inherited edHTMLPagesSize: TxxxEdit
                  Width = 157
                end
              end
            end
            inherited rbCustomFilter: TRadioButton
              Caption = 'Download only URLs that match the following patterns: '
            end
          end
          inherited plFilter1: TPanel
            Width = 332
            inherited plFilterTypeName: TPanel
              Width = 332
            end
          end
          inherited cbSimpleFilter: TComboBox
            Left = 128
            Width = 209
          end
        end
      end
    end
    object tsAdvOpt: TTabSheet
      HelpContext = 1023
      BorderWidth = 3
      Caption = 'Advanced Options'
      object Label1: TLabel
        Left = 8
        Top = 148
        Width = 110
        Height = 13
        Caption = 'Referrer Page Address:'
      end
      object gbAgents: TGroupBox
        Left = 8
        Top = 8
        Width = 453
        Height = 93
        Caption = 'User Agent :'
        TabOrder = 0
        object rbEICheck: TRadioButton
          Left = 8
          Top = 24
          Width = 185
          Height = 17
          Hint =
            'Identify as Microsoft Internet Explorer. Choose a version in the' +
            ' box at the right.'
          Caption = 'Microsoft Internet Explorer, version'
          Checked = True
          ParentShowHint = False
          ShowHint = True
          TabOrder = 0
          TabStop = True
          OnClick = rbEICheckClick
        end
        object cbVer: TxxxComboBox
          Left = 366
          Top = 20
          Width = 73
          Height = 21
          Hint =
            'Identify as Microsoft Internet Explorer. Choose a version in the' +
            ' box at the right.'
          ItemHeight = 13
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
          Text = '5.5 '
          Items.Strings = (
            '6.0'
            '5.5 '
            '5.01'
            '5.0'
            '4.01'
            '4.0'
            '3.0A')
          ItemIndex = -1
        end
        object rbOther: TRadioButton
          Left = 8
          Top = 56
          Width = 53
          Height = 17
          Caption = 'Other:'
          TabOrder = 2
          OnClick = rbEICheckClick
        end
        object cbUserAgents: TxxxComboBox
          Left = 60
          Top = 54
          Width = 381
          Height = 21
          Color = clBtnFace
          Enabled = False
          ItemHeight = 13
          TabOrder = 3
          Text = 'Mozilla/4.0 [en] (Win95; I)'
          Items.Strings = (
            'Mozilla/3.0Gold (Win95; I)'
            'Mozilla/4.0 [en] (Win95; I)'
            'Mozilla/4.5 [en] (WinNT; I)'
            'Mozilla/4.7 [en] (Win98; I)'
            'Mozilla/3.0 WebTV/1.2 (compatible; MSIE 2.0)'
            'Mozilla/3.01 (compatible;)')
          ItemIndex = -1
        end
      end
      object cbGraphPrior: TCheckBox
        Left = 8
        Top = 120
        Width = 333
        Height = 17
        Caption = 'Retrieve images only after retrieving last webpage of the task'
        TabOrder = 1
      end
      object edReferer: TxxxEdit
        Left = 8
        Top = 164
        Width = 453
        Height = 21
        TabOrder = 2
        OnExit = edRefererExit
        KeyFilter = kfAll
      end
    end
    object tsNotes: TTabSheet
      HelpContext = 1023
      BorderWidth = 3
      Caption = 'Notes'
      ImageIndex = 2
      object Panel3: TPanel
        Left = 0
        Top = 0
        Width = 466
        Height = 254
        Align = alClient
        BevelOuter = bvNone
        TabOrder = 0
        object mmNotes: TMemo
          Left = 0
          Top = 0
          Width = 466
          Height = 254
          Align = alClient
          ScrollBars = ssVertical
          TabOrder = 0
          OnChange = mmNotesChange
        end
      end
    end
  end
end