OSDN Git Service

書庫を複製する機能を追加。
[tpi/lychee.git] / src / lychee / frm_main.cpp
index 7d4f8c1..1e22df3 100644 (file)
@@ -85,6 +85,7 @@ MainFrame::~MainFrame()
                this->conf.WriteId(CONF_LISTVIEW_C_PATH,     this->list_ctrl->GetColumnWidth(7));\r
                this->conf.WriteId(CONF_LISTVIEW_C_TYPE,     this->list_ctrl->GetColumnWidth(8));\r
                this->conf.WriteId(CONF_LISTVIEW_C_NO,       this->list_ctrl->GetColumnWidth(9));\r
+               this->conf.WriteId(CONF_LISTVIEW_C_COMMENT,  this->list_ctrl->GetColumnWidth(10));\r
                this->conf.WriteId(CONF_LISTVIEW_S_COLUMN,   g_nSortColumn);\r
                this->conf.WriteId(CONF_LISTVIEW_S_ASCEND,   g_fSortAscend);\r
        }\r
@@ -102,6 +103,7 @@ BEGIN_EVENT_TABLE(MainFrame, wxFrame)
        EVT_MENU(XRCID("Arc_Create"),  MainFrame::OnArcCreate)\r
        EVT_MENU(XRCID("Arc_Open"),    MainFrame::OnArcOpen)\r
        EVT_MENU(XRCID("Arc_Close"),   MainFrame::OnArcClose)\r
+       EVT_MENU(XRCID("Arc_Clone"),   MainFrame::OnArcClone)\r
        EVT_MENU(XRCID("Arc_Add"),     MainFrame::OnArcAdd)\r
        EVT_MENU(XRCID("Arc_SFX"),     MainFrame::OnArcConvert)\r
        EVT_MENU(XRCID("Arc_UnSFX"),   MainFrame::OnArcConvert)\r
@@ -110,6 +112,7 @@ BEGIN_EVENT_TABLE(MainFrame, wxFrame)
        EVT_MENU(XRCID("Arc_Delete"),  MainFrame::OnArcDelete)\r
        EVT_MENU(XRCID("Arc_Test"),    MainFrame::OnArcTest)\r
        EVT_MENU(XRCID("Arc_Repair"),  MainFrame::OnArcRepair)\r
+       EVT_MENU(XRCID("Exe_Copy"),    MainFrame::OnExeCopy)\r
        EVT_MENU(XRCID("Exe_View_Icons"),  MainFrame::OnViewMode)\r
        EVT_MENU(XRCID("Exe_View_Details"),MainFrame::OnViewMode)\r
        EVT_MENU(XRCID("Exe_View_List"),   MainFrame::OnViewMode)\r
@@ -120,8 +123,10 @@ BEGIN_EVENT_TABLE(MainFrame, wxFrame)
        EVT_TREE_SEL_CHANGED(XRCID("TreeView"), MainFrame::OnTreeChanged)\r
        EVT_TREE_BEGIN_DRAG( XRCID("TreeView"), MainFrame::OnTreeBeginDrag)\r
        // ListView\r
-       EVT_LIST_ITEM_ACTIVATED(XRCID("ListView"), MainFrame::OnListItemDClick)\r
-       EVT_LIST_BEGIN_DRAG(    XRCID("ListView"), MainFrame::OnListBeginDrag)\r
+       EVT_LIST_ITEM_SELECTED(  XRCID("ListView"), MainFrame::OnListItemSelect)\r
+       EVT_LIST_ITEM_DESELECTED(XRCID("ListView"), MainFrame::OnListItemSelect)\r
+       EVT_LIST_ITEM_ACTIVATED( XRCID("ListView"), MainFrame::OnListItemDClick)\r
+       EVT_LIST_BEGIN_DRAG(     XRCID("ListView"), MainFrame::OnListBeginDrag)\r
        // Filter\r
        EVT_TEXT(XRCID("tcFilter"), MainFrame::OnFilter)\r
 END_EVENT_TABLE()\r
