CreateOleObject后,调用函数传递字节数组,报错,不支持此接口

坎坷家族 2010-06-09 04:23:44
代码如下:
var
aclass : Variant;
suz : string;
sz : Variant;
begin
aclass := CreateOleObject('Network.Crypto');
sz:=aClass.Encrypt3DES('0123456789','omXqC1jl1U9mUTmJomXqC1jl');
suz := aclass.ToBase64(sz);
Memo1.Lines.Add(suz);
end;

上面aClass.Encrypt3DES返回一个byte数组,sz:array of byte
aclass.ToBase64参数也是一个字节数组,执行到这里后,就报不支持此接口,这是怎么回事?
...全文
49 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
坎坷家族 2010-06-11
  • 打赏
  • 举报
回复
真晕了,aclass.ToBase64(strpas(@sz));就好了
SQLDebug_Fan 2010-06-09
  • 打赏
  • 举报
回复
就报不支持此接口,这是怎么回事?
查看一下接口是否支持。
bdmh 2010-06-09
  • 打赏
  • 举报
回复
不支持就是不支持,它没有这个接口怎会支持呢

5,388

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