| Geant4 Cross Reference |
1 // Copyright (C) 2010, Guy Barrand. All rights
2 // See the file tools.license for terms.
3
4 #ifndef toolx_Windows_window
5 #define toolx_Windows_window
6
7 #include <windows.h>
8 #include <windowsx.h>
9 #include <string>
10
11 namespace toolx {
12 namespace Windows {
13
14 class window {
15 static const std::string& s_class() {
16 static const std::string s_v("toolx::Windo
17 return s_v;
18 }
19 static void register_class(){
20 static bool s_done = false; //not const, t
21 if(!s_done) {
22 WNDCLASS wc;
23 wc.style = CS_HREDRAW | CS_VREDR
24 wc.lpfnWndProc = (WNDPROC)proc;
25 wc.cbClsExtra = 0;
26 wc.cbWndExtra = 0;
27 wc.hInstance = ::GetModuleHandle(NUL
28 wc.hIcon = LoadIcon(NULL,IDI_APP
29 wc.hCursor = LoadCursor(NULL,IDC_A
30 wc.hbrBackground = GetSysColorBrush(COLO
31 wc.lpszMenuName = (PTSTR)s_class().c_st
32 wc.lpszClassName = (PTSTR)s_class().c_st
33 ::RegisterClass(&wc);
34 s_done = true;
35 }
36 }
37 public:
38 virtual void key_up(){}
39 virtual void key_down(){}
40 virtual void key_left(){}
41 virtual void key_right(){}
42 virtual void key_escape(){}
43 virtual void close(){
44 //if(m_hwnd) ::PostMessage(m_hwnd,WM_QUIT,
45 ::PostQuitMessage(0);
46 }
47 public:
48 window(const char* a_title,int a_x,int a_y,u
49 :m_hwnd(0)
50 ,m_key_shift(false)
51 ,m_key_ctrl(false)
52 ,m_focus_hwnd(0)
53 {
54 // WARNING : given a_w,a_h may not be the
55 // See set_client_area_size() me
56 register_class();
57 m_hwnd = ::CreateWindow((PTSTR)s_class().c
58 NULL,
59 a_mask,
60 a_x,a_y,
61 a_w,a_h,
62 NULL,NULL,
63 ::GetModuleHandl
64 NULL);
65 if(!m_hwnd) return;
66 ::SetWindowText(m_hwnd,(PTSTR)a_title);
67 ::SetWindowLongPtr(m_hwnd,GWLP_USERDATA,LO
68 }
69 virtual ~window(){
70 if(m_hwnd) {
71 ::SetWindowLongPtr(m_hwnd,GWLP_USERDATA,
72 ::DestroyWindow(m_hwnd);
73 m_hwnd = 0;
74 }
75 }
76 protected:
77 window(const window& a_from)
78 :m_hwnd(0)
79 ,m_key_shift(a_from.m_key_shift)
80 ,m_key_ctrl(a_from.m_key_ctrl)
81 ,m_focus_hwnd(0)
82 {
83 /*
84 if(!a_from.m_hwnd) return;
85 int w,h;
86 get_size(a_from.m_hwnd,w,h);
87 register_class();
88 m_hwnd = ::CreateWindow(s_class().c_str(),
89 NULL,
90 WS_OVERLAPPEDWIN
91 CW_USEDEFAULT,CW
92 w,h,
93 NULL,NULL,
94 ::GetModuleHandl
95 NULL);
96 if(!m_hwnd) return;
97 ::SetWindowLongPtr(m_hwnd,GWLP_USERDATA,LO
98 */
99 }
100 window& operator=(const window& a_from){
101 m_key_shift = a_from.m_key_shift;
102 m_key_ctrl = a_from.m_key_ctrl;
103 return *this;
104 }
105 public:
106 const window& get_me() const {return *this;}
107 window& get_me() {return *this;}
108 bool key_shift() const {return m_key_shift;}
109 HWND hwnd() const {return m_hwnd;}
110
111 void set_client_area_size(unsigned int a_w,u
112 if(!m_hwnd) return;
113 RECT wrect;
114 ::GetWindowRect(m_hwnd,&wrect);
115 unsigned int ww = wrect.right-wrect.left;
116 unsigned int wh = wrect.bottom-wrect.top;
117
118 RECT carect;
119 ::GetClientRect(m_hwnd,&carect);
120 unsigned int cw = carect.right-carect.left
121 unsigned int ch = carect.bottom-carect.top
122
123 unsigned int woffset = ww-cw;
124 unsigned int hoffset = wh-ch;
125
126 ::MoveWindow(m_hwnd,wrect.left,wrect.top,a
127 }
128 void move(unsigned int a_x,unsigned int a_y)
129 if(!m_hwnd) return;
130 RECT rect;
131 ::GetWindowRect(m_hwnd,&rect);
132 unsigned int w = rect.right-rect.left;
133 unsigned int h = rect.bottom-rect.top;
134 ::MoveWindow(m_hwnd,a_x,a_y,w,h,TRUE);
135 }
136
137 void set_focus_hwnd(HWND a_hwnd) {m_focus_hw
138 HWND focus_hwnd() const {return m_focus_hwnd
139 protected:
140 static LRESULT CALLBACK proc(HWND a_hwnd,UIN
141 switch (a_msg) {
142 // Else :
143 case WM_SIZE:{ // Assume one child window
144 int width = LOWORD(a_lparam);
145 int height = HIWORD(a_lparam);
146 HWND hwnd = GetFirstChild(a_hwnd);
147 if(hwnd) {
148 ::MoveWindow(hwnd,0,0,width,height,TRU
149 }
150 }return 0;
151
152 case WM_SETFOCUS:{
153 window* _this = (window*)::GetWindowLong
154 if(_this) {
155 HWND hwnd = _this->focus_hwnd();
156 if(hwnd) ::SetFocus(hwnd);
157 }
158 }return 0;
159
160 case WM_KEYDOWN:{
161 switch(a_wparam){
162 case VK_SHIFT:{
163 window* _this = (window*)::GetWindowLo
164 if(_this) _this->m_key_shift = true;
165 return 0;
166 }
167 case VK_CONTROL:{
168 window* _this = (window*)::GetWindowLo
169 if(_this) _this->m_key_ctrl = true;
170 return 0;
171 }
172 case VK_UP:{
173 window* _this = (window*)::GetWindowLo
174 if(_this) _this->key_up();
175 return 0;
176 }
177 case VK_DOWN:{
178 window* _this = (window*)::GetWindowLo
179 if(_this) _this->key_down();
180 return 0;
181 }
182 case VK_LEFT:{
183 window* _this = (window*)::GetWindowLo
184 if(_this) _this->key_left();
185 return 0;
186 }
187 case VK_RIGHT:{
188 window* _this = (window*)::GetWindowLo
189 if(_this) _this->key_right();
190 return 0;
191 }
192 case VK_ESCAPE:{
193 window* _this = (window*)::GetWindowLo
194 if(_this) _this->key_escape();
195 return 0;
196 }
197 } //end switch(a_wparam)
198 break;
199 }
200 case WM_KEYUP:{
201 switch(a_wparam){
202 case VK_SHIFT:{
203 window* _this = (window*)::GetWindowLo
204 if(_this) _this->m_key_shift = false;
205 return 0;
206 }
207 case VK_CONTROL:{
208 window* _this = (window*)::GetWindowLo
209 if(_this) _this->m_key_ctrl = false;
210 return 0;
211 }
212 } //end switch(a_wparam)
213 break;
214 }
215
216 case WM_CLOSE:{
217 window* _this = (window*)::GetWindowLong
218 if(_this) _this->close();
219 }break; //NOTE : can't be return 0.
220 case WM_DESTROY:wm__destroy(a_hwnd);return
221 }
222 return (DefWindowProc(a_hwnd,a_msg,a_wpara
223 }
224 static void wm__destroy(HWND a_hwnd) {
225 window* _this = (window*)::GetWindowLongPt
226 if(_this) { //How to be sure that we have
227 if(_this->m_hwnd!=a_hwnd) {
228 //::printf("WinTk::Component::wm_destr
229 }
230 _this->m_hwnd = 0;
231 }
232 ::SetWindowLongPtr(a_hwnd,GWLP_USERDATA,LO
233 }
234 protected:
235 void get_size(HWND a_hwnd,int& a_w,int& a_h)
236 RECT rect;
237 ::GetWindowRect(a_hwnd,&rect);
238 a_w = rect.right-rect.left;
239 a_h = rect.bottom-rect.top;
240 }
241 protected:
242 HWND m_hwnd;
243 bool m_key_shift;
244 bool m_key_ctrl;
245 HWND m_focus_hwnd;
246 };
247
248 }}
249
250 #endif