Windows 7 64bits y fhw32

[surGom]

Hola compañeros cambiamos una pc y el sistema operativo es de Win7 64 bits, y el programa de fwh es de 32bits, funciona bastante bien salvo que no puedo hacer los preview ya que me pide la prev64.dll la cual está en el mismo directorio del ejecutable, ¿por que no me lo reconoce?
Ademas en algunos puntos del programa por unos segundos el mismo queda como "no responde" y luego retoma el curso del mismo sin inconvenientes.

Me podrían indicar si hay alguna solución.




Luis

[karinha]

Pregunta:

RPREVIEW.PRG és de la misma versión del Fivewin que usas?

saludos.

[carlos vargas]

busca en el foro unos post relativo a esto, ya hace un buen tiempo se reviso el error en tpreview la cual equivocadamente llamaba a prev64.dll
http://forums.fivetechsupport.com/viewtopic.php?f=16&t=23183&p=124403&hilit=prev64.dll#p124403
http://forums.fivetechsupport.com/viewtopic.php?p=123942#p123942

[surGom]

Carlos al agregar

Code: Select all  Expand view

if ! IsWin64()
      if ! File( "prev32.dll" )
         MsgAlert( "prev32.dll not found", "Error" )
         SetResources( ::hOldRes )
         return nil
      else  
         SET RESOURCES to "prev32.dll"
      endif  
   else  
      if ! File( "prev64.dll" )
         MsgAlert( "prev64.dll not found", "Error" )
         SetResources( ::hOldRes )
         return nil
      else  
         SET RESOURCES to "prev64.dll"
      endif  
   endif

Me pisa e inutiliza mis recursos y me muestra solamente la pantalla principal con el menú pero sin botones que defino en la barra y luego da error al llamar algo del menú que necesita mis recursos

Yo compilo con una archivo res.

Luis

[karinha]

Code: Select all  Expand view

function RPreview( oDevice )

     local aFiles := oDevice:aMeta
     local hOldRes := GetResources()
     local oSay
     local nFor
     local oWndMain := WndMain(), oIcon, oCursor, oMenu, oBrush, oFont
     local l97Look  := oWndMain != nil .and. oWndMain:oBar != nil .and. ;
                       Len( oWndMain:oBar:aControls ) > 0 .and. ;
                       oWndMain:oBar:aControls[ 1 ]:l97Look
     local lExit := .F.
     local oHand, cPageNum, oImageList, oReBar

     #ifdef __CLIPPER__
        cResFile := "Preview.dll"
     #else
        if ! IsWin64()
           cResFile := "Prev32.dll"
        else
           cResFile = "Prev64.dll"
        endif      
     #endif

     if SetResources(cResFile) < 32
          MsgStop(cResFile + " not found, imposible to continue",;
                  "FiveWin Printing Error")
          RETU nil
     endif
 

[surGom]

Gracias Kharina, pero lamentablemente me sigue diciendo que no encuentra el archivo prev64.dll. El archivo lo tengo alojado en el mismo lugar que en el ejecutable. Hice una llamada en dónde se invoca a iswin64() y me la muestra.

Porque no me lee el prev64.dll

Gracias

[karinha]

Cual és tu version del FWH?

http://forums.fivetechsupport.com/viewtopic.php?f=6&t=26812&p=148666&hilit=prev64+dll#p148666

http://forums.fivetechsupport.com/viewtopic.php?f=3&t=19180&p=103295&hilit=prev64+dll#p103295

http://forums.fivetechsupport.com/viewtopic.php?f=6&t=17454&p=90859&hilit=prev64+dll#p90859

Saludos.

[Antonio Linares]

Luis,

FWH ya no necesita la DLL prevxx.dll

Que versión de FWH usas ?

[surGom]

Antonio la versión es la 13.12

Luis

[Antonio Linares]

Luis,

El eliminar el uso de prev...DLL se implementó en FWH 13.07

Prueba a no tenerla en donde tienes el EXE, te debería funcionar

[surGom]

Antonio desactive un rpreview que estaba usando y deje el nativo de Fwh y ahora funciona.

Gracias por tu ayuda

[Antonio Linares]

muy bien