History

win32: fix scrolling, add pageup/down/home/end keys

23hiro committed 10 years ago

Commit ee4b5851 parent 969f1e11 file · +18 −4Browse files

Unified · Split

gui-win32/screen.c+18−4
@@ -330,6 +330,8 @@ WindowProc(HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam) · 329 unmodified lines
330 int i;330 int i;
331 Rectangle r;331 Rectangle r;
332 332
333 b = 0;
334
333 switch(msg) {335 switch(msg) {
334 case WM_CREATE:336 case WM_CREATE:
335 break;337 break;
@@ -342,9 +344,10 @@ WindowProc(HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam) · 6 unmodified lines
342 return DefWindowProc(hwnd, msg, wparam, lparam);344 return DefWindowProc(hwnd, msg, wparam, lparam);
343 case WM_MOUSEWHEEL:345 case WM_MOUSEWHEEL:
344 if ((int)(wparam & 0xFFFF0000)>0)346 if ((int)(wparam & 0xFFFF0000)>0)
345 b|=8;347 b |=8;
346 else348 else
347 b|=16;349 b |=16;
350 // fallthrough
348 case WM_MOUSEMOVE:351 case WM_MOUSEMOVE:
349 case WM_LBUTTONUP:352 case WM_LBUTTONUP:
350 case WM_MBUTTONUP:353 case WM_MBUTTONUP:
@@ -354,9 +357,8 @@ WindowProc(HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam) · 3 unmodified lines
354 case WM_RBUTTONDOWN:357 case WM_RBUTTONDOWN:
355 x = LOWORD(lparam);358 x = LOWORD(lparam);
356 y = HIWORD(lparam);359 y = HIWORD(lparam);
357 b = 0;
358 if(wparam & MK_LBUTTON)360 if(wparam & MK_LBUTTON)
359 b = 1;361 b |= 1;
360 if(wparam & MK_MBUTTON)362 if(wparam & MK_MBUTTON)
361 b |= 2;363 b |= 2;
362 if(wparam & MK_RBUTTON) {364 if(wparam & MK_RBUTTON) {
@@ -429,6 +431,18 @@ WindowProc(HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam) · 66 unmodified lines
429 case VK_RIGHT:431 case VK_RIGHT:
430 kbdputc(kbdq, Kright);432 kbdputc(kbdq, Kright);
431 break;433 break;
434 case VK_HOME:
435 kbdputc(kbdq, Khome);
436 break;
437 case VK_END:
438 kbdputc(kbdq, Kend);
439 break;
440 case VK_PRIOR:
441 kbdputc(kbdq, Kpgup);
442 break;
443 case VK_NEXT:
444 kbdputc(kbdq, Kpgdown);
445 break;
432 }446 }
433 break;447 break;
434 448

Keyboard shortcuts

General

Show keyboard shortcuts
?
Focus the current search
/

Issues and pull requests

Open filters
f

Issues, pull requests and Inbox

Select next item
j↓
Select previous item
k↑
Open selected item
Enter
Dismiss filters or clear selection
Esc

Repository code

Go to file
t