本文整理自网络，侵删。
翻译来自MPlay的windows编译版中的SubDownloader字幕下载工具。
unit SubDownload;
interface
uses Windows;
type
TFUNC_CallBackFinish = function(number, bad_number: Integer): Pointer;
TFUNC_CallBackA = function(const sub_path: AnsiChar;
is_eng, sub_delay: Integer): Pointer;
TFUNC_CallBackW = function(const sub_path: WideChar;
is_eng, sub_delay: Integer): Pointer;
function DownloaderSubtitleA(const filepath: AnsiChar; eng_sub: BOOL;
Callback: TFUNC_CallBackA; callbf: TFUNC_CallBackFinish): Integer; stdcall;
external 'SubDownload.dll';
function DownloaderSubtitleW(const filepath: WideChar; eng_sub: BOOL;
Callback: TFUNC_CallBackW; callbf: TFUNC_CallBackFinish): Integer; stdcall;
external 'SubDownload.dll';
implementation
end.
相关阅读 >>
Delphi if语法,弹出提示框,不等于写法,判断是否为空
Delphi中exit,abort,break,continue的区别介绍
Delphi 中 findwindow 和 findwindowex 的语法和用法
更多相关阅读请进入《Delphi》频道 >>
