Delphi调用unrar.dll操作rar压缩文件核心提示:delphi写好rar解压控件...关键接口函数:function RAROpenArchive(var ArchiveData: RAROpenArchiveData): THandle; stdcall; external _unrar;function RAROpenArchiveEx(var ArchiveData: RAROpenArchiveDataEx): THandle; stdcall; external _unrar;function RARCloseArchive(hArcData: THandle): Integer; stdcall; external _unrar;function RARReadHeader(hArcData: THandle; var HeaderData: RARHeaderData): Integer; stdcall; external _unrar;function RARReadHeaderEx(hArcData: THandle; var HeaderData: RARHeaderDataEx): Integer; stdcall; external _unrar;function RARProcessFile(hArcData: THandle; Operation: Integer; DestPath, DestName: PChar): Integer; stdcall; external _unrar;procedure RARSetCallback(hArcData: THandle; UnrarCallback: TUnrarCallback; UserData: Integer); stdcall; external _unrar;procedure RARSetPassword(hArcData: THandle; Password: PChar); stdcall; external _unrar;