@@ -174,6 +179,7 @@ void MainFrame::OnInit(wxInitDialogEvent&)
        this->list_ctrl->InsertColumn(7, _("Path"),          wxLIST_FORMAT_LEFT,   this->conf.ReadId(CONF_LISTVIEW_C_PATH,     100l));\r
        this->list_ctrl->InsertColumn(8, _("Type"),          wxLIST_FORMAT_LEFT,   this->conf.ReadId(CONF_LISTVIEW_C_TYPE,     100l));\r
        this->list_ctrl->InsertColumn(9, _("No."),           wxLIST_FORMAT_RIGHT,  this->conf.ReadId(CONF_LISTVIEW_C_NO,        35l));\r
+       this->list_ctrl->InsertColumn(10,_("Comment"),       wxLIST_FORMAT_LEFT,   this->conf.ReadId(CONF_LISTVIEW_C_COMMENT,   35l));\r
        g_nSortColumn = this->conf.ReadId(CONF_LISTVIEW_S_COLUMN, 9l);\r
        g_fSortAscend = this->conf.ReadId(CONF_LISTVIEW_S_ASCEND, true);\r
 \r
@@ -209,8 +215,7 @@ void MainFrame::OnArcCreate(wxCommandEvent& e)
        if (e.GetClientData() == NULL)\r
        {\r
                // 処理対象のファイルを選択。\r
-               wxFileDialog fd(this, _("Choose files to compress"), this->conf.ReadHistory(CONF_HISTORY_PATH, 0));\r
-               fd.SetWindowStyleFlag(wxFD_OPEN | wxFD_FILE_MUST_EXIST | wxFD_MULTIPLE);\r
+               wxFileDialog fd(this, _("Choose files to compress"), this->conf.ReadHistory(CONF_HISTORY_PATH, 0), wxEmptyString, wxFileSelectorDefaultWildcardStr, wxFD_OPEN | wxFD_FILE_MUST_EXIST | wxFD_MULTIPLE);\r
                if (fd.ShowModal() == wxID_CANCEL)\r
                {\r
                        return;\r
@@ -312,9 +317,7 @@ void MainFrame::OnArcOpen(wxCommandEvent& e)
        // 書庫を選択。\r
        if (e.GetId() == XRCID("Arc_Open"))\r
        {\r
-               wxFileDialog fd(this);\r
-               fd.SetDirectory(this->conf.ReadHistory(CONF_HISTORY_PATH, 0));\r
-               fd.SetWindowStyleFlag(wxFD_OPEN | wxFD_FILE_MUST_EXIST);\r
+               wxFileDialog fd(this, _("Choose an archive"), this->conf.ReadHistory(CONF_HISTORY_PATH, 0), wxEmptyString, wxFileSelectorDefaultWildcardStr, wxFD_OPEN | wxFD_FILE_MUST_EXIST);\r
                if (fd.ShowModal() == wxID_CANCEL)\r
                {\r
                        return;\r
@@ -330,7 +333,7 @@ void MainFrame::OnArcOpen(wxCommandEvent& e)
        // DnD以外で書庫を開く場合、TPIを読み込み。\r
        TPI_PROCESSINFO piInfo;\r
        piInfo.fiInfo.nUnpackedSize = e.GetExtraLong();\r
-       if (piInfo.fiInfo.nUnpackedSize == 0 && ! this->LoadTPI(this->fnArchive.GetFullPath(), & piInfo.fiInfo.nUnpackedSize))\r
+       if (e.GetInt() != 1 && ! this->LoadTPI(this->fnArchive.GetFullPath(), & piInfo.fiInfo.nUnpackedSize))\r
        {\r
                procDlg.Show(false);\r
                tpi.FreeLibrary();\r
@@ -391,15 +394,17 @@ void MainFrame::OnArcOpen(wxCommandEvent& e)
                                return;\r
                        }\r
 \r
-                       // ツリービューに反映。\r
-                       TreeView_CheckNewerItem(this->tree_ctrl, idArcRoot, piInfo.fiInfo.fnFileName.GetPath(), true);\r
-\r
-                       // ディレクトリ属性を含むものについては除去。\r
-                       if (piInfo.fiInfo.dwAttribute & TPI_ATTRIBUTE_DIRECTORY)\r
+                       // ルート記号を削除。\r
+                       wxString szPath = piInfo.fiInfo.fnFileName.GetPathWithSep(wxPATH_UNIX);\r
+                       if (szPath.StartsWith(wxT("/")))\r
                        {\r
-                               continue;\r
+                               piInfo.fiInfo.fnFileName = wxFileName(szPath.AfterFirst(wxT('/')), piInfo.fiInfo.fnFileName.GetFullName(), wxPATH_DOS);\r
                        }\r
 \r
+                       // ツリービューに反映。\r
+                       bool fDir = piInfo.fiInfo.dwAttribute & TPI_ATTRIBUTE_DIRECTORY ? true : false;\r
+                       TreeView_CheckNewerItem(this->tree_ctrl, idArcRoot, fDir ? piInfo.fiInfo.fnFileName.GetFullPath() : piInfo.fiInfo.fnFileName.GetPath(), true);\r
+\r
                        // セキュリティチェック。\r
                        // DTV検査。\r
                        if (piInfo.fiInfo.fnFileName.GetPathWithSep(wxPATH_UNIX).Find(wxT("../")) != wxNOT_FOUND)\r
@@ -428,10 +433,16 @@ void MainFrame::OnArcOpen(wxCommandEvent& e)
                                }\r
                        }\r
 \r
+                       // ディレクトリ属性を含むものについては情報を保存しない。\r
+                       if (fDir)\r
+                       {\r
+                               continue;\r
+                       }\r
+\r
                        // 情報を保存してカウントアップ。\r
                        this->fileinfo.Add(piInfo.fiInfo);\r
                }\r
-               while (tpi.GetFileInformation(& piInfo.fiInfo, false));\r
+               while (tpi.GetFileInformation(& piInfo.fiInfo));\r
        }\r
 \r
        // GetFileInformationがエラー終了した場合。\r
