反向木马源程序,供大家研究

				object Form2: TForm2
				  Left = 236
				  Top = 81
				  Width = 693
				  Height = 525
				  Caption = #36828#31243#23631#24149#26597#30475' ^-^'
				  Color = clBtnFace
				  Font.Charset = DEFAULT_CHARSET
				  Font.Color = clWindowText
				  Font.Height = -11
				  Font.Name = 'MS Sans Serif'
				  Font.Style = []
				  OldCreateOrder = False
				  Position = poDesktopCenter
				  OnClose = FormClose
				  PixelsPerInch = 96
				  TextHeight = 13
				  object Button1: TButton
				    Left = 50
				    Top = 8
				    Width = 75
				    Height = 25
				    Caption = #24320#22987#19978#20256
				    TabOrder = 0
				    OnClick = Button1Click
				  end
				  object pb1: TProgressBar
				    Left = 12
				    Top = 48
				    Width = 161
				    Height = 16
				    TabOrder = 1
				  end
				  object Panel1: TPanel
				    Left = 0
				    Top = 0
				    Width = 685
				    Height = 498
				    Align = alClient
				    TabOrder = 2
				    object img: TImage
				      Left = 1
				      Top = 38
				      Width = 683
				      Height = 459
				      Align = alClient
				      Stretch = True
				    end
				    object Panel2: TPanel
				      Left = 1
				      Top = 1
				      Width = 683
				      Height = 37
				      Align = alTop
				      TabOrder = 0
				      object BitBtn9: TBitBtn
				        Left = 101
				        Top = 4
				        Width = 54
				        Height = 25
				        Cursor = crHandPoint
				        Hint = #22312#26032#31383#21475#20013#25918#22823#26174#31034#22270#29255
				        Caption = #20445#23384
				        DragCursor = crHandPoint
				        Font.Charset = DEFAULT_CHARSET
				        Font.Color = clNavy
				        Font.Height = -11
				        Font.Name = 'MS Sans Serif'
				        Font.Style = []
				        ParentFont = False
				        TabOrder = 0
				        OnClick = BitBtn9Click
				      end
				      object BG: TButton
				        Left = 20
				        Top = 4
				        Width = 49
				        Height = 25
				        Caption = #24320#22987
				        TabOrder = 1
				        OnClick = BGClick
				      end
				    end
				  end
				  object cs: TClientSocket
				    Active = False
				    ClientType = ctNonBlocking
				    Port = 0
				    OnRead = csRead
				    OnError = csError
				    Left = 164
				    Top = 4
				  end
				end