uaddshell.~dfm

有密码的加壳源码.只是简单的介绍下壳方法.牛人见笑了

object Form1: TForm1
  Left = 240
  Top = 121
  AutoScroll = False
  Caption = #21152#22771#12289#33073#22771#31243#24207
  ClientHeight = 212
  ClientWidth = 381
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -15
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  DesignSize = (
    381
    212)
  PixelsPerInch = 120
  TextHeight = 15
  object ButtonOpenFile: TSpeedButton
    Left = 314
    Top = 44
    Width = 26
    Height = 26
    Hint = #25171#24320#25991#20214
    Anchors = [akTop, akRight]
    Caption = '...'
    Flat = True
    ParentShowHint = False
    ShowHint = True
    OnClick = ButtonOpenFileClick
  end
  object LabelPassword1: TLabel
    Left = 24
    Top = 112
    Width = 60
    Height = 15
    Caption = #36755#20837#23494#30721
  end
  object LabelPassword2: TLabel
    Left = 208
    Top = 112
    Width = 60
    Height = 15
    Caption = #37325#22797#23494#30721
  end
  object LabelFileName: TLabel
    Left = 24
    Top = 24
    Width = 84
    Height = 15
    Caption = #36873#25321'EXE'#25991#20214
  end
  object ButtonEncrypt: TBitBtn
    Left = 32
    Top = 161
    Width = 151
    Height = 31
    Caption = #21152#22771
    TabOrder = 0
    OnClick = ButtonEncryptClick
  end
  object EditPassword1: TEdit
    Left = 24
    Top = 131
    Width = 161
    Height = 23
    MaxLength = 15
    ParentShowHint = False
    PasswordChar = '*'
    ShowHint = True
    TabOrder = 1
  end
  object EditPassword2: TEdit
    Left = 204
    Top = 131
    Width = 161
    Height = 23
    MaxLength = 15
    PasswordChar = '*'
    TabOrder = 2
  end
  object ButtonUnEncrypt: TBitBtn
    Left = 204
    Top = 161
    Width = 149
    Height = 31
    Caption = #35299#22771
    TabOrder = 3
    OnClick = ButtonUnEncryptClick
  end
  object EditFileName: TEdit
    Left = 24
    Top = 44
    Width = 290
    Height = 23
    Anchors = [akLeft, akTop, akRight]
    TabOrder = 4
  end
  object CheckBox1: TCheckBox
    Left = 23
    Top = 80
    Width = 226
    Height = 21
    Caption = #21152#22771#20043#21069#22791#20221#21407#25991#20214#20026' *.TMP'
    Checked = True
    State = cbChecked
    TabOrder = 5
  end
  object OpenDialog1: TOpenDialog
    Filter = #21487#25191#34892#25991#20214'(*.exe)|*.exe'
    Left = 176
  end
end