@@ -455,20 +466,20 @@ void MainFrame::OnArcOpen(wxCommandEvent& e)
 \r
        // ステータスバー設定。\r
        this->statusbar->SetStatusText(this->aiArchive.fiInfo.szTypeName, 0);\r
-       this->statusbar->SetStatusText(wxString::Format(_("%d file(s)"), this->fileinfo.GetCount()), 1);\r
-       this->statusbar->SetStatusText(wxString::Format(_("%dB -> %dB"), this->aiArchive.nUnpackedSize, this->aiArchive.nPackedSize), 2);\r
+       this->statusbar->SetStatusText(wxString::Format(_("%u file(s)"), this->fileinfo.GetCount()), 1);\r
+       this->statusbar->SetStatusText(wxString::Format(wxString("%" wxLongLongFmtSpec "uB -> %" wxLongLongFmtSpec "uB"), this->aiArchive.nUnpackedSize, this->aiArchive.nPackedSize), 2);\r
        this->statusbar->SetStatusText(wxString::Format(wxT("%3.1f%%"), this->aiArchive.wCompressRatio / 10.0), 3);\r
        this->statusbar->SetStatusText(this->fnArchive.GetFullPath(), 4);\r
 \r
-       // ツールバー・メニューバー設定。\r
+       // ツールバー・メニューバー設定。ファイル選択時しか動作しない削除などは別に設定。\r
        SetMenuToolState("Arc_Close",   true);\r
        SetMenuToolState("Arc_Add",     (this->aiArchive.fiInfo.eSupportedCommand & TPI_COMMAND_ADD)   == TPI_COMMAND_ADD   && this->aiArchive.fiInfo.fArchive);\r
        SetMenuToolState("Arc_SFX",     (this->aiArchive.fiInfo.eSupportedCommand & TPI_COMMAND_SFX)    == TPI_COMMAND_SFX   && ! this->aiArchive.fSFX);\r
        SetMenuToolState("Arc_UnSFX",   (this->aiArchive.fiInfo.eSupportedCommand & TPI_COMMAND_UNSFX)  == TPI_COMMAND_UNSFX && this->aiArchive.fSFX);\r
        SetMenuToolState("Arc_Extract", (this->aiArchive.fiInfo.eSupportedCommand & TPI_COMMAND_EXTRACT)== TPI_COMMAND_EXTRACT);\r
