main.dfm

ThreadPro 是本人开发的一套用于多线程编程的 Delphi 基础类库

            Width = 279
            Height = 12
            Align = alClient
            TabOrder = 0
          end
          object pbTaskTerm: TProgressBar
            Left = 78
            Top = 0
            Width = 259
            Height = 12
            Align = alLeft
            TabOrder = 1
          end
        end
      end
    end
    object ts: TTabSheet
      Caption = 'demo2 : '#20195#29702#39564#35777#20363#23376
      object pnl2: TPanel
        Left = 0
        Top = 404
        Width = 694
        Height = 12
        Align = alBottom
        BevelOuter = bvNone
        TabOrder = 0
        object lbl4: TLabel
          Left = 0
          Top = 0
          Width = 78
          Height = 12
          Align = alLeft
          Caption = ' '#32447#31243#32456#27490#29366#24577' '
        end
        object lbl5: TLabel
          Left = 337
          Top = 0
          Width = 78
          Height = 12
          Align = alLeft
          Caption = ' '#24635#20307#20219#21153#36827#24230' '
        end
        object pbChkPxy: TProgressBar
          Left = 415
          Top = 0
          Width = 279
          Height = 12
          Align = alClient
          TabOrder = 0
        end
        object pbTerm: TProgressBar
          Left = 78
          Top = 0
          Width = 259
          Height = 12
          Align = alLeft
          TabOrder = 1
        end
      end
      object stat: TStatusBar
        Left = 0
        Top = 416
        Width = 694
        Height = 19
        Panels = <
          item
            Width = 300
          end>
      end
      object lvPxy: TListView
        Left = 0
        Top = 132
        Width = 694
        Height = 272
        Align = alClient
        Columns = <
          item
            Caption = '#'
            Width = 60
          end
          item
            Caption = 'IP'
            Width = 120
          end
          item
            Caption = 'PORT'
            Width = 120
          end
          item
            Caption = #29366#24577
            Width = 120
          end
          item
            Caption = #36895#24230
            Width = 120
          end>
        HideSelection = False
        MultiSelect = True
        ReadOnly = True
        RowSelect = True
        PopupMenu = pm
        SmallImages = il
        TabOrder = 2
        ViewStyle = vsReport
        OnColumnClick = lvPxyColumnClick
        OnCompare = lvPxyCompare
      end
      object tlb: TToolBar
        Left = 0
        Top = 105
        Width = 694
        Height = 27
        ButtonHeight = 21
        ButtonWidth = 55
        Caption = 'tlb'
        EdgeInner = esNone
        EdgeOuter = esNone
        ShowCaptions = True
        TabOrder = 3
        object btn1: TToolButton
          Left = 0
          Top = 2
          Action = actLvPxyImport
        end
        object btn2: TToolButton
          Left = 55
          Top = 2
          Action = actLvPxyExport
        end
        object btn5: TToolButton
          Left = 110
          Top = 2
          Action = actLvPxyClear
        end
        object btn3: TToolButton
          Left = 165
          Top = 2
          Action = actLvPxyDelSel
        end
        object btn4: TToolButton
          Left = 220
          Top = 2
          Action = actLvPxyDelFail
        end
        object btn6: TToolButton
          Left = 275
          Top = 2
          Action = actLvPxyReset
        end
      end
      object pnl1: TPanel
        Left = 0
        Top = 0
        Width = 694
        Height = 105
        Align = alTop
        BevelOuter = bvNone
        TabOrder = 4
        object lbl1: TLabel
          Left = 32
          Top = 59
          Width = 48
          Height = 13
          Caption = #35831#27714#36229#26102
        end
        object lbl2: TLabel
          Left = 168
          Top = 59
          Width = 48
          Height = 13
          Caption = #30446#26631#32593#22336
        end
        object lbl3: TLabel
          Left = 488
          Top = 59
          Width = 48
          Height = 13
          Caption = #25104#21151#23383#20018
        end
        object lblThreadCount: TLabel
          Left = 648
          Top = 20
          Width = 12
          Height = 13
          Caption = '20'
        end
        object btnStart: TButton
          Left = 32
          Top = 16
          Width = 75
          Height = 25
          Caption = #24320#22987
          TabOrder = 0
          OnClick = btnStartClick
        end
        object btnGoon: TButton
          Left = 120
          Top = 16
          Width = 75
          Height = 25
          Caption = #32487#32493
          TabOrder = 1
          OnClick = btnGoonClick
        end
        object btnStop: TButton
          Left = 208
          Top = 16
          Width = 75
          Height = 25
          Caption = #20572#27490
          TabOrder = 2
          OnClick = btnStopClick
        end
        object tkbPxy: TTrackBar
          Left = 304
          Top = 16
          Width = 329
          Height = 25
          Max = 256
          Position = 20
          TabOrder = 3
          TickStyle = tsManual
          OnChange = tkbPxyChange
        end
        object edtChkPxyTimeOut: TEdit
          Left = 88
          Top = 56
          Width = 49
          Height = 21
          TabOrder = 4
          Text = '2'
        end
        object udChkPxyTimeOut: TUpDown
          Left = 137
          Top = 56
          Width = 15
          Height = 21
          Associate = edtChkPxyTimeOut
          Position = 2
          TabOrder = 5
        end
        object edtPxyChkUrl: TEdit
          Left = 224
          Top = 56
          Width = 241
          Height = 21
          TabOrder = 6
          Text = 'http://www.baidu.com'
        end
        object edtPxySuccStr: TEdit
          Left = 544
          Top = 56
          Width = 121
          Height = 21
          TabOrder = 7
          Text = #30334#24230
        end
      end
    end
    object ts2: TTabSheet
      Caption = 'demo3 : '#25628#32034#23453#20363#23376
      ImageIndex = 2
      object pnl6: TPanel
        Left = 0
        Top = 0
        Width = 694
        Height = 73
        Align = alTop
        BevelOuter = bvNone
        TabOrder = 0
        object lbl9: TLabel
          Left = 293
          Top = 26
          Width = 36
          Height = 13
          Caption = #20851#38190#35789
        end
        object lbl10: TLabel
          Left = 589
          Top = 26
          Width = 24
          Height = 13
          Caption = #39029#25968
        end
        object btn7: TButton
          Left = 13
          Top = 20
          Width = 65
          Height = 25
          Action = actBeginSearch
          TabOrder = 0
        end
        object btn8: TButton
          Left = 77
          Top = 20
          Width = 65
          Height = 25
          Action = actPauseSearch
          TabOrder = 1
        end
        object btn23: TButton
          Left = 141
          Top = 20
          Width = 65
          Height = 25
          Action = actGoonSearch
          TabOrder = 2
        end
        object btn24: TButton
          Left = 205
          Top = 20
          Width = 65
          Height = 25
          Action = actStopSearch
          TabOrder = 3
        end
        object edtKeyWord: TEdit
          Left = 349
          Top = 22
          Width = 217
          Height = 21