example.dfm

本例采用Delphi实现经典的DES加密解密算法,界面友好,功能齐全,代码书写规范,可供参考!

object Form2: TForm2
  Left = 186
  Top = 362
  Width = 502
  Height = 457
  Caption = 'DES'#20363#23376
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -16
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 16
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 494
    Height = 423
    Align = alClient
    BevelInner = bvLowered
    BevelOuter = bvLowered
    TabOrder = 0
    object GroupBox1: TGroupBox
      Left = 3
      Top = 2
      Width = 391
      Height = 415
      Align = alCustom
      TabOrder = 0
      object GroupBox2: TGroupBox
        Left = 3
        Top = 8
        Width = 385
        Height = 105
        Caption = #35831#36755#20837#23383#31526
        TabOrder = 0
        object Memo1: TMemo
          Left = 4
          Top = 16
          Width = 377
          Height = 85
          TabOrder = 0
        end
      end
      object GroupBox3: TGroupBox
        Left = 2
        Top = 188
        Width = 385
        Height = 105
        Caption = #23494#25991
        TabOrder = 1
        object Memo2: TMemo
          Left = 4
          Top = 16
          Width = 377
          Height = 85
          TabOrder = 0
        end
      end
      object GroupBox4: TGroupBox
        Left = 2
        Top = 300
        Width = 385
        Height = 105
        Caption = #26126#25991
        TabOrder = 2
        object Memo3: TMemo
          Left = 4
          Top = 16
          Width = 377
          Height = 85
          TabOrder = 0
        end
      end
    end
    object Button1: TButton
      Left = 408
      Top = 40
      Width = 73
      Height = 37
      Caption = #21152' '#23494
      TabOrder = 1
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 408
      Top = 116
      Width = 73
      Height = 37
      Caption = #35299' '#23494
      TabOrder = 2
      OnClick = Button2Click
    end
    object Button3: TButton
      Left = 408
      Top = 192
      Width = 73
      Height = 37
      Caption = #28165' '#23631
      TabOrder = 3
    end
    object GroupBox5: TGroupBox
      Left = 7
      Top = 120
      Width = 385
      Height = 61
      Caption = #35831#36755#20837#23494#38053
      TabOrder = 4
      object Edit1: TEdit
        Left = 4
        Top = 24
        Width = 377
        Height = 24
        TabOrder = 0
      end
    end
  end
end