-       SetMenuToolState("Arc_Delete",  (this->aiArchive.fiInfo.eSupportedCommand & TPI_COMMAND_DELETE) == TPI_COMMAND_DELETE && this->aiArchive.fiInfo.fArchive);\r
        SetMenuToolState("Arc_Test",    (this->aiArchive.fiInfo.eSupportedCommand & TPI_COMMAND_TEST)   == TPI_COMMAND_TEST);\r
        SetMenuToolState("Arc_Repair",  (this->aiArchive.fiInfo.eSupportedCommand & TPI_COMMAND_REPAIR) == TPI_COMMAND_REPAIR);\r
+       this->menubar->Enable(XRCID("Arc_Clone"), true);\r
 \r
        procDlg.Show(false);\r
        this->Raise();\r
@@ -479,7 +490,7 @@ void MainFrame::OnArcClose(wxCommandEvent& e)
        // ツリービュー・リストビュー設定。\r
        this->tree_ctrl->DeleteAllItems();\r
        this->list_ctrl->DeleteAllItems();\r
-       this->list_ctrl->showFileInfo.Clear();\r
+       this->list_ctrl->apShowFile.Clear();\r
 \r
        // ツールバー・メニューバー設定。\r
        SetMenuToolState("Arc_Close",   false);\r
@@ -490,6 +501,7 @@ void MainFrame::OnArcClose(wxCommandEvent& e)
        SetMenuToolState("Arc_Delete",  false);\r
        SetMenuToolState("Arc_Test",    false);\r
        SetMenuToolState("Arc_Repair",  false);\r
+       this->menubar->Enable(XRCID("Arc_Clone"), false);\r
 \r
        for (int i = 0; i < this->statusbar->GetFieldsCount(); i++)\r
        {\r
@@ -514,6 +526,24 @@ void MainFrame::OnArcClose(wxCommandEvent& e)
        }\r
 }\r
 \r
