全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:2435
推到 Plurk!
推到 Facebook!

如何在Delphi中實現AES加解密功能?

答題得分者是:老大仔
h@visli
資深會員


發表:101
回覆:417
積分:418
註冊:2004-02-13

發送簡訊給我
#1 引用回覆 回覆 發表時間:2014-04-19 11:46:32 IP:183.49.xxx.xxx 訂閱
各位,我需要在我的Delphi程序中增加對數據的AES加解密功能,特別要求採用CBC模式與<!--[if gte mso 9]><xml> Normal 0 7.8 磅 0 2 false false false EN-US ZH-CN X-NONE </xml><![endif]-->PKCS5Padding填充,但沒有找到合適的組件或庫,所以向各位救援來了。<!--[if gte mso 9]><xml> </xml><![endif]--><!--[if gte mso 10]> <style> /* Style Definitions */ table.MsoNormalTable {mso-style-name:普通表格; mso-tstyle-rowband-size:0; mso-tstyle-colband-size:0; mso-style-noshow:yes; mso-style-priority:99; mso-style-parent:""; mso-padding-alt:0cm 5.4pt 0cm 5.4pt; mso-para-margin:0cm; mso-para-margin-bottom:.0001pt; mso-pagination:widow-orphan; font-size:10.0pt; font-family:"Times New Roman","serif";} </style>
------
------------------------
博采眾家之長,奉獻綿薄之力
------------------------
老大仔
尊榮會員


發表:77
回覆:835
積分:1082
註冊:2006-07-06

發送簡訊給我
#2 引用回覆 回覆 發表時間:2014-04-21 07:51:30 IP:210.61.xxx.xxx 未訂閱
大大請參考以下連結試試:
delphi.ktop.com.tw/board.php

===================引 用 h@visli 文 章===================
各位,我需要在我的Delphi程序中增加對數據的AES加解密功能,特別要求採用CBC模式與PKCS5Padding填充,但沒有找到合適的組件或庫,所以向各位救援來了。
h@visli
資深會員


發表:101
回覆:417
積分:418
註冊:2004-02-13

發送簡訊給我
#3 引用回覆 回覆 發表時間:2014-04-21 16:55:04 IP:61.145.xxx.xxx 訂閱
多謝!
這裏的ElAES.pas可以正常運算出結果,但沒看出來他究竟是使用什麼方式填充,是PKCS5還是PKCS7,或者是其他。我想填充方式不一樣,結果應該也不一樣的。
===================引 用 老大仔 文 章===================
大大請參考以下連結試試:
delphi.ktop.com.tw/board.php

===================引 用 h@visli 文 章===================
各位,我需要在我的Delphi程序中增加對數據的AES加解密功能,特別要求採用CBC模式與PKCS5Padding填充,但沒有找到合適的組件或庫,所以向各位救援來了。
------
------------------------
博采眾家之長,奉獻綿薄之力
------------------------
leveon
資深會員


發表:30
回覆:386
積分:303
註冊:2012-02-12

發送簡訊給我
#4 引用回覆 回覆 發表時間:2014-05-15 11:12:11 IP:111.241.xxx.xxx 訂閱
這套和
http://aes.online-domain-tools.com/
結果應該會一樣
但和市面上 C語言寫的Lib 會不一樣

不知你"比對一樣" 是和誰比對的?

LockBox 可以 但缺點是無法控制 IV
需要自己修改程式




===================引 用 h@visli 文 章===================
多謝!
這裏的ElAES.pas可以正常運算出結果,但沒看出來他究竟是使用什麼方式填充,是PKCS5還是PKCS7,或者是其他。我想填充方式不一樣,結果應該也不一樣的。
===================引 用 老大仔 文 章===================
大大請參考以下連結試試:
delphi.ktop.com.tw/board.php

===================引 用 h@visli 文 章===================
各位,我需要在我的Delphi程序中增加對數據的AES加解密功能,特別要求採用CBC模式與PKCS5Padding填充,但沒有找到合適的組件或庫,所以向各位救援來了。
leveon
資深會員


發表:30
回覆:386
積分:303
註冊:2012-02-12

發送簡訊給我
#5 引用回覆 回覆 發表時間:2014-06-04 15:04:03 IP:61.228.xxx.xxx 訂閱
ElAES 是Zero padding
系統時間:2017-12-13 21:12:09
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!