2013-11-26

【Delphi】Base64 Encode/Decode

  1.  
  2. uses EncdDecd;
  3.  
  4. ...
  5. ...
  6.  
  7.  
  8. // 串流
  9. procedure EncodeStream(Input, Output: TStream); // 編碼
  10. procedure DecodeStream(Input, Output: TStream); // 解碼
  11.  
  12. // 字串
  13. function EncodeString(const Input: string): string; // 編碼
  14. function DecodeString(const Input: string): string; // 解碼
  15.  

沒有留言:

張貼留言