From: George H. <geo...@us...> - 2006-06-08 11:10:56
|
Update of /cvsroot/win32forth/win32forth/src In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv3028/win32forth/src Modified Files: GENERIC.F Log Message: gah: Modified Show: to prevent hanging/deadlocking in multitasking apps. Index: GENERIC.F =================================================================== RCS file: /cvsroot/win32forth/win32forth/src/GENERIC.F,v retrieving revision 1.11 retrieving revision 1.12 diff -C2 -d -r1.11 -r1.12 *** GENERIC.F 6 Jun 2006 17:22:15 -0000 1.11 --- GENERIC.F 8 Jun 2006 07:54:07 -0000 1.12 *************** *** 183,188 **** \ *| SW_SHOWNOACTIVATE | Displays a window in its most recent size and position. This value is similar to SW_SHOWNORMAL, except the window is not actived. | \ *| SW_SHOWNORMAL | Activates and displays a window. If the window is minimized or maximized, the system restores it to its original size and position. An application should specify this flag when displaying the window for the first time. | hWnd ! if hWnd Call ShowWindow then drop ;M --- 183,195 ---- \ *| SW_SHOWNOACTIVATE | Displays a window in its most recent size and position. This value is similar to SW_SHOWNORMAL, except the window is not actived. | \ *| SW_SHOWNORMAL | Activates and displays a window. If the window is minimized or maximized, the system restores it to its original size and position. An application should specify this flag when displaying the window for the first time. | + \ *P If the window belongs to a different task or application the WM_SHOW is posted to the + \ ** the message queue to prevent the current task hanging. If the window belongs to the + \ ** current task the message is sent. hWnd ! if 0 hWnd call GetWindowThreadProcessId ! call GetCurrentThreadId = ! if hWnd Call ShowWindow ! else hWnd call ShowWindowAsync ! then then drop ;M |