Lazarus中Base64的操作

在字串處理中，我們經常需要對檔案編碼然後再進行傳輸，通常會使用base64編碼，在freepascal中預設整合了這個單元，我們來介紹如何使用：

首先需要在引用單元的時候使用： use base64;

這個函式直接對字串進行解密、加密操作，非常簡單：

procedure tform1

.button1click
(sender
:tobject
);begin
memo1
.text
:=encodestringbase64
(memo1
.text
);end
;procedure tform1
.button2click
(sender
:tobject
);begin
memo1
.text
:=decodestringbase64
(memo1
.text
);end
;

var

b64:
tbase64encodingstream;s
:tfilestream;st
:tstringstream
;tempstr
:string
;ccount
:integer
;begin
ifopen
dialog1
.execute
then
s :=
tfilestream
.create
(open
dialog1
.filename
,fmopenread
)else
exit
;st 
:=tstringstream
.create(''
);try
b64 
:=tbase64encodingstream
.create(st
);try
memo1
.lines
.clear;//
b64.
writebuffer(s
,s.size
);setlength
(tempstr,s
.size);s
.read
(tempstr[1
],s.size
);ccount :=s
.size
;b64
.write
(tempstr[1
],ccount
);showmessage
(tempstr
);memo1
.lines
.add(st
.datastring
);finally
b64.
free
;end
;finallys.
free;st
.free
;end
;

C 處理base64 以及base64的原理分析

base64的原理，base64的碼表只有64個字元，如果要表達64個字元的話，使用6的bit即可完全表示 2的6次方為64 因為base64的編碼只有6個bit即可表示，而正常的字元是使用8個bit表示，8和6的最小公倍數是24，所以4個base64字元可以表示3個標準的ascll字元 publi...

base64編碼 動畫演示 Base 64 編碼

base64 是一種十分流行的編碼方式，僅僅使用 64 個字元加等號 就可以以文字的形式表示所有的二進位制資料了，因為它能夠把二進位制格式通過編碼轉換成可見字元，所有我們就可以通過的把二進位制格式比如，檔案等通過 base64 編碼然後通過文字的形式共享出去，是不是很神奇呀。把輸入的資料轉換成 二進...

物件base64轉碼 Base64編碼轉換

1 為什麼mime要有編碼轉換 在mime總結這篇經驗中，總結了mime相較於rfc 822的擴充套件功能，其中提到了rfc 822的缺陷 非英語字元都不能在電子郵件中使用 2 電子郵件中不能插入二進位制檔案 如 3 電子郵件不能有附件。能夠對文字進行簡單的加密 2 quoted printable...