annotate src/myframe.cpp @ 30:e4d585cbd172 v2.3 v2.4

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