|
|
||||
アプリケーション > 解凍ソフトは難しい![ 1 | 2 ] |
|||||
解凍ソフトは難しい! - 2/2 |
更新 : 2009/01/05 |
||||
|
|
|||||
OnDestroy
イベントに、終了時の処理を書いておきます。 FreeLibrary 関数に、LoadLibrary 関数で得たハンドルを引数として渡し、DLL が使っていたメモリを解放しています。
次はいよいよ解凍ソフトのメイン部分、ExtractBtn のクリックイベントです。 最初に今後必要になる変数(圧縮ファイル名・スイッチ類)を宣言しておきます。 OpenDialog の Filter をセットします(これはプロパティで設定してもよいです)。OpenDialog を表示してファイルが選択されなければ解凍処理を終わりにします。 ファイル名を取得したら、コマンドラインを作成します。Unlha にコマンドラインを渡して、解凍を実行します。 コマンドラインの様式は、UNLHA32.DLL のドキュメントに書かれています。今回は解凍に必要な最低限のスイッチを記述しておきます。 Memo1 をクリアして、Unlha を実行した結果を表示させます。
最後に終了ボタンのイベントを記述します。
以上ですべてのコーディングが終わりました。お疲れ様でした。 ひとこと: 今回作成したのは、解凍専用ソフトでしたが、圧縮機能も追加したいところです。 時間のある方は UNLHA32.DLL 付属のドキュメントをよく読んで機能を追加してみてください。 以上のコードは、ご自由にお使いいただいて結構です。ただし、コードを使用した結果、問題が生じても責任はいっさい負いかねますのでご了承ください。 |