{---プログラム掲示板投稿フォーム--- 【ソフト名】Mk lzc (バージョン 00.1) 【作 成 者】のぐちゃん (連絡先:xxx) 【種　　別】フリーソフトウェア 【ひまわりのバージョン】ver.1.15 【転　　件】可(転載条件:ご自由に) 【ひまわり本体への梱包】可 【実行時に利用作成するファイル】無 【コメント】圧縮プログラム、Mk lzc エクスプローラ感覚で、ファイル収集、そして、圧縮。 解凍には、Ext lzcを、お使い下さい。 ---投稿フォームここまで---} {圧縮} '母艦の設定 母艦の、テキストは、「Mk LZC Ver.1」 母艦の、リサイズは、オフ。 '配色の設定 HKEY_CURRENT_USERの、`Control Panel\Colors`を、レジストリ開く。 `ButtonFace`を、レジストリ読む。それを、『 』で、区切る。 レジストリ閉じる。 母艦の、背景色は、RGB(それ#0, それ#1, それ#2)。 'オブジェクト作成(ボタン&リスト) 「リストに圧縮したいファイルをドロップしてください。」と、表示。 ファイルリストを、リストとして、作成。 その、サイズは、(10,40,630,300) その、ファイルドロップは、オン。 保存ボタンを、ボタンとして、作成。 その、イベントを、リスト保存に、設定。 その、テキストは、「CAB圧縮(&C)」。 保存2ボタンを、ボタンとして、作成。 その、イベントを、リスト保存2に、設定。 その、テキストは、「LZH圧縮(&L)」。 保存3ボタンを、ボタンとして、作成。 その、イベントを、リスト保存3に、設定。 その、テキストは、「ZIP圧縮(&Z)」。 待機。 ＊リスト保存3 「ZIPファイル(*.zip)|*.zip」を、書込ファイル選択。 ファイルリストの、アイテムを、圧縮ファイル3に、得る。 圧縮ファイル3を、それへ、圧縮。 待機 ＊リスト保存2 「LZHファイル(*.lzh)|*.LZH」を、書込ファイル選択。 ファイルリストの、アイテムを、圧縮ファイル2に、得る。 圧縮ファイル2を、それへ、圧縮。 待機 ＊リスト保存 「キャビネットファイル(*.cab)|*.cab」を、書込ファイル選択。 ファイルリストの、アイテムを、圧縮ファイルに、得る。 圧縮ファイルを、それへ、圧縮。 待機

ひまわりは、DLLさえあれば、多くのアーカイブ形式を扱えるのがいいですよね。 シンプルなプログラムは好きなのですが、 「ファイル選択ダイアログをキャンセルした時」、 「ファイルリストにアイテムが１つもない時」などに、 不適切な動作をしないようにする必要があります。 > ＊リスト保存3 > 「ZIPファイル(*.zip)|*.zip」を、書込ファイル選択。 ここで、 　　　もし、それ=「」ならば、待機。 などと。