在D7里面如何使用Base64Encode 这个函数啊

Question

在D7里面如何使用Base64Encode 这个函数啊？

Answer 1

包含[IdCoder3To4]单元，可用[Base64Encode]函数procedure TForm1.Button1Click(Sender: TObject);
begin
  Memo1.Clear;
  Memo1.Lines.Add(Base64Encode(Edit1.Text));
end;

Answer 2

包含在Indy中的http://lysoft.7u7.net

Answer 3

//建议使用EncdDecd单元的函数～～
uses EncdDecd;function EncodeString(const Input: string): string;
function DecodeString(const Input: string): string;

Answer 4

但是DELPHI中根本没有这个函授啊，在D7中有没有相类似的函数呢