|
|
| version 1.1, 2004/08/10 14:38:56 | version 1.2, 2004/08/14 05:41:05 |
|---|---|
| Line 18 | Line 18 |
| #include "resource.h" | #include "resource.h" |
| #include "scrnmng.h" | #include "scrnmng.h" |
| extern bool wrapperMouseDown(EventRef event); | |
| static const EventTypeSpec appEventList[] = { | static const EventTypeSpec appEventList[] = { |
| {kEventClassCommand, kEventCommandProcess }, | {kEventClassCommand, kEventCommandProcess }, |
| {kEventClassAppleEvent, kEventAppleEvent}, | {kEventClassAppleEvent, kEventAppleEvent}, |
| {kEventClassMouse, kEventMouseDown}, | {kEventClassMouse, kEventMouseDown}, |
| {kEventClassMouse, kEventMouseUp}, | |
| {kEventClassMouse, kEventMouseMoved}, | {kEventClassMouse, kEventMouseMoved}, |
| {kEventClassMouse, kEventMouseDragged}, | {kEventClassMouse, kEventMouseDragged}, |
| {kEventClassMouse, kEventMouseUp}, | |
| {kEventClassKeyboard, kEventRawKeyModifiersChanged}, | {kEventClassKeyboard, kEventRawKeyModifiersChanged}, |
| }; | }; |
| static const EventTypeSpec windEventList[] = { | static const EventTypeSpec windEventList[] = { |
| {kEventClassWindow, kEventWindowClose}, | {kEventClassWindow, kEventWindowClose}, |
| // {kEventClassWindow, kEventWindowActivated}, | {kEventClassWindow, kEventWindowActivated}, |
| // {kEventClassWindow, kEventWindowToolbarSwitchMode}, | // {kEventClassWindow, kEventWindowToolbarSwitchMode}, |
| {kEventClassWindow, kEventWindowDragStarted}, | {kEventClassWindow, kEventWindowDragStarted}, |
| {kEventClassWindow, kEventWindowDragCompleted}, | {kEventClassWindow, kEventWindowDragCompleted}, |
| Line 75 static pascal OSStatus appevent (EventHa | Line 73 static pascal OSStatus appevent (EventHa |
| long start, fin; | long start, fin; |
| const char urlStr[] = "http://retropc.net/tk800/xmil/help/help.html"; | const char urlStr[] = "http://retropc.net/tk800/xmil/help/help.html"; |
| ICStart(&inst, 'xMil'); | ICStart(&inst, 'XMil'); |
| start = 0; | start = 0; |
| fin = strlen(urlStr); | fin = strlen(urlStr); |
| ICLaunchURL(inst, "\p", urlStr, strlen(urlStr), &start, &fin); | ICLaunchURL(inst, "\p", urlStr, strlen(urlStr), &start, &fin); |
| Line 171 static pascal OSStatus windowevent(Event | Line 169 static pascal OSStatus windowevent(Event |
| result = noErr; | result = noErr; |
| break; | break; |
| case kEventRawKeyDown: | case kEventRawKeyDown: |
| if (!xmilrunning) { | |
| result = noErr; | |
| break; | |
| } | |
| if (modif & cmdKey) { | if (modif & cmdKey) { |
| wrapperMouseDown(event); | wrapperKeyDown(event); |
| } | } |
| else { | else { |
| mackbd_keydown(key, TRUE); | mackbd_keydown(key, TRUE); |
| } | } |
| result = noErr; | result = noErr; |
| break; | break; |
| default: | default: |
| break; | break; |