我用了下面代码解密由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'?