annotate src/myframe.cpp @ 21:c540dc3eabe5 v2.2dev

add listctrl-dir
author pyon@macmini
date Wed, 26 Oct 2011 20:40:53 +0900
parents df439f9831d2
children a2dd16b70c08
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
1 // Filename : myframe.cpp
21
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
2 // Last Change: 26-Oct-2011.
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
3 //
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
4
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
5 #include "main.h"
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
6 #include "myframe.h"
5
52697c869ce8 delete move&detect button.
pyon@macmini
parents: 4
diff changeset
7 #include "param.h"
6
9c85d71cad7c implement drag&drop.
pyon@macmini
parents: 5
diff changeset
8 #include "dndfile.h"
10
1fda3a06c39b file name arrange.
pyon@macmini
parents: 9
diff changeset
9 #include "marksheet.h"
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
10
5
52697c869ce8 delete move&detect button.
pyon@macmini
parents: 4
diff changeset
11 // resources
52697c869ce8 delete move&detect button.
pyon@macmini
parents: 4
diff changeset
12 // the application icon (under Windows and OS/2 it is in resources and even
52697c869ce8 delete move&detect button.
pyon@macmini
parents: 4
diff changeset
13 // though we could still include the XPM here it would be unused)
52697c869ce8 delete move&detect button.
pyon@macmini
parents: 4
diff changeset
14 #if !defined(__WXMSW__) && !defined(__WXPM__)
52697c869ce8 delete move&detect button.
pyon@macmini
parents: 4
diff changeset
15 #include "sample.xpm"
52697c869ce8 delete move&detect button.
pyon@macmini
parents: 4
diff changeset
16 #endif
52697c869ce8 delete move&detect button.
pyon@macmini
parents: 4
diff changeset
17
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
18 //////////////////////////////////////////////////////////////////////////
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
19 // frame constructor
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
20 MyFrame::MyFrame( wxWindow* parent, wxWindowID id, const wxString& title, const wxPoint& pos, const wxSize& size, long style ) : wxFrame( parent, id, title, pos, size, style )
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
21 {
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
22 this->SetBackgroundColour( wxColour(wxT("WHEAT")) );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
23 // set the frame icon
5
52697c869ce8 delete move&detect button.
pyon@macmini
parents: 4
diff changeset
24 SetIcon(wxICON(sample));
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
25
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
26 // メニューバー
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
27 m_menubarFile = new wxMenuBar();
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
28 m_menuFile = new wxMenu();
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
29 wxMenuItem* m_menuItemParam;
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
30 m_menuItemParam = new wxMenuItem( m_menuFile, ID_MENUITEMPARAM, wxString( wxT("パラメータ(&P)") ) , wxEmptyString, wxITEM_NORMAL );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
31 m_menuFile->Append( m_menuItemParam );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
32
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
33 wxMenuItem* m_menuItemAppDIr;
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
34 m_menuItemAppDIr = new wxMenuItem( m_menuFile, ID_MENUITEMAPPDIR, wxString( wxT("アプリフォルダを開く(&O)") ) , wxEmptyString, wxITEM_NORMAL );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
35 m_menuFile->Append( m_menuItemAppDIr );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
36
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
37 wxMenuItem* m_separator;
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
38 m_separator = m_menuFile->AppendSeparator(); // ----
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
39
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
40 wxMenuItem* m_menuItemQuit;
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
41 m_menuItemQuit = new wxMenuItem( m_menuFile, ID_MENUITEMQUIT, wxString( wxT("終了(&X)") ) , wxEmptyString, wxITEM_NORMAL );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
42 m_menuFile->Append( m_menuItemQuit );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
43
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
44 m_menubarFile->Append( m_menuFile, wxT("ファイル(&F)") );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
45
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
46 this->SetMenuBar( m_menubarFile );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
47
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
48 // コントロール
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
49 wxBoxSizer* bSizerTop = new wxBoxSizer( wxVERTICAL );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
50
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
51 wxBoxSizer* bSizerFrom = new wxBoxSizer( wxHORIZONTAL );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
52
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
53 m_staticTextWork = new wxStaticText( this, wxID_ANY, wxT("作業フォルダ"), wxDefaultPosition, wxDefaultSize, 0 );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
54 bSizerFrom->Add( m_staticTextWork, 0, wxALL|wxALIGN_CENTER_VERTICAL, 5 );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
55
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
56 m_dirPickerWork = new wxDirPickerCtrl( this, wxID_ANY, wxGetApp().workdir, wxT("Select a folder"), wxDefaultPosition, wxDefaultSize, wxDIRP_DEFAULT_STYLE );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
57 bSizerFrom->Add( m_dirPickerWork, 1, wxALL|wxALIGN_CENTER_VERTICAL, 5 );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
58
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
59 bSizerTop->Add( bSizerFrom, 0, wxEXPAND, 5 );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
60
1
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
61 wxBoxSizer* bSizerDist = new wxBoxSizer( wxHORIZONTAL );
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
62
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
63 m_staticTextDist = new wxStaticText( this, wxID_ANY, wxT("保存フォルダ"), wxDefaultPosition, wxDefaultSize, 0 );
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
64 bSizerDist->Add( m_staticTextDist, 0, wxALL|wxALIGN_CENTER_VERTICAL, 5 );
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
65
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
66 m_textCtrlDist = new wxTextCtrl( this, ID_TEXTCTRLDIST, wxEmptyString, wxDefaultPosition, wxDefaultSize, 0 );
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
67 m_textCtrlDist->SetMaxLength( 15 );
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
68 bSizerDist->Add( m_textCtrlDist, 1, wxALL|wxALIGN_CENTER_VERTICAL, 5 );
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
69 bSizerDist->Add( 0, 0, 1, wxEXPAND, 5 );
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
70
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
71 m_staticTextDrive = new wxStaticText( this, wxID_ANY, wxT("ドライブ"), wxDefaultPosition, wxDefaultSize, 0 );
1
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
72 bSizerDist->Add( m_staticTextDrive, 0, wxALL|wxALIGN_CENTER_VERTICAL, 5 );
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
73
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
74 wxArrayString drives;
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
75 drives.Add(wxT("C:"));
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
76 drives.Add(wxT("Y:"));
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
77 drives.Add(wxT("Z:"));
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
78 m_comboBoxDrive = new wxComboBox( this, wxID_ANY, wxT("C:"), wxDefaultPosition, wxSize(50,-1), drives, 0 );
1
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
79 bSizerDist->Add( m_comboBoxDrive, 0, wxALL|wxALIGN_CENTER_VERTICAL, 5 );
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
80
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
81 m_staticTextDate = new wxStaticText( this, wxID_ANY, wxT("開催日"), wxDefaultPosition, wxDefaultSize, 0 );
1
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
82 bSizerDist->Add( m_staticTextDate, 0, wxALL|wxALIGN_CENTER_VERTICAL, 5 );
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
83
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
84 m_datePicker = new wxDatePickerCtrl( this, wxID_ANY, wxDefaultDateTime, wxDefaultPosition, wxDefaultSize, wxDP_DROPDOWN );
1
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
85 bSizerDist->Add( m_datePicker, 0, wxALL|wxALIGN_CENTER_VERTICAL, 5 );
8
550c143ab194 implement NextThursday button.
pyon@macmini
parents: 6
diff changeset
86
550c143ab194 implement NextThursday button.
pyon@macmini
parents: 6
diff changeset
87 m_buttonNextThu = new wxButton( this, ID_BUTTONNEXTTHU, wxT("次木 >>"), wxDefaultPosition, wxSize(60,-1), 0 );
550c143ab194 implement NextThursday button.
pyon@macmini
parents: 6
diff changeset
88 bSizerDist->Add( m_buttonNextThu, 0, wxALL|wxALIGN_CENTER_VERTICAL, 5 );
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
89
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
90 m_staticTextCcn = new wxStaticText( this, wxID_ANY, wxT("合議体"), wxDefaultPosition, wxDefaultSize, 0 );
1
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
91 bSizerDist->Add( m_staticTextCcn, 0, wxALL|wxALIGN_CENTER_VERTICAL, 5 );
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
92
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
93 wxArrayString ccns;
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
94 ccns.Add(wxT("角館1")); ccns.Add(wxT("角館2")); ccns.Add(wxT("角館3")); ccns.Add(wxT("角館4"));
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
95 ccns.Add(wxT("西仙1")); ccns.Add(wxT("西仙2")); ccns.Add(wxT("西仙3"));
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
96 ccns.Add(wxT("千畑1")); ccns.Add(wxT("千畑2")); ccns.Add(wxT("千畑3"));
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
97 ccns.Add(wxT("大曲1")); ccns.Add(wxT("大曲2")); ccns.Add(wxT("大曲3")); ccns.Add(wxT("大曲4")); ccns.Add(wxT("大曲5")); ccns.Add(wxT("大曲6"));
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
98 ccns.Add(wxT("六郷1")); ccns.Add(wxT("六郷2")); ccns.Add(wxT("六郷3"));
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
99 m_comboBoxCcn = new wxComboBox( this, wxID_ANY, wxEmptyString, wxDefaultPosition, wxSize(100,-1), ccns, 0 );
1
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
100 bSizerDist->Add( m_comboBoxCcn, 0, wxALL, 5 );
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
101
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
102 m_buttonMkDir = new wxButton( this, ID_BUTTONMKDIR, wxT("適用"), wxDefaultPosition, wxDefaultSize, 0 );
1
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
103 bSizerDist->Add( m_buttonMkDir, 0, wxALL, 5 );
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
104
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
105 bSizerTop->Add( bSizerDist, 0, wxEXPAND, 5 );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
106
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
107 wxBoxSizer* bSizerManip = new wxBoxSizer( wxHORIZONTAL );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
108
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
109 wxBoxSizer* bSizerGuess = new wxBoxSizer( wxVERTICAL );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
110
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
111 m_staticTextName = new wxStaticText( this, wxID_ANY, wxT("氏名"), wxDefaultPosition, wxDefaultSize, 0 );
1
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
112 bSizerGuess->Add( m_staticTextName, 0, wxTOP|wxLEFT, 5 );
4
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
113 wxString logo = wxGetCwd() + wxFILE_SEP_PATH + wxT("image") + wxFILE_SEP_PATH + wxT("logo.png");
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
114 wxBitmap bmp = wxBitmap( logo, wxBITMAP_TYPE_PNG );
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
115 m_bitmapName = new wxStaticBitmap( this, wxID_ANY, bmp, wxDefaultPosition, wxSize(320,95), 0 );
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
116 bSizerGuess->Add( m_bitmapName, 0, wxALL, 5 );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
117
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
118 m_staticTextHhsno = new wxStaticText( this, wxID_ANY, wxT("被保険者番号"), wxDefaultPosition, wxDefaultSize, 0 );
1
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
119 bSizerGuess->Add( m_staticTextHhsno, 0, wxTOP|wxLEFT, 5 );
4
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
120 logo = wxGetCwd() + wxFILE_SEP_PATH + wxT("image") + wxFILE_SEP_PATH + wxT("0123456789.png");
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
121 bmp.LoadFile( logo, wxBITMAP_TYPE_PNG );
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
122 m_bitmapHhsno = new wxStaticBitmap( this, wxID_ANY, bmp, wxDefaultPosition, wxSize(320,54), 0 );
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
123 bSizerGuess->Add( m_bitmapHhsno, 0, wxALL, 5 );
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
124
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
125 m_staticTextGuess = new wxStaticText( this, wxID_ANY, wxT("推定値"), wxDefaultPosition, wxDefaultSize, 0 );
1
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
126 bSizerGuess->Add( m_staticTextGuess, 0, wxTOP|wxLEFT, 5 );
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
127 m_textCtrlGuess = new wxTextCtrl( this, ID_TEXTCTRLGUESS, wxEmptyString, wxDefaultPosition, wxDefaultSize, 0 );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
128 m_textCtrlGuess->SetMaxLength( 10 );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
129 bSizerGuess->Add( m_textCtrlGuess, 0, wxALL, 5 );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
130
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
131 bSizerManip->Add( bSizerGuess, 0, wxEXPAND, 5 );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
132
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
133 m_listCtrlView = new wxListCtrl( this, ID_LISTCTRLVIEW, wxDefaultPosition, wxDefaultSize, wxLC_ICON );
1
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
134 m_listCtrlView->SetBackgroundColour(wxT("LIGHT GREY"));
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
135 bSizerManip->Add( m_listCtrlView, 1, wxALL|wxEXPAND, 5 );
5
52697c869ce8 delete move&detect button.
pyon@macmini
parents: 4
diff changeset
136 m_imageList = new wxImageList( 160, 226 );
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
137 m_listCtrlView->AssignImageList( m_imageList, wxIMAGE_LIST_NORMAL );
6
9c85d71cad7c implement drag&drop.
pyon@macmini
parents: 5
diff changeset
138 //m_listCtrlView->SetDropTarget( new DnDFile(m_dirPickerWork) );
9c85d71cad7c implement drag&drop.
pyon@macmini
parents: 5
diff changeset
139 this->SetDropTarget( new DnDFile(m_dirPickerWork) );
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
140
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
141 wxBoxSizer* bSizerButton = new wxBoxSizer( wxVERTICAL );
21
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
142 wxGridSizer* gSizer = new wxGridSizer( 2, 2, 0, 0 );
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
143
21
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
144 m_buttonMove = new wxButton( this, ID_BUTTONMOVE, wxT("移動"), wxDefaultPosition, wxDefaultSize, 0 );
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
145 gSizer->Add( m_buttonMove, 0, wxALL, 5 );
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
146 m_buttonMove->Enable(false);
1
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
147 m_buttonDetect = new wxButton( this, ID_BUTTONDETECT, wxT("検知"), wxDefaultPosition, wxDefaultSize, 0 );
21
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
148 gSizer->Add( m_buttonDetect, 0, wxALL, 5 );
5
52697c869ce8 delete move&detect button.
pyon@macmini
parents: 4
diff changeset
149
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
150 m_buttonDel = new wxButton( this, ID_BUTTONDEL, wxT("削除"), wxDefaultPosition, wxDefaultSize, 0 );
21
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
151 gSizer->Add( m_buttonDel, 0, wxALL, 5 );
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
152 m_buttonUndo = new wxButton( this, ID_BUTTONUNDO, wxT("戻す"), wxDefaultPosition, wxDefaultSize, 0 );
21
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
153 gSizer->Add( m_buttonUndo, 0, wxALL, 5 );
4
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
154 m_buttonUndo->Enable(false);
21
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
155
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
156 bSizerButton->Add( gSizer, 0, wxALL, 5 );
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
157
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
158 m_listCtrlDir = new wxListCtrl( this, ID_LISTCTRLDIR, wxDefaultPosition, wxDefaultSize, wxLC_REPORT|wxLC_SINGLE_SEL );
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
159 wxListItem itemCol;
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
160 itemCol.SetText( wxT("通番") );
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
161 m_listCtrlDir->InsertColumn( 0, itemCol );
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
162 m_listCtrlDir->SetColumnWidth( 0, 50 );
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
163 itemCol.SetText( wxT("被保険者番号") );
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
164 m_listCtrlDir->InsertColumn( 1, itemCol );
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
165 m_listCtrlDir->SetColumnWidth( 1, 100 );
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
166 itemCol.SetText( wxT("ファイル数") );
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
167 m_listCtrlDir->InsertColumn( 2, itemCol );
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
168 m_listCtrlDir->SetColumnWidth( 2, 60 );
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
169
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
170 bSizerButton->Add( m_listCtrlDir, 1, wxEXPAND|wxALL, 5 );
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
171
21
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
172 bSizerManip->Add( bSizerButton, 0, wxEXPAND|wxALIGN_CENTER_VERTICAL, 5 );
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
173
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
174 bSizerTop->Add( bSizerManip, 1, wxEXPAND, 5 );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
175
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
176 this->SetSizer( bSizerTop );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
177 this->Layout();
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
178
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
179 // ステータスバー
3
870860d435a1 auto detect done.
pyon@macmini
parents: 2
diff changeset
180 int widths[] = { 150, 250, -1, 120 };
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
181 m_statusBar = this->CreateStatusBar( WXSIZEOF(widths), wxST_SIZEGRIP );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
182 m_statusBar->SetStatusWidths( WXSIZEOF(widths), widths );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
183 m_statusBar->SetStatusText( wxEmptyString, 0 );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
184
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
185 this->Centre( wxBOTH );
11
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
186 m_timer.SetOwner( this, ID_TIMER );
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
187 }
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
188
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
189 // destructor
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
190 MyFrame::~MyFrame()
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
191 {
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
192 }
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
193
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
194 // Event Table
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
195 BEGIN_EVENT_TABLE( MyFrame, wxFrame )
11
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
196 EVT_IDLE( MyFrame::OnIdle )
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
197 EVT_TIMER( ID_TIMER, MyFrame::OnTimer )
1
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
198 EVT_SIZE( MyFrame::OnWinSize )
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
199 EVT_MOVE( MyFrame::OnWinMove )
8
550c143ab194 implement NextThursday button.
pyon@macmini
parents: 6
diff changeset
200 EVT_MENU( ID_MENUITEMPARAM, MyFrame::OnParam )
550c143ab194 implement NextThursday button.
pyon@macmini
parents: 6
diff changeset
201 EVT_MENU( ID_MENUITEMAPPDIR, MyFrame::OnOpenAppDir )
550c143ab194 implement NextThursday button.
pyon@macmini
parents: 6
diff changeset
202 EVT_MENU( wxID_EXIT, MyFrame::OnQuit )
21
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
203 EVT_LIST_ITEM_SELECTED( ID_LISTCTRLVIEW, MyFrame::GetImageInfo )
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
204 EVT_LIST_ITEM_ACTIVATED( ID_LISTCTRLVIEW, MyFrame::ViewLarge )
8
550c143ab194 implement NextThursday button.
pyon@macmini
parents: 6
diff changeset
205 EVT_BUTTON( ID_BUTTONNEXTTHU, MyFrame::OnNextThursday )
550c143ab194 implement NextThursday button.
pyon@macmini
parents: 6
diff changeset
206 EVT_BUTTON( ID_BUTTONMKDIR, MyFrame::OnMakeDir )
550c143ab194 implement NextThursday button.
pyon@macmini
parents: 6
diff changeset
207 EVT_BUTTON( ID_BUTTONDETECT, MyFrame::OnDetect )
550c143ab194 implement NextThursday button.
pyon@macmini
parents: 6
diff changeset
208 EVT_BUTTON( ID_BUTTONMOVE, MyFrame::OnMove )
550c143ab194 implement NextThursday button.
pyon@macmini
parents: 6
diff changeset
209 EVT_BUTTON( ID_BUTTONDEL, MyFrame::OnDelete )
550c143ab194 implement NextThursday button.
pyon@macmini
parents: 6
diff changeset
210 EVT_BUTTON( ID_BUTTONUNDO, MyFrame::OnUndo )
21
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
211 EVT_LIST_ITEM_ACTIVATED( ID_LISTCTRLDIR, MyFrame::OnOpenHhsDir )
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
212 EVT_CLOSE( MyFrame::SaveConfig )
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
213 END_EVENT_TABLE()
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
214
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
215 // Event Handlers
8
550c143ab194 implement NextThursday button.
pyon@macmini
parents: 6
diff changeset
216 /* 次の木曜日 */
550c143ab194 implement NextThursday button.
pyon@macmini
parents: 6
diff changeset
217 void MyFrame::OnNextThursday(wxCommandEvent& WXUNUSED(event))
550c143ab194 implement NextThursday button.
pyon@macmini
parents: 6
diff changeset
218 {
550c143ab194 implement NextThursday button.
pyon@macmini
parents: 6
diff changeset
219 wxDateTime dt = m_datePicker->GetValue();
550c143ab194 implement NextThursday button.
pyon@macmini
parents: 6
diff changeset
220 wxDateSpan ds( 0, 0, 0, 1 );
550c143ab194 implement NextThursday button.
pyon@macmini
parents: 6
diff changeset
221 dt += ds;
550c143ab194 implement NextThursday button.
pyon@macmini
parents: 6
diff changeset
222 dt.SetToNextWeekDay( wxDateTime::Thu );
550c143ab194 implement NextThursday button.
pyon@macmini
parents: 6
diff changeset
223 m_datePicker->SetValue( dt );
550c143ab194 implement NextThursday button.
pyon@macmini
parents: 6
diff changeset
224 }
550c143ab194 implement NextThursday button.
pyon@macmini
parents: 6
diff changeset
225
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
226 /* 移動先フォルダ作成 */
3
870860d435a1 auto detect done.
pyon@macmini
parents: 2
diff changeset
227 void MyFrame::OnMakeDir(wxCommandEvent& WXUNUSED(event))
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
228 {
1
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
229 wxString to;
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
230 to.Append( m_comboBoxDrive->GetValue() );
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
231 to.Append( wxFILE_SEP_PATH );
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
232 wxDateTime dt = m_datePicker->GetValue();
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
233 to.Append( dt.Format(wxT("%Y%m%d")) );
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
234 to.Append( wxFILE_SEP_PATH );
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
235 to.Append( m_comboBoxCcn->GetValue() );
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
236 m_textCtrlDist->SetValue( to );
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
237
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
238 wxString ccn = m_comboBoxCcn->GetValue();
1
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
239 if ( to.Len() < 15 || ccn.IsEmpty() ) {
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
240 wxMessageBox(wxT("フォルダを指定してください."));
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
241 return;
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
242 }
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
243
1
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
244 wxStringTokenizer tkz( to, wxFILE_SEP_PATH );
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
245 wxString d;
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
246 while ( tkz.HasMoreTokens() ) {
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
247 d.Append( tkz.GetNextToken() );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
248 d.Append( wxFILE_SEP_PATH );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
249 if ( !wxDirExists( d ) ) wxMkdir( d );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
250 }
4
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
251 m_buttonMove->Enable(true);
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
252
11
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
253 // TODO.
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
254 // make 申請書ふぉるだ
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
255
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
256 wxMessageBox(wxT("移動先フォルダ準備完了"));
1
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
257 wxString cmd = wxT("explorer ") + to;
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
258 wxExecute( cmd );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
259 }
1
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
260 /* 検知 */
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
261 void MyFrame::OnDetect(wxCommandEvent& WXUNUSED(event))
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
262 {
12
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
263 UpdateCache();
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
264 UpdateListImage();
1
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
265 }
5
52697c869ce8 delete move&detect button.
pyon@macmini
parents: 4
diff changeset
266
4
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
267 /* 選択したファイルを移動 */
5
52697c869ce8 delete move&detect button.
pyon@macmini
parents: 4
diff changeset
268 void MyFrame::OnMove(wxCommandEvent& WXUNUSED(event))
4
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
269 {
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
270 m_undo.Clear();
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
271 wxString workdir = m_dirPickerWork->GetPath();
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
272 wxString distdir = m_textCtrlDist->GetValue();
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
273 long item = -1;
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
274 for ( ;; ) {
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
275 item = m_listCtrlView->GetNextItem(item, wxLIST_NEXT_ALL, wxLIST_STATE_SELECTED);
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
276 if ( item == -1 ) break;
5
52697c869ce8 delete move&detect button.
pyon@macmini
parents: 4
diff changeset
277 wxString hhsno = m_textCtrlGuess->GetValue();
52697c869ce8 delete move&detect button.
pyon@macmini
parents: 4
diff changeset
278 if ( !wxDirExists( distdir + wxFILE_SEP_PATH + hhsno ) ) wxMkdir( distdir + wxFILE_SEP_PATH + hhsno );
52697c869ce8 delete move&detect button.
pyon@macmini
parents: 4
diff changeset
279
52697c869ce8 delete move&detect button.
pyon@macmini
parents: 4
diff changeset
280 wxString file = m_listCtrlView->GetItemText( item );
4
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
281 wxString from = workdir + wxFILE_SEP_PATH + file;
5
52697c869ce8 delete move&detect button.
pyon@macmini
parents: 4
diff changeset
282 wxString to = distdir + wxFILE_SEP_PATH + hhsno + wxFILE_SEP_PATH + file;
4
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
283 wxRenameFile( from, to, true );
12
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
284
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
285 wxString movecmd = MOVECMD;
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
286 m_undo.Insert( movecmd + wxT(" ") + to + wxT(" ") + from, 0 );
4
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
287 }
12
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
288 UpdateCache();
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
289 UpdateListImage();
4
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
290 m_buttonUndo->Enable(true);
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
291 }
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
292 /* 選択したファイルを削除 */
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
293 void MyFrame::OnDelete(wxCommandEvent& WXUNUSED(event))
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
294 {
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
295 m_undo.Clear();
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
296 wxString workdir = m_dirPickerWork->GetPath();
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
297 wxString trash = wxGetCwd() + wxFILE_SEP_PATH + wxT("trash");
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
298 long item = -1;
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
299 for ( ;; ) {
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
300 item = m_listCtrlView->GetNextItem(item, wxLIST_NEXT_ALL, wxLIST_STATE_SELECTED);
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
301 if ( item == -1 ) break;
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
302 wxString file = m_listCtrlView->GetItemText( item );
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
303 wxString from = workdir + wxFILE_SEP_PATH + file;
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
304 wxString to = trash + wxFILE_SEP_PATH + file;
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
305 wxRenameFile( from, to, true );
12
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
306
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
307 wxString movecmd = MOVECMD;
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
308 m_undo.Insert( movecmd + wxT(" ") + to + wxT(" ") + from, 0 );
4
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
309 }
12
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
310 UpdateCache();
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
311 UpdateListImage();
4
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
312 m_buttonUndo->Enable(true);
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
313 }
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
314 /* アンドゥ */
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
315 void MyFrame::OnUndo(wxCommandEvent& WXUNUSED(event))
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
316 {
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
317 for ( int i=0; i<m_undo.GetCount(); i++ ) {
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
318 wxExecute( m_undo[i] );
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
319 }
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
320 wxMessageBox(wxT("戻し完了."));
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
321 m_buttonUndo->Enable(false);
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
322 m_undo.Clear();
12
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
323 UpdateCache();
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
324 UpdateListImage();
4
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
325 }
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
326
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
327 /* 画像をリストコントロールに表示 */
12
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
328 void MyFrame::UpdateListImage()
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
329 {
11
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
330 // start-up iamge
4
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
331 wxString notfound = wxGetCwd() + wxFILE_SEP_PATH + wxT("image") + wxFILE_SEP_PATH + wxT("notfound.png");
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
332 wxBitmap bmp = wxBitmap( notfound, wxBITMAP_TYPE_PNG );
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
333 m_bitmapName->SetBitmap( bmp );
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
334 notfound = wxGetCwd() + wxFILE_SEP_PATH + wxT("image") + wxFILE_SEP_PATH + wxT("0000000000.png");
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
335 bmp.LoadFile( notfound, wxBITMAP_TYPE_PNG );
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
336 m_bitmapHhsno->SetBitmap( bmp );
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
337
12
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
338 // 本処理
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
339 m_listCtrlView->DeleteAllItems();
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
340 m_imageList->RemoveAll();
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
341 wxListItem item;
4
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
342 wxProgressDialog pd( wxT("進行状況"), wxT("処理開始..."), 7, this, wxPD_APP_MODAL|wxPD_REMAINING_TIME|wxPD_AUTO_HIDE );
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
343 pd.SetSize( wxSize(320,140) );
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
344
12
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
345 wxArrayString keys;
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
346 for ( CacheHash::iterator it=CH.begin(); it != CH.end(); ++it ) {
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
347 keys.Add(it->first);
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
348 }
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
349 bool select = true;
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
350 keys.Sort();
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
351 for ( int i=0; i<keys.GetCount(); i++ ) {
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
352 CacheItem* ci = new CacheItem;
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
353 ci = CH[keys[i]];
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
354 m_listCtrlView->InsertItem( i, ci->filename );
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
355 m_listCtrlView->SetItem( i, 0, ci->filename, i );
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
356 m_imageList->Add( ci->thumbnail );
3
870860d435a1 auto detect done.
pyon@macmini
parents: 2
diff changeset
357
12
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
358 if ( i == 0 ) { // 1枚目はマークシートのはず
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
359 wxImage marksheet( ci->fullpath, wxBITMAP_TYPE_JPEG );
4
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
360
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
361 wxImage name_image;
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
362 name_image = marksheet.GetSubImage( wxRect( wxPoint(300,550), wxSize(640,190) ) );
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
363 wxBitmap name_bmp = ( name_image.Scale( 320, 95, wxIMAGE_QUALITY_HIGH ) );
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
364 m_bitmapName->SetBitmap( name_bmp );
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
365
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
366 wxImage hhsno_image;
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
367 hhsno_image = marksheet.GetSubImage( wxRect( wxPoint(1800,210), wxSize(594,100) ) );
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
368 wxBitmap hhsno_bmp = ( hhsno_image.Scale( 320, 54, wxIMAGE_QUALITY_HIGH ) );
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
369 m_bitmapHhsno->SetBitmap( hhsno_bmp );
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
370
12
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
371 wxString hhsno = GuessHhs( ci->fullpath );
4
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
372 m_textCtrlGuess->SetValue( hhsno );
12
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
373 SetStatusText( wxString::Format(wxT("1st image : z = %f, l = %d"),ci->z,ci->l), 1 );
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
374 m_listCtrlView->SetItemState( i, wxLIST_STATE_SELECTED, wxLIST_STATE_SELECTED );
3
870860d435a1 auto detect done.
pyon@macmini
parents: 2
diff changeset
375 }
12
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
376 else { // 2枚目以降で初めてマークシートを認識したら,それ以降は選択しない
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
377 if ( ci->marksheet ) select = false;
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
378 if ( select ) m_listCtrlView->SetItemState( i, wxLIST_STATE_SELECTED, wxLIST_STATE_SELECTED );
3
870860d435a1 auto detect done.
pyon@macmini
parents: 2
diff changeset
379 }
870860d435a1 auto detect done.
pyon@macmini
parents: 2
diff changeset
380
6
9c85d71cad7c implement drag&drop.
pyon@macmini
parents: 5
diff changeset
381 pd.Update( i+1, wxT("画像認識中") );
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
382 }
1
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
383
4
964129946db6 Release : v2.0 finished !!!
pyon@macmini
parents: 3
diff changeset
384 SetStatusText( wxEmptyString, 2 );
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
385 }
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
386
1
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
387 /* 画像を選択 */
3
870860d435a1 auto detect done.
pyon@macmini
parents: 2
diff changeset
388 void MyFrame::GetImageInfo(wxListEvent& event)
1
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
389 {
13
df439f9831d2 finish listitem selected action.
pyon@macmini
parents: 12
diff changeset
390 if ( m_listCtrlView->GetSelectedItemCount() != 1 ) return;
df439f9831d2 finish listitem selected action.
pyon@macmini
parents: 12
diff changeset
391
3
870860d435a1 auto detect done.
pyon@macmini
parents: 2
diff changeset
392 SetStatusText( wxEmptyString, 2 );
2
e4ba3cc9b4b1 large view ok.
pyon@macmini
parents: 1
diff changeset
393 int i = event.GetIndex();
e4ba3cc9b4b1 large view ok.
pyon@macmini
parents: 1
diff changeset
394
3
870860d435a1 auto detect done.
pyon@macmini
parents: 2
diff changeset
395 wxString filename = event.GetText();
13
df439f9831d2 finish listitem selected action.
pyon@macmini
parents: 12
diff changeset
396 CacheItem* ci = new CacheItem;
df439f9831d2 finish listitem selected action.
pyon@macmini
parents: 12
diff changeset
397 ci = CH[filename];
3
870860d435a1 auto detect done.
pyon@macmini
parents: 2
diff changeset
398 wxString msg;
13
df439f9831d2 finish listitem selected action.
pyon@macmini
parents: 12
diff changeset
399 if ( ci->marksheet ) msg = wxT("perhaps marksheet !");
df439f9831d2 finish listitem selected action.
pyon@macmini
parents: 12
diff changeset
400 SetStatusText( wxString::Format(wxT("selected image : z = %f, l = %d ...")+msg, ci->z, ci->l ), 2 );
2
e4ba3cc9b4b1 large view ok.
pyon@macmini
parents: 1
diff changeset
401 }
e4ba3cc9b4b1 large view ok.
pyon@macmini
parents: 1
diff changeset
402
e4ba3cc9b4b1 large view ok.
pyon@macmini
parents: 1
diff changeset
403 /* 画像のスクリーン表示*/
e4ba3cc9b4b1 large view ok.
pyon@macmini
parents: 1
diff changeset
404 void MyFrame::ViewLarge(wxListEvent& event)
e4ba3cc9b4b1 large view ok.
pyon@macmini
parents: 1
diff changeset
405 {
e4ba3cc9b4b1 large view ok.
pyon@macmini
parents: 1
diff changeset
406 int i = event.GetIndex();
e4ba3cc9b4b1 large view ok.
pyon@macmini
parents: 1
diff changeset
407 wxListItem item;
e4ba3cc9b4b1 large view ok.
pyon@macmini
parents: 1
diff changeset
408 item.SetId(i);
e4ba3cc9b4b1 large view ok.
pyon@macmini
parents: 1
diff changeset
409
e4ba3cc9b4b1 large view ok.
pyon@macmini
parents: 1
diff changeset
410 wxString filename = event.GetText();
e4ba3cc9b4b1 large view ok.
pyon@macmini
parents: 1
diff changeset
411 wxString workdir = m_dirPickerWork->GetPath();
e4ba3cc9b4b1 large view ok.
pyon@macmini
parents: 1
diff changeset
412 wxString imagefile = workdir + wxFILE_SEP_PATH + filename;
e4ba3cc9b4b1 large view ok.
pyon@macmini
parents: 1
diff changeset
413
e4ba3cc9b4b1 large view ok.
pyon@macmini
parents: 1
diff changeset
414 wxImage image( imagefile, wxBITMAP_TYPE_JPEG );
e4ba3cc9b4b1 large view ok.
pyon@macmini
parents: 1
diff changeset
415 wxBitmap bmp( image.Scale( 707, 1000, wxIMAGE_QUALITY_HIGH ) );
e4ba3cc9b4b1 large view ok.
pyon@macmini
parents: 1
diff changeset
416 wxSplashScreen* splash = new wxSplashScreen( bmp,
e4ba3cc9b4b1 large view ok.
pyon@macmini
parents: 1
diff changeset
417 wxSPLASH_CENTRE_ON_SCREEN|wxSPLASH_TIMEOUT,
e4ba3cc9b4b1 large view ok.
pyon@macmini
parents: 1
diff changeset
418 3000, NULL, -1, wxDefaultPosition, wxDefaultSize,
e4ba3cc9b4b1 large view ok.
pyon@macmini
parents: 1
diff changeset
419 wxSIMPLE_BORDER|wxSTAY_ON_TOP );
e4ba3cc9b4b1 large view ok.
pyon@macmini
parents: 1
diff changeset
420 wxYield();
1
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
421 }
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
422
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
423 /* パラメータダイアログ */
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
424 void MyFrame::OnParam(wxCommandEvent& WXUNUSED(event))
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
425 {
5
52697c869ce8 delete move&detect button.
pyon@macmini
parents: 4
diff changeset
426 ParamDialog* pd = new ParamDialog( NULL, wxID_ANY, wxT("Setting Parameters") );
52697c869ce8 delete move&detect button.
pyon@macmini
parents: 4
diff changeset
427 if ( pd->ShowModal() == wxID_OK ) {
6
9c85d71cad7c implement drag&drop.
pyon@macmini
parents: 5
diff changeset
428 pd->NewParam( wxGetApp().lmin, wxGetApp().lmax, wxGetApp().zmin, wxGetApp().zmax );
5
52697c869ce8 delete move&detect button.
pyon@macmini
parents: 4
diff changeset
429 }
52697c869ce8 delete move&detect button.
pyon@macmini
parents: 4
diff changeset
430 pd->Destroy();
1
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
431 }
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
432
11
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
433 /* キャッシュ作成&更新 */
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
434 void MyFrame::UpdateCache()
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
435 {
12
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
436 m_buttonDetect->Enable(false);
11
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
437 wxGetApp().WriteLog( wxT("start updating cache") );
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
438 SetStatusText( wxT("rebuiling cache..."), 0 );
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
439
12
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
440 /* キャッシュ存在フラグOFF */
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
441 for ( CacheHash::iterator it=CH.begin(); it != CH.end(); ++it ) {
11
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
442 CacheItem* ci = new CacheItem;
12
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
443 ci = it->second;
11
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
444 ci->exists = false;
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
445 }
12
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
446
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
447 wxString workdir = m_dirPickerWork->GetPath();
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
448 wxDir dir( workdir );
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
449 if ( !dir.IsOpened() ) return;
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
450
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
451 wxArrayString filenames;
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
452 wxListItem item;
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
453
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
454 /* キャッシュ作成 */
11
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
455 unsigned int n = dir.GetAllFiles( workdir, &filenames, wxT("*.jpg"), wxDIR_FILES );
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
456 for ( int i=0; i<n; i++ ) {
12
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
457 wxString fullpath = filenames[i];
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
458 wxFileName f( fullpath );
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
459 wxString file = f.GetFullName();
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
460
11
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
461 CacheItem* ci = new CacheItem;
12
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
462 /* キャッシュ済みのものはスキップ */
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
463 if ( CH.count(file) ) {
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
464 ci = CH[file];
11
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
465 ci->exists = true;
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
466 continue;
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
467 }
12
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
468 /* 新しいファイルはキャッシュ */
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
469 float z; long l; bool m = IsMarksheet( fullpath, &z, &l );
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
470 wxImage image( fullpath, wxBITMAP_TYPE_JPEG );
11
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
471 wxBitmap bmp( image.Scale( 160, 226, wxIMAGE_QUALITY_HIGH ) );
12
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
472
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
473 ci->filename = file;
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
474 ci->fullpath = fullpath;
11
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
475 ci->marksheet = m;
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
476 ci->z = z;
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
477 ci->l = l;
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
478 ci->exists = true;
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
479 ci->thumbnail = bmp;
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
480 ci->modtime = wxEmptyString; // TODO.
12
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
481
11
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
482 CH[ci->filename] = ci; // add hash
12
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
483 wxGetApp().WriteLog( file + wxT(" appended.") + wxString::Format(wxT(" ( m=%d z=%f l=%d )"), m ? 1 : 0, z, l ) );
11
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
484 }
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
485
12
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
486 /* 存在しないファイルはキャッシュから削除 */
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
487 wxArrayString removelist;
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
488 for ( CacheHash::iterator it=CH.begin(); it != CH.end(); ++it ) {
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
489 CacheItem* ci = new CacheItem;
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
490 ci = it->second;
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
491 if ( !ci->exists ) removelist.Add( ci->filename );
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
492 }
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
493 for ( int i=0; i<removelist.GetCount(); i++ ) {
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
494 CH.erase(removelist[i]);
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
495 wxGetApp().WriteLog( removelist[i] + wxT(" removed.") );
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
496 }
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
497
6ed3b64ed39a finish 'UpdateListImage'.
pyon@macmini
parents: 11
diff changeset
498 m_buttonDetect->Enable(true);
11
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
499 SetStatusText( wxEmptyString, 0 );
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
500 m_timer.Start( 20*1000, wxTIMER_ONE_SHOT ); // restart
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
501 }
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
502
21
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
503 /* 被保険者を開く */
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
504 void MyFrame::OnOpenHhsDir(wxListEvent& event)
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
505 {
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
506 wxString hhsdir = m_textCtrlDist->GetValue();
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
507 hhsdir.Append( wxFILE_SEP_PATH );
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
508
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
509 wxListItem item = event.GetItem();
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
510 item.SetColumn(1);
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
511 item.SetMask(wxLIST_MASK_TEXT);
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
512 m_listCtrlDir->GetItem( item );
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
513 hhsdir.Append( item.GetText() );
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
514 wxString execmd = wxT("explorer ") + hhsdir;
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
515 wxExecute( execmd );
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
516 }
c540dc3eabe5 add listctrl-dir
pyon@macmini
parents: 13
diff changeset
517
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
518 // 以下,定型もの
11
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
519 void MyFrame::OnTimer(wxTimerEvent& event)
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
520 {
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
521 UpdateCache();
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
522 }
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
523 /* アイドリング */
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
524 void MyFrame::OnIdle(wxIdleEvent& event)
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
525 {
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
526 if ( !m_timer.IsRunning() ) {
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
527 m_timer.Start( 20*1000, wxTIMER_ONE_SHOT );
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
528 }
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
529 event.RequestMore();
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
530 event.Skip();
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
531 }
9b0840b0be7e cache done.
pyon@macmini
parents: 10
diff changeset
532
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
533 /* アプリフォルダを開く */
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
534 void MyFrame::OnOpenAppDir(wxCommandEvent& WXUNUSED(event))
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
535 {
5
52697c869ce8 delete move&detect button.
pyon@macmini
parents: 4
diff changeset
536 wxString appdir = wxGetCwd();
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
537 wxString execmd = wxT("explorer ") + appdir;
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
538 wxExecute( execmd );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
539 }
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
540
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
541 /* サイズ変更 */
1
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
542 void MyFrame::OnWinSize(wxSizeEvent& event)
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
543 {
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
544 this->Refresh( true, NULL );
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
545 TellLocation();
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
546 event.Skip();
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
547 }
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
548 /* ウィンドウ移動 */
1
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
549 void MyFrame::OnWinMove(wxMoveEvent& WXUNUSED(event))
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
550 {
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
551 TellLocation();
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
552 return;
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
553 }
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
554 /* ウィンドウ位置とサイズを表示 */
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
555 void MyFrame::TellLocation( void )
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
556 {
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
557 wxRect r = this->GetRect();
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
558 int x = r.GetX();
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
559 int y = r.GetY();
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
560 int w = r.GetWidth();
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
561 int h = r.GetHeight();
1
b47bd4618c16 design done.
pyon@macmini
parents: 0
diff changeset
562 SetStatusText( wxString::Format(wxT("(%d,%d) %dx%d"),x,y,w,h), 3 );
0
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
563 }
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
564 /* 終了 */
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
565 void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event))
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
566 {
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
567 Close(true);
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
568 }
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
569 /* 設定を保存 */
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
570 void MyFrame::SaveConfig(wxCloseEvent& WXUNUSED(event))
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
571 {
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
572 if ( !IsIconized() && !IsMaximized() ) {
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
573 wxGetApp().rect = this->GetRect();
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
574 }
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
575 wxGetApp().workdir = m_dirPickerWork->GetPath();
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
576
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
577 Destroy();
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
578 }
7bf900d47e9e start mover2
pyon@macmini
parents:
diff changeset
579