delphi 字幕下载单元SubDownload.pas


翻译来自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.

联系电话:
020-00000000
联系电话:
020-00000000
联系电话:
020-12345678