annotate src/myframe.cpp @ 29:24283d3a9592 v2.3

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