如何对一个对象进行加密???

hunhunnowant 2003-01-03 11:44:53
急!!!
...全文
14 点赞 收藏 6
写回复
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
Eastunfail 2003-01-05
If the object is unable to serialize, so it is hard to be encrypted, or you can encrypt the fields inside object one by one.
回复
Nizvoo 2003-01-05
不知道,等。

楼上可中意邓丽君
回复
see1230 2003-01-04
她说的是运行期的一个对象啦 就像java一样 在运行期间把序列化的对象传给另外得机器使用
回复
Mac112 2003-01-04
可以利用字符串的ASII码,利用一个加密函数
function TKey.decrypt(s:string):string;
var
i,j,k : integer;
s1 : string;
begin
s1 :='';
j :=length(s);
for i:=1 to j do
begin
k :=j*j-i*i+3;
s1:=s1+chr(ord(s[i])-k);
end;
result :=s1;
end;

回复
smilelhh 2003-01-04
不知道说行对不对.
将dcu文件代替pas文件!
回复
RamjetZhang 2003-01-04
什么对象?比如按字节加密,或对其中数据加密?
回复
发动态
发帖子
网络通信/分布式开发
创建于2007-08-02

1565

社区成员

Delphi 网络通信/分布式开发
申请成为版主
社区公告
暂无公告