⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 unitdes.dfm

📁 单钥密码算法 AES DES IDEA LZW RC5
💻 DFM
📖 第 1 页 / 共 2 页
字号:
        OnEnter = txtSubKeyEnter
        OnExit = txtSubKeyExit
      end
      object txtSubKey1: TEdit
        Left = 472
        Top = 16
        Width = 41
        Height = 21
        MaxLength = 3
        TabOrder = 7
        Text = '1'
        OnEnter = txtSubKeyEnter
        OnExit = txtSubKeyExit
      end
      object txtKey1: TEdit
        Left = 104
        Top = 43
        Width = 440
        Height = 21
        Color = clScrollBar
        ReadOnly = True
        TabOrder = 8
      end
      object txtKey2: TEdit
        Left = 104
        Top = 67
        Width = 440
        Height = 21
        Color = clScrollBar
        ReadOnly = True
        TabOrder = 9
      end
      object txtKey3: TEdit
        Left = 104
        Top = 91
        Width = 440
        Height = 21
        Color = clScrollBar
        ReadOnly = True
        TabOrder = 10
      end
      object txtKey4: TEdit
        Left = 104
        Top = 115
        Width = 440
        Height = 21
        Color = clScrollBar
        ReadOnly = True
        TabOrder = 11
      end
      object txtKey5: TEdit
        Left = 104
        Top = 139
        Width = 440
        Height = 21
        Color = clScrollBar
        ReadOnly = True
        TabOrder = 12
      end
      object txtKey6: TEdit
        Left = 104
        Top = 163
        Width = 440
        Height = 21
        Color = clScrollBar
        ReadOnly = True
        TabOrder = 13
      end
      object txtKey7: TEdit
        Left = 104
        Top = 187
        Width = 440
        Height = 21
        Color = clScrollBar
        ReadOnly = True
        TabOrder = 14
      end
      object txtKey8: TEdit
        Left = 104
        Top = 211
        Width = 440
        Height = 21
        Color = clScrollBar
        ReadOnly = True
        TabOrder = 15
      end
      object txtKey9: TEdit
        Left = 104
        Top = 235
        Width = 440
        Height = 21
        Color = clScrollBar
        ReadOnly = True
        TabOrder = 16
      end
      object txtKey10: TEdit
        Left = 104
        Top = 259
        Width = 440
        Height = 21
        Color = clScrollBar
        ReadOnly = True
        TabOrder = 17
      end
      object txtKey11: TEdit
        Left = 104
        Top = 283
        Width = 440
        Height = 21
        Color = clScrollBar
        ReadOnly = True
        TabOrder = 18
      end
      object txtKey12: TEdit
        Left = 104
        Top = 307
        Width = 440
        Height = 21
        Color = clScrollBar
        ReadOnly = True
        TabOrder = 19
      end
      object txtKey13: TEdit
        Left = 104
        Top = 331
        Width = 440
        Height = 21
        Color = clScrollBar
        ReadOnly = True
        TabOrder = 20
      end
      object txtKey14: TEdit
        Left = 104
        Top = 355
        Width = 440
        Height = 21
        Color = clScrollBar
        ReadOnly = True
        TabOrder = 21
      end
      object txtKey15: TEdit
        Left = 104
        Top = 379
        Width = 440
        Height = 21
        Color = clScrollBar
        ReadOnly = True
        TabOrder = 22
      end
      object txtKey16: TEdit
        Left = 104
        Top = 403
        Width = 440
        Height = 21
        Color = clScrollBar
        ReadOnly = True
        TabOrder = 23
      end
      object CmdGetKey: TBitBtn
        Left = 562
        Top = 12
        Width = 81
        Height = 25
        Caption = #38543#26426#23494#38053
        TabOrder = 24
        OnClick = CmdGetKeyClick
        Glyph.Data = {
          DE010000424DDE01000000000000760000002800000024000000120000000100
          0400000000006801000000000000000000001000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333336633
          3333333333333FF3333333330000333333364463333333333333388F33333333
          00003333333E66433333333333338F38F3333333000033333333E66333333333
          33338FF8F3333333000033333333333333333333333338833333333300003333
          3333446333333333333333FF3333333300003333333666433333333333333888
          F333333300003333333E66433333333333338F38F333333300003333333E6664
          3333333333338F38F3333333000033333333E6664333333333338F338F333333
          0000333333333E6664333333333338F338F3333300003333344333E666433333
          333F338F338F3333000033336664333E664333333388F338F338F33300003333
          E66644466643333338F38FFF8338F333000033333E6666666663333338F33888
          3338F3330000333333EE666666333333338FF33333383333000033333333EEEE
          E333333333388FFFFF8333330000333333333333333333333333388888333333
          0000}
        NumGlyphs = 2
      end
      object RadioGroup1: TRadioGroup
        Left = 560
        Top = 48
        Width = 113
        Height = 65
        Caption = #23376#23494#38053#29983#25104#26041#24335
        TabOrder = 25
      end
      object RB1: TRadioButton
        Left = 568
        Top = 64
        Width = 89
        Height = 17
        Caption = #26631#20934
        Checked = True
        TabOrder = 26
        TabStop = True
        OnClick = RBClick
      end
      object RB2: TRadioButton
        Left = 568
        Top = 88
        Width = 89
        Height = 17
        Caption = #30452#25509#31227#20301
        TabOrder = 27
        OnClick = RBClick
      end
    end
    object TabSheet4: TTabSheet
      Caption = #21021#22987#32622#25442#34920
      ImageIndex = 3
      object Label29: TLabel
        Left = 32
        Top = 24
        Width = 81
        Height = 13
        AutoSize = False
        Caption = #21021#22987#32622#25442#34920
      end
      object Label30: TLabel
        Left = 64
        Top = 192
        Width = 49
        Height = 13
        AutoSize = False
        Caption = #36870#34920
      end
      object Button1: TButton
        Left = 400
        Top = 24
        Width = 75
        Height = 25
        Caption = #38543#26426'IP'#34920
        TabOrder = 0
        OnClick = Button1Click
      end
      object SGIP: TStringGrid
        Left = 112
        Top = 24
        Width = 257
        Height = 145
        ColCount = 8
        DefaultColWidth = 30
        DefaultRowHeight = 16
        Enabled = False
        FixedCols = 0
        RowCount = 8
        FixedRows = 0
        TabOrder = 1
      end
      object SGIPR: TStringGrid
        Left = 112
        Top = 184
        Width = 257
        Height = 145
        ColCount = 8
        DefaultColWidth = 30
        DefaultRowHeight = 16
        Enabled = False
        FixedCols = 0
        RowCount = 8
        FixedRows = 0
        TabOrder = 2
      end
    end
    object TabSheet3: TTabSheet
      Caption = #21152'/'#35299#23494#28436#31034
      ImageIndex = 2
      DesignSize = (
        688
        466)
      object Label32: TLabel
        Left = 16
        Top = 44
        Width = 65
        Height = 13
        AutoSize = False
        Caption = #21152#23494#21069
      end
      object Label33: TLabel
        Left = 16
        Top = 68
        Width = 65
        Height = 13
        AutoSize = False
        Caption = #21152#23494#21518
      end
      object Label34: TLabel
        Left = 16
        Top = 92
        Width = 57
        Height = 13
        AutoSize = False
        Caption = #35299#23494#21518
      end
      object Label35: TLabel
        Left = 16
        Top = 160
        Width = 225
        Height = 13
        AutoSize = False
        Caption = #21152'/'#35299#23494#36807#31243#20013#30340'L[i]'#21644'R[i]'#25968#25454
      end
      object CmdGetP: TButton
        Left = 16
        Top = 8
        Width = 121
        Height = 25
        Caption = #21462#26126#25991#21040'L0R0'
        TabOrder = 0
        OnClick = CmdGetPClick
      end
      object CmdEncryptTrans: TButton
        Left = 152
        Top = 8
        Width = 121
        Height = 25
        Caption = #32463#36807'16'#27425#21464#25442
        TabOrder = 1
        OnClick = CmdEncryptTransClick
      end
      object CmdShowCode: TButton
        Left = 288
        Top = 8
        Width = 121
        Height = 25
        Caption = #36716#25104#23494#25991
        TabOrder = 2
        OnClick = CmdShowCodeClick
      end
      object txtBinSrc: TEdit
        Left = 71
        Top = 40
        Width = 434
        Height = 21
        Color = cl3DLight
        ReadOnly = True
        TabOrder = 3
      end
      object txtBinCode: TEdit
        Left = 71
        Top = 64
        Width = 434
        Height = 21
        Color = cl3DLight
        ReadOnly = True
        TabOrder = 4
      end
      object txtBinUnCode: TEdit
        Left = 71
        Top = 88
        Width = 434
        Height = 21
        Color = cl3DLight
        ReadOnly = True
        TabOrder = 5
      end
      object CmdGetC: TButton
        Left = 16
        Top = 120
        Width = 121
        Height = 25
        Caption = #21462#23494#25991#21040'L0R0'
        TabOrder = 6
        OnClick = CmdGetCClick
      end
      object CmdDecryptTrans: TButton
        Left = 152
        Top = 120
        Width = 121
        Height = 25
        Caption = #32463#36807'16'#27425#21464#25442
        TabOrder = 7
        OnClick = CmdDecryptTransClick
      end
      object CmdShowText: TButton
        Left = 288
        Top = 120
        Width = 121
        Height = 25
        Caption = #36716#25104#26126#25991
        TabOrder = 8
        OnClick = CmdShowTextClick
      end
      object Memo1: TMemo
        Left = 16
        Top = 176
        Width = 665
        Height = 249
        Anchors = [akLeft, akTop, akRight, akBottom]
        Color = cl3DLight
        ScrollBars = ssBoth
        TabOrder = 9
      end
      object txtDestText: TEdit
        Left = 512
        Top = 88
        Width = 105
        Height = 21
        Color = cl3DLight
        ReadOnly = True
        TabOrder = 10
      end
      object txtSrcText: TEdit
        Left = 512
        Top = 40
        Width = 105
        Height = 21
        MaxLength = 8
        TabOrder = 11
        Text = '12345678'
      end
      object txtCodeText: TEdit
        Left = 512
        Top = 64
        Width = 105
        Height = 21
        Color = cl3DLight
        ReadOnly = True
        TabOrder = 12
      end
      object CmdDoAll: TButton
        Left = 504
        Top = 120
        Width = 121
        Height = 25
        Caption = #33258#21160#25191#34892#20840#36807#31243
        TabOrder = 13
        OnClick = CmdDoAllClick
      end
      object CmdClearLog: TButton
        Left = 600
        Top = 432
        Width = 75
        Height = 25
        Anchors = [akRight, akBottom]
        Caption = #28165#31354#35760#24405
        TabOrder = 14
        OnClick = CmdClearLogClick
      end
    end
  end
  object OpenDlg: TOpenDialog
    Left = 624
  end
end

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -