Update of /cvsroot/win32forth/win32forth/demos/AccelDemo
In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv8889
Modified Files:
AccelDemo.f
Log Message:
Jos: Solved the copy-demo-bitmap problem.
Index: AccelDemo.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/demos/AccelDemo/AccelDemo.f,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** AccelDemo.f 5 May 2005 09:43:28 -0000 1.2
--- AccelDemo.f 12 May 2007 14:21:20 -0000 1.3
***************
*** 232,236 ****
SUBMENU "&Copy"
MENUITEM "Plot Window &Normal\tCtrl+C" 4719 Handle-Key-Table ;
! MENUITEM "Plot Window &Inverted\tShift+Ctrl+P" 4720 Handle-Key-Table ;
ENDSUBMENU
MENUITEM "Paste\tCtrl+V" 4721 Handle-Key-Table ;
--- 232,236 ----
SUBMENU "&Copy"
MENUITEM "Plot Window &Normal\tCtrl+C" 4719 Handle-Key-Table ;
! MENUITEM "Plot Window &Inverted\tShift+Ctrl+C" 4720 Handle-Key-Table ;
ENDSUBMENU
MENUITEM "Paste\tCtrl+V" 4721 Handle-Key-Table ;
***************
*** 523,527 ****
hbm hdcMem call SelectObject drop
! r>
IF NOTSRCCOPY
ELSE SRCCOPY
--- 523,527 ----
hbm hdcMem call SelectObject drop
! flag
IF NOTSRCCOPY
ELSE SRCCOPY
***************
*** 1101,1105 ****
FCONTROL 'C' 4719 ' handle-control-c ACCELENTRY
! FCONTROL FSHIFT OR 'C' 4720 ' handle-control-shift-p ACCELENTRY
FCONTROL 'V' 4721 ' paste-demo-bitmap ACCELENTRY
FCONTROL 'X' 4722 ' handle-control-x ACCELENTRY
--- 1101,1105 ----
FCONTROL 'C' 4719 ' handle-control-c ACCELENTRY
! FCONTROL FSHIFT OR 'C' 4720 ' handle-control-shift-c ACCELENTRY
FCONTROL 'V' 4721 ' paste-demo-bitmap ACCELENTRY
FCONTROL 'X' 4722 ' handle-control-x ACCELENTRY
***************
*** 1150,1152 ****
AccelDemo
\ ' windemo turnkey AccelDemo
! |
