● 測試程式說明

(1).libeay32.dll => open ssl 提供的 dll, 需有這個 dll 才可做 https 相關操作
(2).ssleay32.dll => open ssl 提供的 dll, 需有這個 dll 才可做 https 相關操作
(3).LazHttpsGF.dll => Lazarus 寫 dll, 提供一個用 indy 元件寫的以抓取網路上檔案的函式

函式名稱 HttpsGetFile()
傳入參數一 : https 網址
傳入參數二 : 下載到本地端的檔名
function HttpsGetFile(str_https_url: pchar; str_dl_fname: pchar): integer;

(4).project1.exe => Lazarus 寫的呼叫 dll 的測試程式, 可用其他語言開發

//下載
procedure TForm1.Button1Click(Sender: TObject);
var fn: string;
r: integer;
begin
fn:=ExtractFilePath(Application.ExeName) Edit2.Text;

//呼叫 dll 中的函示
r:=HttpsGetFile(pchar(Edit1.Text), pchar(fn));

if (r=1) then begin
ShowMessage(fn ' 下載成功');
end else begin
ShowMessage(fn ' 下載失敗');
end;

end;



● Lazarus 相關下載

(1).Lazarus 當漏
https://www.lazarus-ide.org/

(2).indy 當漏
http://indy.fulgan.com/ZIP/

解壓後目錄 ..\Lib\indylaz.lpk 就是 Lazarus 的元件安裝包

(3).SSL 當漏 (TLS V1.2 加密協定)
http://indy.fulgan.com/SSL/

下載 openssl-1.0.2o-i386-win32.zip 解壓後,
將 libeay32.dll & ssleay32.dll兩個檔案放到執行檔同目錄

附加檔案：5b798578428b5_LazHttpsGF_Test.zip