+void MainFrame::OnArcClone(wxCommandEvent&)\r
+{\r
+       // 保存先を尋ねる。\r
+       wxFileDialog fd(this, _("Clone archive"), this->fnArchive.GetPath(), this->fnArchive.GetFullName(), wxFileSelectorDefaultWildcardStr, wxFD_SAVE | wxFD_OVERWRITE_PROMPT);\r
+       if (fd.ShowModal() == wxID_CANCEL)\r
+       {\r
+               return;\r
+       }\r
+       this->conf.WriteHistory(CONF_HISTORY_PATH, fd.GetDirectory());\r
+\r
+       // コピー。\r
+       ::wxCopyFile(this->fnArchive.GetFullPath(), fd.GetPath());\r
+       wxFileName fn(fd.GetPath());\r
+       wxDateTime dtAccess, dtModify, dtCreate;\r
+       this->fnArchive.GetTimes(& dtAccess, & dtModify, & dtCreate);\r
+       fn.SetTimes(& dtAccess, & dtModify, & dtCreate);\r
+}\r
+\r
 void MainFrame::OnArcAdd(wxCommandEvent& e)\r
 {\r
        // 作成ダイアログを設定。\r
@@ -523,8 +553,7 @@ void MainFrame::OnArcAdd(wxCommandEvent& e)
        mkDlg.uCommand = TPI_COMMAND_ADD;\r
 \r
        // 処理対象のファイルを選択。\r
-       wxFileDialog fd(this, _("Choose files to add"), this->conf.ReadHistory(CONF_HISTORY_PATH, 0));\r
-       fd.SetWindowStyleFlag(wxFD_OPEN | wxFD_FILE_MUST_EXIST | wxFD_MULTIPLE);\r
+       wxFileDialog fd(this, _("Choose files to add"), this->conf.ReadHistory(CONF_HISTORY_PATH, 0), wxEmptyString, wxFileSelectorDefaultWildcardStr, wxFD_OPEN | wxFD_FILE_MUST_EXIST | wxFD_MULTIPLE);\r
        if (fd.ShowModal() == wxID_CANCEL)\r
        {\r
                return;\r
@@ -593,8 +622,7 @@ void MainFrame::OnArcConvert(wxCommandEvent& e)
        swInfo.fMakeSFX = e.GetId() == XRCID("Arc_SFX");\r
 \r
        // 保存先を尋ねる。\r
-       wxFileDialog fd(this, swInfo.fMakeSFX ? _("Save as SFX") : _("Save as normal archive"), this->fnArchive.GetPath(), this->fnArchive.GetName() + (swInfo.fMakeSFX ? EXE_EXT : (wxString) wxEmptyString));\r
-       fd.SetWindowStyleFlag(wxFD_SAVE | wxFD_OVERWRITE_PROMPT);\r
+       wxFileDialog fd(this, swInfo.fMakeSFX ? _("Save as SFX") : _("Save as normal archive"), this->fnArchive.GetPath(), this->fnArchive.GetName() + (swInfo.fMakeSFX ? EXE_EXT : (wxString) wxEmptyString), wxFileSelectorDefaultWildcardStr, wxFD_SAVE | wxFD_OVERWRITE_PROMPT);\r
        if (fd.ShowModal() == wxID_CANCEL)\r
        {\r
                return;\r
@@ -617,7 +645,7 @@ void MainFrame::OnArcExtract(wxCommandEvent& e)
        TPI_SWITCHES swInfo;\r
        swInfo.pCustomSwitches = NULL;\r
 \r
-       // モード取得。通常は0, 実行なら1, ファイルDnDなら2、ディレクトリDnDなら3。\r
+       // ã\83¢ã\83¼ã\83\89å\8f\96å¾\97ã\80\82é\80\9a常ã\81¯0, å®\9fè¡\8cã\81ªã\82\891, ã\83\95ã\82¡ã\82¤ã\83«DnDã\81ªã\82\89\80\81ã\83\87ã\82£ã\83¬ã\82¯ã\83\88ã\83ªDnDã\81ªã\82\89\80\81ã\82¯ã\83ªã\83\83ã\83\97ã\83\9cã\83¼ã\83\89ã\81ªã\82\89\80\82\r
        int nMode = e.GetInt();\r
        // 実行時のみ使用。\r
        wxFileType * ftFile = NULL;\r
@@ -635,9 +663,9 @@ void MainFrame::OnArcExtract(wxCommandEvent& e)
                {\r
                        // コマンドを取得。\r
                        ftFile = wxTheMimeTypesManager->GetFileTypeFromExtension(wxFileName(mkDlg.files[0], wxPATH_DOS).GetExt());\r
-                       if (! ftFile)\r
+                       if (! ftFile || ftFile->GetOpenCommand(wxEmptyString).IsEmpty())\r
                        {\r
-                               // 種類が取得できないときは設定を読み込む。初期設定ではテキストとみなす。\r
+                               // 種類が取得できないときはテキストとみなす。\r
                                ftFile = wxTheMimeTypesManager->GetFileTypeFromExtension(this->conf.ReadId(CONF_DEFAULT_EXT, (wxString) wxT("txt")));\r
                                if (! ftFile)\r
                                {\r
@@ -722,66 +750,83 @@ void MainFrame::OnArcExtract(wxCommandEvent& e)
        }\r
        else\r
        {\r
-               wxArrayString asFiles;\r
                if (nMode == 1)\r
                {\r
                        // コマンドを実行。\r
-                       asFiles.Add(swInfo.fnDestinationDirectory.GetPathWithSep() + wxFileName(mkDlg.files[0], wxPATH_DOS).GetFullName());\r
-                       if (tpi.nErrorCode == TPI_ERROR_SUCCESS)\r
+                       wxString szTempFile = swInfo.fnDestinationDirectory.GetPathWithSep() + wxFileName(mkDlg.files[0], wxPATH_DOS).GetFullName();\r
+                       bool fSuccess = tpi.nErrorCode == TPI_ERROR_SUCCESS;\r
+                       myProcess * pCallback = new myProcess(szTempFile, swInfo.fnDestinationDirectory.GetPath());\r
+                       if (fSuccess)\r
                        {\r
 #ifdef __LINUX__\r
                                // Linuxでは引用符で囲む必要がある。\r
-                               ::wxExecute(ftFile->GetOpenCommand(QuoteString(asFiles[0])), wxEXEC_SYNC);\r
+                               fSuccess = ::wxExecute(ftFile->GetOpenCommand(QuoteString(szTempFile)), wxEXEC_ASYNC, pCallback) > 0;\r
 #else\r
-                               ::wxExecute(ftFile->GetOpenCommand(asFiles[0]), wxEXEC_SYNC);\r
+                               fSuccess = ::wxExecute(ftFile->GetOpenCommand(szTempFile), wxEXEC_ASYNC, pCallback) > 0;\r
 #endif\r
                        }\r
+                       if (! fSuccess)\r
+                       {\r
+                               pCallback->OnTerminate(0, 0);\r
+                       }\r
                }\r
                else\r
                {\r
-                       // 展開対象を決定。wxGTKのwxFileDataObjectでは多バイト文字の扱いに問題があるので代替。\r
-#ifdef __LINUX__\r
-                       myFileDataObject objFile;\r
-#else\r
-                       wxFileDataObject objFile;\r
-#endif\r
+                       // 展開対象を決定。\r
+                       wxArrayString asFiles;\r
+                       myFileDataObject * objFile = new myFileDataObject();\r
+                       objFile->szTempDir = nMode == 3 ? swInfo.fnDestinationDirectory.GetPath() : swInfo.fnDestinationDirectory.GetFullPath();\r
                        for (size_t i = 0; i < mkDlg.files.GetCount(); i++)\r
                        {\r
                                wxString szFileName = swInfo.fnDestinationDirectory.GetPathWithSep() + wxFileName(mkDlg.files[i], wxPATH_DOS).GetFullName();\r
-                               if (nMode == 2)\r
+                               if (nMode == 3)\r
+                               {\r
+                                       asFiles.Add(szFileName);\r
+                               }\r
+                               else\r
                                {\r
                                        // リストに追加。\r
-                                       objFile.AddFile(szFileName);\r
+                                       objFile->AddFile(szFileName);\r
                                }\r
-                               asFiles.Add(szFileName);\r
                        }\r
                        if (nMode == 3)\r
                        {\r
-                               objFile.AddFile(swInfo.fnDestinationDirectory.GetPath());\r
+                               objFile->AddFile(objFile->szTempDir);\r
                        }\r
 \r
-                       // 自身にドロップされると煩雑なので、一時的にドロップを受け付けないようにしておく。\r
-                       this->SetDropTarget(NULL);\r
-\r
-                       // DnD開始。\r
-                       wxDropSource dropSource(objFile, this);\r
-                       wxDragResult drResult = dropSource.DoDragDrop(wxDrag_DefaultMove);\r
-                       if (drResult != wxDragCancel && drResult != wxDragNone && drResult != wxDragMove)\r
+                       if (nMode == 4)\r
                        {\r
+                               wxTheClipboard->SetData(objFile);\r
+                       }\r
+                       else\r
+                       {\r
+                               // 自身にドロップされると煩雑なので、一時的にドロップを受け付けないようにしておく。\r
+                               this->SetDropTarget(NULL);\r
+\r
+                               // DnD開始。\r
+                               wxDropSource dropSource(* objFile, this);\r
+                               wxDragResult drResult = dropSource.DoDragDrop();\r
+                               if (drResult != wxDragCancel && drResult != wxDragNone && drResult != wxDragMove)\r
+                               {\r
 #ifdef __LINUX__\r
-                               // Linuxではまだ処理が終わっていない(コンテキストメニューが表示されている)ので、とりあえず3秒だけ待つ。\r
-                               sleep(3);\r
+                                       // Linuxではまだ処理が終わっていない(コンテキストメニューが表示されている)ので、とりあえず3秒だけ待つ。\r
+                                       sleep(3);\r
 #endif\r
-                       }\r
-                       this->SetDropTarget(new myFileDropTarget(this));\r
-               }\r
+                               }\r
+                               this->SetDropTarget(new myFileDropTarget(this));\r
 \r
-               // ファイルと一時ディレクトリを削除。\r
-               for (size_t i = 0; i < asFiles.GetCount(); i++)\r
-               {\r
-                       ::wxRemoveFile(asFiles[i]);\r
+                               // ディレクトリDnDのときは、先にディレクトリの中のファイルを消しておく。\r
+                               if (nMode == 3)\r
+                               {\r
+                                       for (size_t i = 0; i < asFiles.GetCount(); i++)\r
+                                       {\r
+                                               ::wxRemoveFile(asFiles[i]);\r
+                                       }\r
+                               }\r
+\r
+                               delete objFile;\r
+                       }\r
                }\r
-               ::wxRmdir(swInfo.fnDestinationDirectory.GetFullPath());\r
        }\r
 }\r
 \r
@@ -790,6 +835,8 @@ void MainFrame::OnArcDelete(wxCommandEvent& e)
        // 全ファイル削除は危険ではないかと。\r
        if (this->list_ctrl->GetSelectedItemCount() == 0)\r
        {\r
+               // wxのバグで自動では無効化できないので、実行しようとしたときに無効化する。\r
+               SetMenuToolState("Arc_Delete", false);\r
                return;\r
        }\r
 \r
@@ -872,6 +919,25 @@ void MainFrame::OnArcRepair(wxCommandEvent&)
        procDlg.Show(false);    \r
 }\r
 \r
+void MainFrame::OnExeCopy(wxCommandEvent & e)\r
+{\r
+       if (this->list_ctrl->GetSelectedItemCount() == 0)\r
+       {\r
+               // wxのバグで自動では無効化できないので、実行しようとしたときに無効化する。\r
+               this->menubar->Enable(XRCID("Exe_Copy"), false);\r
+               return;\r
+       }\r
+\r
+       if (! wxTheClipboard->Open())\r
+       {\r
+               return;\r
+       }\r
+\r
+       e.SetInt(4);\r
+       this->OnArcExtract(e);\r
+       wxTheClipboard->Close();\r
+}\r
+\r
 void MainFrame::OnViewMode(wxCommandEvent & e)\r
 {\r
        int n = e.GetId();\r
@@ -906,7 +972,7 @@ void MainFrame::OnTreeChanged(wxTreeEvent& e)
        // ツリービューからパスを取得。\r
        wxString szNodePath = TreeView_GetItemPath(this->tree_ctrl, e.GetItem());\r
        // リストビューを初期化。\r
-       this->list_ctrl->showFileInfo.Clear();\r
+       this->list_ctrl->apShowFile.Clear();\r
        this->list_ctrl->DeleteAllItems();\r
        g_hIconLL.RemoveAll();\r
        g_hIconLS.RemoveAll();\r
@@ -941,13 +1007,13 @@ void MainFrame::OnTreeChanged(wxTreeEvent& e)
                                continue;\r
                        }\r
 \r
-                       this->list_ctrl->showFileInfo.Add(this->fileinfo[i]);\r
+                       this->list_ctrl->apShowFile.Add(& this->fileinfo[i]);\r
                }\r
        }\r
 \r
        // ソートして表示。\r
