Pregunta sobre HBMK2

[ruben Dario]

Saludos al Forum.

Hay alguna manera de ver con genera la compilacion. en un archivo usando hbmk2



COn MAKE genera un archivo.bc

[Antonio Linares]

Ruben,

Ejecuta hbmk2 -help y verás todas las opciones posibles.

Tienes la opción -traceonly que puede servirte

[ruben Dario]

Gracias, Antonio

Lo que busco es ver que es lo que compila , para copararlo con en MAKE o sea el MAK

esta archivo de contribuccion wvwtest9.prg lo compilo y funciona bien cuado lo compilo con HBMK2 pero cuabndo construye el ejecutable con make *.MAK al ejecutar se cuelga y doce que es un problema de Windows

Este es el error al Ejutarlo, Ejecutable construido usando MAKE *.mak

Haciendo seguimiento al codigo. wvwtest9.prg

En estas instruciones se cuelga.

wvw_SetVertCaret( .T. )
wvw_pbSetFont( , "Tahoma", 14 )
nCursor := SetCursor( SC_NONE )

IF ! SetDefaultWindowSize()
ldebug( "Cannot setDefaultWindowSize()" )
ELSE
ldebug( "Successfully setDefaultWindowSize()" )
ENDIF

Code: Select all  Expand view  RUN

PROCEDURE Main()

   LOCAL nCurWindow
   LOCAL hMenu, hPopupmenu
   LOCAL cLabel := "This is the Main Window"
   LOCAL nCursor
   LOCAL kF1, kF2, kF3
   LOCAL kF9, kF10, kF11
   LOCAL oMouse
   LOCAL ch

#if defined( __HBSCRIPT__HBSHELL ) .AND. defined( __PLATFORM__WINDOWS )
   hbshell_gtSelect( "GTWVW" )
#endif

   Set( _SET_EVENTMASK, INKEY_ALL )

   Set( _SET_DATEFORMAT, "yyyy-mm-dd" )
   SET SCOREBOARD OFF
   // wvw_SetPaintRefresh( 0 )

Alert("PAso 1")   [b] /Nota Hasta aqui lo ejecuta, despues se cuelga./[/b]


   wvw_SetVertCaret( .T. )
   wvw_pbSetFont( , "Tahoma", 14 )
   nCursor := SetCursor( SC_NONE )

   IF ! SetDefaultWindowSize()
      ldebug( "Cannot setDefaultWindowSize()" )
   ELSE
      ldebug( "Successfully setDefaultWindowSize()" )
   ENDIF
Alert("PAso 2")
   IF wvw_sbCreate() > 0 .AND. ;
      wvw_sbAddPart( , "99:99:99" ) > 0
      wvw_SetTimer( , 1000 )
   ENDIF


 

Code: Select all  Expand view  RUN

Application Internal Error - K:\v_xharb_v3\wvwtest9.exe
Terminated at: 2015-07-28 08:25:23
Unrecoverable error 6005: Exception error:

    Exception Code:C0000005 ACCESS_VIOLATION
    Exception Address:004DCFD3
    EAX:00000000  EBX:00517E58  ECX:001C7CFC  EDX:004DCFCC
    ESI:00000000  EDI:004FBE0C  EBP:0018FDEC
    CS:EIP:0023:004DCFD3  SS:ESP:002B:0018FDCC
    DS:002B  ES:002B  FS:0053  GS:002B
    Flags:00010246
    Exception Parameters: 00000000 000001DC
    CS:EIP: 8B 90 DC 01 00 00 8B 70 08 8B 9C 90 E0 01 00 00
    SS:ESP: 00000000 00517E58 00470E20 00000001 00000000 001C9D3C 00000000 00000000 0018FF00 0046AE4B 00000001 00000000 00000001 0050D1CC 00000006 00000101

    C stack:
    EIP:     EBP:       Frame: OldEBP, RetAddr, Params...
    004DCFD3 0018FDEC   0018FF00 0046AE4B 00000001 00000000 00000001 0050D1CC 00000006 00000101 00000010 005182E4
    0046AE4B 0018FF00   0018FF10 004012E0 004FBDAC 004FB0C8
    004012E0 0018FF10   0018FF2C 00470E20 00000000 00000000 00000000 00000000 000000AF
    00470E20 0018FF2C   0018FF40 0046A1A3 00000000 004FB048 7FFDE000
    0046A1A3 0018FF40   0018FF4C 0049848E 00000001
    0049848E 0018FF4C   0018FF78 004F726F 00000001 001C0130 001C0870 0052CC20 0052CC20 7FFDE000 7FFDE000 0018FFCC
    004F726F 0018FF78   0018FF94 00000000 004FB048 74C37C04 7FFDE000 74C37BE0 9C82B833
    00000000 0018FF94   0018FFDC 7741AD1F 7FFDE000 9F1CF9F2 00000000 00000000 7FFDE000 C0000005 7531F510 00000000


