fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2012-09-20 00:17 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)

Browse Source 
* contrib/gtwvg/crt.prg
    ! Fixed: regression caused by redirection of "?" command.
       Changed: ? " " => CLS 
       This fixes nasty behavior of WvgCRT() not showing up altogether.
       Took roughly four hours to debug.
This commit is contained in:
Pritpal Bedi
2012-09-20 07:21:54 +00:00
parent b59c201a5b
commit f452ee675c
2 changed files with 8 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
harbour/ChangeLog
View File

@@ -16,6 +16,13 @@
The license applies to all entries newer than 2009-04-28.
*/
2012-09-20 00:17 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)
* contrib/gtwvg/crt.prg
! Fixed: regression caused by redirection of "?" command.
Changed: ? " " => CLS
This fixes nasty behavior of WvgCRT() not showing up altogether.
Took roughly four hours to debug.
2012-09-19 18:46 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)
* contrib/hbide/main.prg
* contrib/hbxbp/dbu.prg

2
harbour/contrib/gtwvg/crt.prg
View File

@@ -342,7 +342,7 @@ METHOD WvgCrt:create( oParent, oOwner, aPos, aSize, aPresParams, lVisible )
ENDIF
/* CreateWindow() be forced to execute */
? " "
CLS
::hWnd := hb_gtInfo( HB_GTI_SPEC, HB_GTS_WINDOWHANDLE )
::setFocus()