Random RTE at function hb_osisWin10

[fyurisich]

Me está pasando esto con un módulo que envia un informe con la clase Tprint. El informe lo veo por pantalla, en un determinado momento al salir de la visualización del informe, o sea al darle Cerrar, la aplicación se cierra y me genera un archivo hb_out.log. Este error me está ocurriendo en un equipo con Windows 10 pro de 32 bits. Programa de prueba:

include "oohg.ch"

PROCEDURE Main Local oWin SET AUTOADJUST ON

DEFINE WINDOW Win_1 OBJ oWin; AT 0, 0 ; WIDTH 400 ; HEIGHT 400 ; TITLE 'OOHG - HBPRINTER Demo' ; ICON 'ZZZ_PRINTICON' ; MAIN

  DEFINE MAIN MENU
     MENUITEM 'Toolbar'  ACTION TestW(  )
     MENUITEM 'Exit'         ACTION oWin:Release()
  END MENU

  ON KEY ESCAPE ACTION oWin:Release()

END WINDOW

    oWin:Center()
    oWin:Activate()

RETURN

Procedure TestW() Local oWin DEFINE WINDOW 0 OBJ oWin ; AT 10, 10 ; WIDTH 600 ; HEIGHT 400; TITLE 'Test'; ICON 'ZZZ_PRINTICON' ; MODAL

   DEFINE TOOLBAR TB1 BUTTONSIZE iif( hb_osisWin10(), 56, 50 ), 37 SIZE 8 //BREAK //FLAT
       BUTTON B1 CAPTION 'Close' PICTURE 'hbprint_close' ACTION msgbox("Closing")
            END TOOLBAR

    END WINDOW

    oWin:Activate()

Return

Error irrecuperable 6005: Exception error: Exception Code:C0000005 ACCESS_VIOLATION

[fyurisich]

I can't reproduce the error so I'm going to replace function WINVERSION with the MINIGUI one.

[fyurisich]

Fixed. See 01cb0fdee20d2fdef4899d731270c436d503d345 and 05924a2ab9ea365f8b18e75eed5cf3ca398c6a11