main.~dfm

查杀及面议Logo_病毒,采用多线程编写

object FrmKill: TFrmKill
  Left = 230
  Top = 201
  AlphaBlend = True
  AlphaBlendValue = 230
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  BorderWidth = 3
  Caption = 'Logo1_.exe'#19987#26432#24037#20855'       QQ:249957780  '#25163#26426':13468750138'
  ClientHeight = 214
  ClientWidth = 549
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  FormStyle = fsStayOnTop
  OldCreateOrder = False
  ShowHint = True
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object Label3: TLabel
    Left = 17
    Top = 6
    Width = 60
    Height = 12
    Caption = #25195#25551#36335#24452#65306
  end
  object SpeedButton1: TSpeedButton
    Left = 513
    Top = 4
    Width = 23
    Height = 22
    Hint = #25171#24320
    Caption = '...'
    OnClick = SpeedButton1Click
  end
  object Edit3: TEdit
    Left = 86
    Top = 4
    Width = 425
    Height = 20
    Hint = #20026#31354#26102#65292#23558#33258#21160#26597#26432#25152#26377#26412#22320#30424'('#19981#21547'CD-ROM)'
    TabOrder = 0
    Text = 'C:\'
  end
  object BitBtn1: TBitBtn
    Left = 450
    Top = 58
    Width = 91
    Height = 57
    Caption = #26597#26432'(&K)'
    TabOrder = 1
    OnClick = BitBtn1Click
    Kind = bkOK
  end
  object BitBtn2: TBitBtn
    Left = 451
    Top = 124
    Width = 90
    Height = 57
    Caption = #20851#38381'(&C)'
    TabOrder = 2
    Kind = bkClose
  end
  object PageControl1: TPageControl
    Left = 10
    Top = 36
    Width = 431
    Height = 151
    ActivePage = TabSheet1
    TabOrder = 3
    object TabSheet1: TTabSheet
      Caption = #24050#26597#21040#30149#27602
      object ListBox1: TListBox
        Left = 0
        Top = 0
        Width = 423
        Height = 124
        Align = alClient
        BevelKind = bkFlat
        BorderStyle = bsNone
        ItemHeight = 12
        TabOrder = 0
      end
    end
    object TabSheet2: TTabSheet
      Caption = #25552#31034
      ImageIndex = 1
      object RichEdit1: TRichEdit
        Left = 0
        Top = 0
        Width = 423
        Height = 124
        Align = alClient
        BevelKind = bkFlat
        BorderStyle = bsNone
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        HideScrollBars = False
        Lines.Strings = (
          #25552#31034':'
          '       '#28165#38500#23436#25104#21518#65292#24314#35758#22312'Windows'#30340#31995#32479#30446#24405#37324#24314#19968#20010' logo1_.exe'#30340#25991
          #20214#22841'('#19981#26159#25991#20214')'#65292#24182#35774#32622#20026#21482#35835#26435#38480#65292#36825#26679#21487#20197#26377#25928#39044#38450#20877#27425#24863#26579#12290
          ''
          '       020616       '#23435#22823#21355)
        ParentFont = False
        ReadOnly = True
        ScrollBars = ssVertical
        TabOrder = 0
      end
    end
    object TabSheet3: TTabSheet
      Caption = #33258#21160#20851#38381#30340#36827#31243
      ImageIndex = 2
      object Splitter1: TSplitter
        Left = 286
        Top = 0
        Height = 124
      end
      object ListBox2: TListBox
        Left = 0
        Top = 0
        Width = 286
        Height = 124
        Align = alLeft
        BevelKind = bkFlat
        BorderStyle = bsNone
        ItemHeight = 12
        Items.Strings = (
          'Logo1_.exe'
          'cmd.exe'
          'IDE.exe'
          'ftp.exe'
          'rundl132.exe'
          'IEXPL0RER.EXE')
        TabOrder = 0
        OnClick = ListBox2Click
      end
      object ScrollBox1: TScrollBox
        Left = 289
        Top = 0
        Width = 134
        Height = 124
        Align = alClient
        BevelKind = bkFlat
        BorderStyle = bsNone
        TabOrder = 1
        object Edit1: TEdit
          Left = 15
          Top = 18
          Width = 101
          Height = 20
          TabOrder = 0
          Text = 'Edit1'
        end
        object Button1: TButton
          Left = 15
          Top = 54
          Width = 56
          Height = 25
          Caption = #22635#21152
          TabOrder = 1
          OnClick = Button1Click
        end
        object Button2: TButton
          Left = 70
          Top = 54
          Width = 45
          Height = 25
          Caption = #21024#38500
          TabOrder = 2
          OnClick = Button2Click
        end
      end
    end
  end
  object RzStatusBar1: TRzStatusBar
    Left = 0
    Top = 195
    Width = 549
    Height = 19
    BorderInner = fsNone
    BorderOuter = fsNone
    BorderSides = [sdLeft, sdTop, sdRight, sdBottom]
    BorderWidth = 0
    TabOrder = 4
    VisualStyle = vsGradient
    object RzStatusPane1: TRzStatusPane
      Left = 0
      Top = 0
      Width = 449
      Height = 19
      Align = alClient
    end
    object RzStatusPane2: TRzStatusPane
      Left = 449
      Top = 0
      Height = 19
      Align = alRight
      Caption = #30149#27602#25968#37327':'
    end
  end
  object Timer1: TTimer
    Interval = 500
    OnTimer = Timer1Timer
    Left = 84
    Top = 78
  end
  object RzSelectFolderDialog1: TRzSelectFolderDialog
    Left = 18
    Top = 86
  end
end