|
|
作者: |
|
2017/5/3 11:06:10 |
1楼: |
收附件!
----------------------------------------------
虽千万人吾往矣!
|
作者: |
|
2017/5/3 11:29:47 |
2楼: |
非常感谢各位,验证了 http://download.csdn.net/detail/wang_80919/9320049 这个 AES 跨平台 加密结果是正确的。
----------------------------------------------
(C)(P)Flying Wang
|
作者: |
|
2017/5/3 11:40:20 |
3楼: |
非常感谢。
2楼,你好,你的也要10分。 我后来 根据文件名,搜索到这个,好像也是你的,你看看 是否一样? https://sourceforge.net/projects/flyutilsencrypt/
----------------------------------------------
我打的是酱油,而不是别的什么油。 我灌的是口水,而不是别的什么水。 我聊的折腾不是那个不折腾的折腾。 我说的阿娇不是那个邓玉娇的阿娇。 3个代表,6个为什么,9个肠胃炎。 D性强的领导干部都不喜欢热比娅。 我特别要讲的是,屁民网黄色论坛是我经常上网必选的 网站之一
|
作者: |
|
2017/5/3 13:18:37 |
5楼: |
3楼好样的,就是要绕过 CSDN 可恶的积分系统。 本来有免费的,就不需要去 CSDN 下载。
复制 4楼的内容,注意空格。
----------------------------------------------
(C)(P)Flying Wang
|
作者: |
|
2017/5/3 17:05:02 |
6楼: |
总算明白 4楼的意思,得了5分。
----------------------------------------------
我打的是酱油,而不是别的什么油。 我灌的是口水,而不是别的什么水。 我聊的折腾不是那个不折腾的折腾。 我说的阿娇不是那个邓玉娇的阿娇。 3个代表,6个为什么,9个肠胃炎。 D性强的领导干部都不喜欢热比娅。 我特别要讲的是,屁民网黄色论坛是我经常上网必选的 网站之一
|
作者: |
|
2017/5/3 19:15:56 |
6楼: |
刚才看了一下上面的2个不同的例子,发现最大的问题,我的IDE是2007,不支持一些新的语法。
另外,把我的project迁移到 新的IDE,需要比较长时间。
有点纠结 。
----------------------------------------------
我打的是酱油,而不是别的什么油。 我灌的是口水,而不是别的什么水。 我聊的折腾不是那个不折腾的折腾。 我说的阿娇不是那个邓玉娇的阿娇。 3个代表,6个为什么,9个肠胃炎。 D性强的领导干部都不喜欢热比娅。 我特别要讲的是,屁民网黄色论坛是我经常上网必选的 网站之一
|
作者: |
|
2017/5/3 20:50:38 |
7楼: |
搜mORMot,使用SynCrypto单元里的aes加密。
----------------------------------------------
-
|
作者: |
vga (vga) |
★☆☆☆☆ |
-
|
盒子活跃会员 |
|
2017/5/4 5:23:47 |
8楼: |
aes.pas 解压即可
----------------------------------------------
-
|
作者: |
|
2017/5/4 8:08:46 |
9楼: |
谢谢 楼上2位,可能我标题没有写清楚。
这次需要的算法是 AES/CBC/PKCS5Padding,秘钥长度128位。目的是解密java加密后的密文。 http://bbs.2ccc.com/topic.asp?topicid=532574
我看单纯的AES.PAS里 好像没有PKCS5Padding 相关的东西。
1楼,2楼里是我需要的,但是好像补支持低版本的IDE,我昨天晚上想,是否可以 用高版本把解密函数做到DLL里,再让D2007编译的EXE来调用?
----------------------------------------------
我打的是酱油,而不是别的什么油。 我灌的是口水,而不是别的什么水。 我聊的折腾不是那个不折腾的折腾。 我说的阿娇不是那个邓玉娇的阿娇。 3个代表,6个为什么,9个肠胃炎。 D性强的领导干部都不喜欢热比娅。 我特别要讲的是,屁民网黄色论坛是我经常上网必选的 网站之一
|
作者: |
|
2017/5/4 8:35:50 |
10楼: |
楼主可以试试 把 TBytes 改写成 Array of Byte。 TEncoding 去掉。
----------------------------------------------
(C)(P)Flying Wang
|
作者: |
|
2017/5/4 14:21:49 |
12楼: |
谢谢,楼上。是下面这个吧
跨平台 AES MD5 ECC DES RSA 加密解密 支持 进度 支持多种编码.源码.FlyUtilsXX X.2016-09-13.zip
我也是 wang_80919 (Flying Wang) 的代码,而且是 2016-09-13
我下载到 他的最新版 FlyUtilsEncrypt AES DES Blowfish CBC RSA ECC MD5 CRC.2017-03-01.zip
我今天做了其它事情,明天我按照10楼提示,看看能不能改成支持 2007的版本。
----------------------------------------------
我打的是酱油,而不是别的什么油。 我灌的是口水,而不是别的什么水。 我聊的折腾不是那个不折腾的折腾。 我说的阿娇不是那个邓玉娇的阿娇。 3个代表,6个为什么,9个肠胃炎。 D性强的领导干部都不喜欢热比娅。 我特别要讲的是,屁民网黄色论坛是我经常上网必选的 网站之一
|
作者: |
|
2017/5/4 14:32:43 |
13楼: |
我写代码,从来不考虑低版本。 我只考虑,运行结果和低版本兼容就行。 代码是不打算兼容低版本的。
这叫强制升级。
----------------------------------------------
(C)(P)Flying Wang
|
作者: |
|
2017/5/4 21:14:34 |
14楼: |
没有办法,老的project,大概80个unit了,迁移到新版IDE,时间太长了,只能到春节期间试试了。
自己改,试试不行,基本功不行。
----------------------------------------------
我打的是酱油,而不是别的什么油。 我灌的是口水,而不是别的什么水。 我聊的折腾不是那个不折腾的折腾。 我说的阿娇不是那个邓玉娇的阿娇。 3个代表,6个为什么,9个肠胃炎。 D性强的领导干部都不喜欢热比娅。 我特别要讲的是,屁民网黄色论坛是我经常上网必选的 网站之一
|
作者: |
|
2017/5/5 13:22:07 |
15楼: |
用 DLL的方案 调用成功了。这样的话,勉强能解决这个问题了。
----------------------------------------------
我打的是酱油,而不是别的什么油。 我灌的是口水,而不是别的什么水。 我聊的折腾不是那个不折腾的折腾。 我说的阿娇不是那个邓玉娇的阿娇。 3个代表,6个为什么,9个肠胃炎。 D性强的领导干部都不喜欢热比娅。 我特别要讲的是,屁民网黄色论坛是我经常上网必选的 网站之一
|
作者: |
|
2017/5/5 20:57:36 |
16楼: |
//PKCS5规则去补码 function PKCS5_DePadding(bytes: TBytes): AnsiString; var Encoding: TEncoding; size: Integer; paddingByte: Byte; tmpBytes: TBytes; begin paddingByte := bytes[Length(bytes) - 1];
SetLength(tmpBytes, Length(bytes) - paddingByte); Move(bytes[0], tmpBytes[0], Length(tmpBytes)); Encoding := TEncoding.UTF8; size := TEncoding.GetBufferEncoding(tmpBytes, Encoding); Result := Encoding.GetString(tmpBytes, size, Length(tmpBytes) - size) end;
这个哪位高手帮忙 改一下,不使用 TEncoding,实现同样功能,支持2007.
----------------------------------------------
我打的是酱油,而不是别的什么油。 我灌的是口水,而不是别的什么水。 我聊的折腾不是那个不折腾的折腾。 我说的阿娇不是那个邓玉娇的阿娇。 3个代表,6个为什么,9个肠胃炎。 D性强的领导干部都不喜欢热比娅。 我特别要讲的是,屁民网黄色论坛是我经常上网必选的 网站之一
|
作者: |
vga (vga) |
★☆☆☆☆ |
-
|
盒子活跃会员 |
|
2017/5/8 15:52:17 |
17楼: |
功能是? 百度查的: “PKCS7Padding跟PKCS5Padding的区别就在于数据填充方式,PKCS7Padding是缺几个字节就补几个字节的0,而PKCS5Padding是缺几个字节就补充几个字节的几,好比缺6个字节,就补充6个字节的6”
----------------------------------------------
-
|
作者: |
|
2017/5/8 18:32:12 |
18楼: |
就是这个函数本身的功能。不用 TEncoding。
因为 我用2007.
----------------------------------------------
我打的是酱油,而不是别的什么油。 我灌的是口水,而不是别的什么水。 我聊的折腾不是那个不折腾的折腾。 我说的阿娇不是那个邓玉娇的阿娇。 3个代表,6个为什么,9个肠胃炎。 D性强的领导干部都不喜欢热比娅。 我特别要讲的是,屁民网黄色论坛是我经常上网必选的 网站之一
|
作者: |
|
2017/5/8 19:00:06 |
19楼: |
不用 TBytes 换成 PAnsiChar 试试。
----------------------------------------------
(C)(P)Flying Wang
|
作者: |
|
2017/5/8 19:19:33 |
20楼: |
TBytes 2007里 好像有这个类型的。
TEncoding 2007 语法不支持。
----------------------------------------------
我打的是酱油,而不是别的什么油。 我灌的是口水,而不是别的什么水。 我聊的折腾不是那个不折腾的折腾。 我说的阿娇不是那个邓玉娇的阿娇。 3个代表,6个为什么,9个肠胃炎。 D性强的领导干部都不喜欢热比娅。 我特别要讲的是,屁民网黄色论坛是我经常上网必选的 网站之一
|
作者: |
|
2017/5/8 19:33:40 |
21楼: |
不听算了,关老子屁事。
----------------------------------------------
(C)(P)Flying Wang
|
作者: |
tiez (骑牛夜旅) |
★☆☆☆☆ |
-
|
普通会员 |
|
2017/5/9 11:38:23 |
23楼: |
服14楼,才立夏,工作计划就排到下个春节了
----------------------------------------------
-
|
作者: |
|
2017/7/3 18:55:20 |
24楼: |
真麻烦,感觉要能直接用as库直接调用,会更简单。
----------------------------------------------
相信自己,若自己都不相信,那还有谁可信。
|
|