HSPポータル
サイトマップ お問い合わせ


HSPTV!掲示板


未解決 解決 停止 削除要請

2011
0325
HSP ZIP圧縮HSPでZIP圧縮5解決


HSP ZIP圧縮

リンク

2011/3/25(Fri) 22:28:26|NO.37874

HSPでの解凍方法のサンプルは良く見るのですが

HSPでZIP圧縮などのサンプルは見た事がありません

HSPでZIP等に圧縮するにはどうすればいいのでしょうか?

サンプルソースなどをくれると有難いです...

回答よろしくお願いします ( _ _ )



この記事に返信する


backdrop

リンク

2011/3/25(Fri) 23:09:11|NO.37875

ググってみたところKpanさんのLet's HSP!が参考になるかと
「総合アーカイバプロジェクト」(http://www.madobe.net/archiver/index.html)のリンクが張られてました
どうやらIZIP32J.DLLを使うようです
ZIP32J.DLLのダウンロードの下にZIP32.DLLのダウンロードもありますので忘れずにダウンロードしてください

使用するのはZip関数です

#uselib "ZIP32J.DLL" #cfunc Zip "Zip" sptr, sptr, var, sptr sdim ggg, 20000 a=Zip( hwnd, "-r test.zip test.txt", ggg, 1024*1024 ) if a != 0 : dialog "Error"
こんなものかな



backdrop

リンク

2011/3/25(Fri) 23:11:18|NO.37876

↑の記事(No.37875)に追記
#cfuncは#funcでもOK。
この場合変数aではなくstatが0かどうか調べます



backdrop

リンク

2011/3/25(Fri) 23:14:16|NO.37877

一番大事なこと書き忘れた(何度もごめんなさい)
ダウンロードする(使用する)のは、
ZIP32.DLLとZIP32J.DLLです
で、必ずC:\Windows\System32か<HSPディレクトリ>に上のファイルをコピー



skyblue

リンク

2011/3/26(Sat) 07:04:00|NO.37889

命令形式の定義ならvectorにarchiveという名前であります。



HSP ZIP圧縮

リンク

2011/3/26(Sat) 13:38:36|NO.37893

お蔭様で解決しました!!

本当にありがとうございました!!



ONION software Copyright 1997-2021(c) All rights reserved.