unit1.dfm

很精典加密算法程序

object Form1: TForm1
  Left = 71
  Top = 211
  Width = 301
  Height = 189
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = 'Blowfish'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {
    0000010001002020100001000400E80200001600000028000000200000004000
    0000010004000000000080020000000000000000000010000000000000000000
    000000008000008000000080800080000000800080008080000080808000C0C0
    C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
    0000000000000000000000000000000000000000000000000000000000000000
    000000000000000000000000000000000000000000000000000000000000000C
    CC0000000000000000000000CCC0000CC000000000000000000000000CC0000C
    C000999900009990099909900CC0000CC009900990099009009009900CC0000C
    C009900990099000009099900CC0000CC009900990099000009090900CC0000C
    C009900990099000009990900CC0000CC009900990099099009900900CC0000C
    CC0099990000990909990999CCC0000000000000000000000000000000000077
    0770006660055550444440000000007707700660660055044044000000000077
    0770066066005500404400000000077077070660660055000444000000000770
    7707066066005504404400000000077077077066600555504440000000000000
    0000000000005500000000000000000000000000000055050000000000000000
    0000000000000555000000000000000000000000000000110000000000000000
    0000000000000001000000000000000000000000101100001000000000000000
    0000000011011001100000000000000000000000110110011100000000000000
    0000000011011011010000000000000000000000111101110110000000000000
    000000001100000000000000000000000000000011000000000000000000FFFF
    FFFFFFFFFFFFFFFFFFFFFFFFFFFFE3FFFFF1E7FFFFF9E70F1899E6666D99E666
    7D19E6667D59E6667C59E6664CD9E30F2881FFFFFFFFC9C61008C99324C9C993
    34C9929338C9929324C992461183FFFF3FFFFFFF2FFFFFFF8FFFFFFFCFFFFFFF
    EFFFFFF4F7FFFFF267FFFFF263FFFFF24BFFFFF089FFFFF3FFFFFFF3FFFF}
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 16
    Top = 24
    Width = 27
    Height = 13
    Caption = 'Key   '
  end
  object Label2: TLabel
    Left = 16
    Top = 48
    Width = 41
    Height = 13
    Caption = 'regname'
  end
  object Label3: TLabel
    Left = 16
    Top = 80
    Width = 39
    Height = 13
    Caption = 'regcode'
  end
  object Label4: TLabel
    Left = 8
    Top = 120
    Width = 189
    Height = 13
    Caption = 'wofan[OCN]'#23646#20110#20013#22269#30772#35299#32452#32455#65306'OCN'
  end
  object Edit1: TEdit
    Left = 80
    Top = 16
    Width = 201
    Height = 21
    TabOrder = 0
    Text = 'xiongfei'
  end
  object Edit2: TEdit
    Left = 80
    Top = 48
    Width = 201
    Height = 21
    TabOrder = 1
    Text = 'wofan'
  end
  object Edit3: TEdit
    Left = 80
    Top = 80
    Width = 201
    Height = 21
    TabOrder = 2
  end
  object Button1: TButton
    Left = 224
    Top = 120
    Width = 49
    Height = 17
    Caption = #31639#21495
    TabOrder = 3
    OnClick = Button1Click
  end
end