Modules:
00400000 0012E000 K:\v_xharb_v3\wvwtest9.exe
773C0000 0016E000 C:\Windows\SYSTEM32\ntdll.dll
74C20000 00140000 C:\Windows\SYSTEM32\KERNEL32.DLL
75260000 000D7000 C:\Windows\SYSTEM32\KERNELBASE.dll
71EA0000 00089000 C:\Windows\WinSxS\x86_microsoft.windows.common-controls_6595b64144ccf1df_5.82.9600.17810_none_7c5b6194aa0716f1\COMCTL32.DLL
77250000 0009B000 C:\Windows\SYSTEM32\COMDLG32.DLL
75390000 0010F000 C:\Windows\SYSTEM32\GDI32.DLL
77110000 00129000 C:\Windows\SYSTEM32\OLE32.DLL
74D60000 00095000 C:\Windows\SYSTEM32\OLEAUT32.DLL
76DA0000 00153000 C:\Windows\SYSTEM32\USER32.DLL
75630000 0007C000 C:\Windows\SYSTEM32\ADVAPI32.dll
76CD0000 000C3000 C:\Windows\SYSTEM32\msvcrt.dll
75100000 00045000 C:\Windows\SYSTEM32\SHLWAPI.dll
75A20000 012AD000 C:\Windows\SYSTEM32\SHELL32.dll
76F00000 0017D000 C:\Windows\SYSTEM32\combase.dll
75150000 000BA000 C:\Windows\SYSTEM32\RPCRT4.dll
75210000 00041000 C:\Windows\SYSTEM32\sechost.dll
74BC0000 0001E000 C:\Windows\SYSTEM32\SspiCli.dll
749F0000 0008B000 C:\Windows\SYSTEM32\SHCORE.DLL
74BB0000 0000A000 C:\Windows\SYSTEM32\CRYPTBASE.dll
74B50000 00054000 C:\Windows\SYSTEM32\bcryptPrimitives.dll
77090000 00027000 C:\Windows\system32\IMM32.DLL
754B0000 00112000 C:\Windows\SYSTEM32\MSCTF.dll

Called from WVW_SETVERTCARET(0)
Called from MAIN(175) in .\prge1\wvwtest9.prg
------------------------------------------------------------------------
 

[Antonio Linares]

El error se produce en la función

Called from WVW_SETVERTCARET(0)
Called from MAIN(175) in .\prge1\wvwtest9.prg

Tienes el código fuente de WVW_SETVERTCARET() ?

[ruben Dario]

Gracias, Antonio.

Esta en el Archivo gtwvwd.c

Anexo Fuetes.

[url]

https://www.dropbox.com/s/88kf1b123s1uu ... w.rar?dl=0
[/url]

[Antonio Linares]

Ruben,

Es la primera vez que reviso WVW_SETVERTCARET:

Code: Select all  Expand view  RUN

/*wvw_SetVertCaret( [lOn] )
 * if lOn is supplied:
 * lOn == .t.: turn caret into vertical caret
 * lOn == .f.: turn caret into horizontal caret
 * return old setting of s_pWvwData->s_bVertCaret
 */
/*TODO: do you want to make it window selective?*/
HB_FUNC( WVW_SETVERTCARET )
{
   BOOL       bOldVertCaret = s_pWvwData->s_bVertCaret;
   WIN_DATA * pWindowData   = s_pWvwData->s_pWindows[ s_pWvwData->s_usNumWindows - 1 ];

   if( ! HB_ISNIL( 1 ) )
   {
      s_pWvwData->s_bVertCaret = hb_parl( 1 );

      /*TODO: we should recalculate width and height of caret! */
      hb_gt_wvwKillCaret( pWindowData );
      hb_gt_wvwCreateCaret( pWindowData );

   }

   hb_retl( bOldVertCaret );
}
 

Para qué quieres usar estás funciones ?

Si nos explicas cual es tu objetivo, posiblemente te podamos orientar acerca de cómo hacerlo

[ruben Dario]

Gracias Antonio.

Solamente estoy haciendo pruebas. con las contribuciones, y con todas he tenido problemas para trabajar con make.

estoy buscando es porque con hbmk2 funciona bien.

con respecto a este ejemplo, el problema esta en crear la libreria gtwvw, no la comoila bien. No se si alguine la tiene construida para Harbour,



Gracias