-       this->list_ctrl->showFileInfo.Sort(& ListCtrlCompareProc);\r
-       this->list_ctrl->SetItemCount(this->list_ctrl->showFileInfo.GetCount());\r
+       this->list_ctrl->apShowFile.Sort(& ListCtrlCompareProc);\r
+       this->list_ctrl->SetItemCount(this->list_ctrl->apShowFile.GetCount());\r
 }\r
 \r
 void MainFrame::OnTreeBeginDrag(wxTreeEvent& e)\r
@@ -962,6 +1028,14 @@ void MainFrame::OnTreeBeginDrag(wxTreeEvent& e)
 \r
 // ListView\r
 \r
+void MainFrame::OnListItemSelect(wxListEvent&)\r
+{\r
+       // ファイルに対する動作の設定。但し、選択解除時はwxのバグで呼び出されない。\r
+       bool fEnable = this->list_ctrl->GetSelectedItemCount() > 0;\r
+       SetMenuToolState("Arc_Delete", fEnable && (this->aiArchive.fiInfo.eSupportedCommand & TPI_COMMAND_DELETE) == TPI_COMMAND_DELETE && this->aiArchive.fiInfo.fArchive);\r
+       this->menubar->Enable(XRCID("Exe_Copy"), fEnable);\r
+}\r
+\r
 void MainFrame::OnListItemDClick(wxListEvent&)\r
 {\r
        wxCommandEvent e;\r
@@ -993,7 +1067,7 @@ void MainFrame::OnFilter(wxCommandEvent&)
 \r
 // イベントハンドラ以外。\r
 \r
-bool MainFrame::LoadTPI(wxString szFileName, wxULongLong_t * llFileCount)\r
+bool MainFrame::LoadTPI(const wxString & szFileName, wxULongLong_t * llFileCount)\r
 {\r
        // 書庫を開いていれば閉じておく。\r
        wxCommandEvent e;\r
@@ -1007,7 +1081,7 @@ bool MainFrame::LoadTPI(wxString szFileName, wxULongLong_t * llFileCount)
                do\r
                {\r
                        // 初期化。\r
-                       if (! tpi.InitLibrary(L_DIR_B_LIB + szTPIName, szFileName, 0))\r
+                       if (! tpi.InitLibrary(L_DIR_B_LIB + szTPIName, szFileName))\r
                        {\r
                                tpi.FreeLibrary();\r
                                continue;\r
@@ -1017,7 +1091,7 @@ bool MainFrame::LoadTPI(wxString szFileName, wxULongLong_t * llFileCount)
                        tpi.SetCallbackProc(TPICallbackProc);\r
 \r
                        // 対応確認。\r
-                       if (! tpi.CheckArchive(szFileName, llFileCount) || ! tpi.OpenArchive(szFileName))\r
+                       if (! tpi.OpenArchive(szFileName, llFileCount))\r
                        {\r
                                tpi.FreeLibrary();\r
                                * llFileCount = 0;\r
@@ -1030,7 +1104,7 @@ bool MainFrame::LoadTPI(wxString szFileName, wxULongLong_t * llFileCount)
        return false;\r
 }\r
 \r
-int MainFrame::ErrorCheck(int nErrorCode, wxString szAPIName)\r
+int MainFrame::ErrorCheck(int nErrorCode, const wxString & szAPIName)\r
 {\r
        switch (nErrorCode)\r
        {\r