//------------------------------------------------------------------------
pascal OSStatus DoMouseUp (EventHandlerCallRef nextHandler, EventRef theEvent, void* userData)
{
Point wheresMyMouse;
UInt32 modifier;
GetEventParameter (theEvent, kEventParamMouseLocation, typeQDPoint, NULL, sizeof(Point), NULL, &wheresMyMouse);
GlobalToLocal (&wheresMyMouse);
GetEventParameter (theEvent, kEventParamKeyModifiers, typeUInt32, NULL, sizeof(UInt32), NULL, &modifier);
platform_support * app = reinterpret_cast<platform_support*>(userData);
app->m_specific->m_cur_x = wheresMyMouse.h;
if(app->flip_y())
{
app->m_specific->m_cur_y = app->rbuf_window().height() - wheresMyMouse.v;
}
else
{
app->m_specific->m_cur_y = wheresMyMouse.v;
}
app->m_specific->m_input_flags = mouse_left | get_key_flags(modifier);
if(app->m_ctrls.on_mouse_button_up(app->m_specific->m_cur_x,
app->m_specific->m_cur_y))
{
app->on_ctrl_change();
app->force_redraw();
}
app->on_mouse_button_up(app->m_specific->m_cur_x,
app->m_specific->m_cur_y,
app->m_specific->m_input_flags);
return CallNextEventHandler (nextHandler, theEvent);
}
void
keyboard_handle_event (const SDL_Event *ev)
{
const SDL_KeyboardEvent *kev;
uint8_t key_index;
int scan_code;
if (ev->type != SDL_KEYUP && ev->type != SDL_KEYDOWN)
return;
kev = (const SDL_KeyboardEvent *) ev;
if (handle_custom_key_press (kev))
return;
scan_code = sdlkey_to_scan_code (kev->keysym.sym);
if (scan_code == 0)
return;
keyboard_last_key_prefixed = is_key_prefixed (kev->keysym.sym);
keyboard_last_key = scan_code;
key_index = get_key_table_index (kev->keysym.sym);
if (ev->type == SDL_KEYDOWN)
{
keyboard_table[key_index] = 1 | get_key_flags ();
if (!keyboard_last_key_prefixed)
add_key_to_buffer (scan_code);
}
else
keyboard_table[key_index] = 0;
}
//
// Constructor
//
event_handler::event_handler(image *screen, palette *pal) {
CHECK( screen && pal);
mouse = new JCMouse(screen, pal);
mhere = mouse->exsist();
last_keystat = get_key_flags();
ewaiting = 0;
// Ignore activate events
SDL_EventState(SDL_ACTIVEEVENT, SDL_IGNORE);
}
//------------------------------------------------------------------------
LRESULT CALLBACK window_proc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam)
{
PAINTSTRUCT ps;
HDC paintDC;
void* user_data = reinterpret_cast<void*>(::GetWindowLong(hWnd, GWL_USERDATA));
platform_support* app = 0;
if(user_data)
{
app = reinterpret_cast<platform_support*>(user_data);
}
if(app == 0)
{
if(msg == WM_DESTROY)
{
::PostQuitMessage(0);
return 0;
}
return ::DefWindowProc(hWnd, msg, wParam, lParam);
}
HDC dc = ::GetDC(app->m_specific->m_hwnd);
app->m_specific->m_current_dc = dc;
LRESULT ret = 0;
switch(msg)
{
//--------------------------------------------------------------------
case WM_CREATE:
break;
//--------------------------------------------------------------------
case WM_SIZE:
app->m_specific->create_pmap(LOWORD(lParam),
HIWORD(lParam),
&app->rbuf_window());
app->trans_affine_resizing(LOWORD(lParam), HIWORD(lParam));
app->on_resize(LOWORD(lParam), HIWORD(lParam));
app->force_redraw();
break;
//--------------------------------------------------------------------
case WM_ERASEBKGND:
break;
//--------------------------------------------------------------------
case WM_LBUTTONDOWN:
::SetCapture(app->m_specific->m_hwnd);
app->m_specific->m_cur_x = int16(LOWORD(lParam));
if(app->flip_y())
{
app->m_specific->m_cur_y = app->rbuf_window().height() - int16(HIWORD(lParam));
}
else
{
app->m_specific->m_cur_y = int16(HIWORD(lParam));
}
app->m_specific->m_input_flags = mouse_left | get_key_flags(wParam);
app->m_ctrls.set_cur(app->m_specific->m_cur_x,
app->m_specific->m_cur_y);
if(app->m_ctrls.on_mouse_button_down(app->m_specific->m_cur_x,
app->m_specific->m_cur_y))
{
app->on_ctrl_change();
app->force_redraw();
}
else
{
if(app->m_ctrls.in_rect(app->m_specific->m_cur_x,
app->m_specific->m_cur_y))
{
if(app->m_ctrls.set_cur(app->m_specific->m_cur_x,
app->m_specific->m_cur_y))
{
app->on_ctrl_change();
app->force_redraw();
}
}
else
{
app->on_mouse_button_down(app->m_specific->m_cur_x,
app->m_specific->m_cur_y,
app->m_specific->m_input_flags);
}
}
/*
if(!app->wait_mode())
{
app->on_idle();
}
*/
break;
//--------------------------------------------------------------------
case WM_LBUTTONUP:
::ReleaseCapture();
app->m_specific->m_cur_x = int16(LOWORD(lParam));
if(app->flip_y())
{
app->m_specific->m_cur_y = app->rbuf_window().height() - int16(HIWORD(lParam));
}
else
{
app->m_specific->m_cur_y = int16(HIWORD(lParam));
}
app->m_specific->m_input_flags = mouse_left | get_key_flags(wParam);
if(app->m_ctrls.on_mouse_button_up(app->m_specific->m_cur_x,
app->m_specific->m_cur_y))
{
app->on_ctrl_change();
app->force_redraw();
}
app->on_mouse_button_up(app->m_specific->m_cur_x,
app->m_specific->m_cur_y,
app->m_specific->m_input_flags);
/*
if(!app->wait_mode())
{
app->on_idle();
}
*/
break;
//--------------------------------------------------------------------
case WM_RBUTTONDOWN:
::SetCapture(app->m_specific->m_hwnd);
app->m_specific->m_cur_x = int16(LOWORD(lParam));
if(app->flip_y())
{
app->m_specific->m_cur_y = app->rbuf_window().height() - int16(HIWORD(lParam));
}
else
{
app->m_specific->m_cur_y = int16(HIWORD(lParam));
}
app->m_specific->m_input_flags = mouse_right | get_key_flags(wParam);
app->on_mouse_button_down(app->m_specific->m_cur_x,
app->m_specific->m_cur_y,
app->m_specific->m_input_flags);
/*
if(!app->wait_mode())
{
app->on_idle();
}
*/
break;
//--------------------------------------------------------------------
case WM_RBUTTONUP:
::ReleaseCapture();
app->m_specific->m_cur_x = int16(LOWORD(lParam));
if(app->flip_y())
{
app->m_specific->m_cur_y = app->rbuf_window().height() - int16(HIWORD(lParam));
}
else
{
app->m_specific->m_cur_y = int16(HIWORD(lParam));
}
app->m_specific->m_input_flags = mouse_right | get_key_flags(wParam);
app->on_mouse_button_up(app->m_specific->m_cur_x,
app->m_specific->m_cur_y,
app->m_specific->m_input_flags);
/*
if(!app->wait_mode())
{
app->on_idle();
}
*/
break;
//--------------------------------------------------------------------
case WM_MOUSEMOVE:
app->m_specific->m_cur_x = int16(LOWORD(lParam));
if(app->flip_y())
{
app->m_specific->m_cur_y = app->rbuf_window().height() - int16(HIWORD(lParam));
}
else
{
app->m_specific->m_cur_y = int16(HIWORD(lParam));
}
app->m_specific->m_input_flags = get_key_flags(wParam);
if(app->m_ctrls.on_mouse_move(
app->m_specific->m_cur_x,
app->m_specific->m_cur_y,
(app->m_specific->m_input_flags & mouse_left) != 0))
{
app->on_ctrl_change();
app->force_redraw();
}
else
{
if(!app->m_ctrls.in_rect(app->m_specific->m_cur_x,
app->m_specific->m_cur_y))
{
app->on_mouse_move(app->m_specific->m_cur_x,
app->m_specific->m_cur_y,
app->m_specific->m_input_flags);
}
}
/*
if(!app->wait_mode())
{
app->on_idle();
}
*/
break;
//--------------------------------------------------------------------
case WM_SYSKEYDOWN:
case WM_KEYDOWN:
app->m_specific->m_last_translated_key = 0;
switch(wParam)
{
case VK_CONTROL:
app->m_specific->m_input_flags |= kbd_ctrl;
break;
case VK_SHIFT:
app->m_specific->m_input_flags |= kbd_shift;
break;
default:
app->m_specific->translate(wParam);
break;
}
if(app->m_specific->m_last_translated_key)
{
bool left = false;
bool up = false;
bool right = false;
bool down = false;
switch(app->m_specific->m_last_translated_key)
{
case key_left:
left = true;
break;
case key_up:
up = true;
break;
case key_right:
right = true;
break;
case key_down:
down = true;
break;
case key_f2:
app->copy_window_to_img(agg::platform_support::max_images - 1);
app->save_img(agg::platform_support::max_images - 1, "screenshot");
break;
}
if(app->window_flags() & window_process_all_keys)
{
app->on_key(app->m_specific->m_cur_x,
app->m_specific->m_cur_y,
app->m_specific->m_last_translated_key,
app->m_specific->m_input_flags);
}
else
{
if(app->m_ctrls.on_arrow_keys(left, right, down, up))
{
app->on_ctrl_change();
app->force_redraw();
}
else
{
app->on_key(app->m_specific->m_cur_x,
app->m_specific->m_cur_y,
app->m_specific->m_last_translated_key,
app->m_specific->m_input_flags);
}
}
}
/*
if(!app->wait_mode())
{
app->on_idle();
}
*/
break;
//--------------------------------------------------------------------
case WM_SYSKEYUP:
case WM_KEYUP:
app->m_specific->m_last_translated_key = 0;
switch(wParam)
{
case VK_CONTROL:
app->m_specific->m_input_flags &= ~kbd_ctrl;
break;
case VK_SHIFT:
app->m_specific->m_input_flags &= ~kbd_shift;
break;
}
break;
//--------------------------------------------------------------------
case WM_CHAR:
case WM_SYSCHAR:
if(app->m_specific->m_last_translated_key == 0)
{
app->on_key(app->m_specific->m_cur_x,
app->m_specific->m_cur_y,
wParam,
app->m_specific->m_input_flags);
}
break;
//--------------------------------------------------------------------
case WM_PAINT:
paintDC = ::BeginPaint(hWnd, &ps);
app->m_specific->m_current_dc = paintDC;
if(app->m_specific->m_redraw_flag)
{
app->on_draw();
app->m_specific->m_redraw_flag = false;
}
app->m_specific->display_pmap(paintDC, &app->rbuf_window());
app->on_post_draw(paintDC);
app->m_specific->m_current_dc = 0;
::EndPaint(hWnd, &ps);
break;
//--------------------------------------------------------------------
case WM_COMMAND:
break;
//--------------------------------------------------------------------
case WM_DESTROY:
::PostQuitMessage(0);
break;
//--------------------------------------------------------------------
default:
ret = ::DefWindowProc(hWnd, msg, wParam, lParam);
break;
}
app->m_specific->m_current_dc = 0;
::ReleaseDC(app->m_specific->m_hwnd, dc);
return ret;
}
