Alextp

|
Posted: Mon Nov 27, 2006 04:03 Post subject: |
|
|
2Lamer
Тогда так. Надо приделать поддержку unrar через unrar.dll в папке Тотала.
И поддержку unzip через unzip32.dll из моих исходников OOSimpleViewer. Можешь пока начать?
Code: |
procedure InitUnrarDll(const fn: string);
procedure InitUnzipDll(const fn: string);
function UnpackWithDll(const ArcName, DestDir: string): boolean; |
это должно быть в твоем юните. В завивимости от расширения вызывать unrar, unzip или давать false. Если архив не распаковывается, давать false. Распаковка со всеми подкаталогами. Прогресс не нужен. И демо к ней, чтобы на архивах потеcтировать. Когда заработает, можно будет приделать к Plugman'у. |
|