关于INDY控件(50分)

  • 主题发起人 主题发起人 logpie
  • 开始时间 开始时间
L

logpie

Unregistered / Unconfirmed
GUEST, unregistred user!
那个INDY MISC里的BASE64 EN/DE DECODER控件怎么用咧?最好给个例子,谢谢
 
看一下例子吧
 
对,Demo里面有很多例子,很详细
E:/Program Files/Borland/Delphi6/Demos/Indy
 
可是那里面没有base64,md4,md5等的例子啊
 
var
Deststring:string;
begin
……
id1base64.CodeString(Source);
DestString:=id1base64.CompletedInput;
//下面是目标字符
Delete(DestString, 1, 2);
……
end;
 
我用了下面代码解密由IdBase64Encoder加密的字符串:
procedure TForm1.Button1Click(Sender: TObject);
var s:string;

begin
idbase64.CodeString('J‹«q?'); //加密前字符串为'source'
s:=idbase64.CompletedInput ;
delete (s,1,2);
edit2.Text :=s;
end;

end.

为什么edit2显示结果是'SourcT8=',而不是'source'?
 
接受答案了.
 
后退
顶部