Page 1 of 2

blockchain y FWH

Posted: Mon Dec 09, 2019 7:58 pm
by MOISES
Hola compañeros:

¿Alguien ha explorado esta opción?

Muchas gracias. Un saludo

Re: blockchain y FWH

Posted: Mon Dec 09, 2019 8:02 pm
by cnavarro
http://forums.fivetechsupport.com/viewt ... 15#p211321

Incluido en la version de Fivewin 18.10

* TBLOCKCHAIN CLASS: included in LIBS
Sample of use: BLOCKCHAIN.PRG

Re: blockchain y FWH

Posted: Mon Dec 09, 2019 8:19 pm
by MOISES
Muchas gracias Cristóbal, pero no encuentro las fuentes de la clase

Re: blockchain y FWH

Posted: Mon Dec 09, 2019 8:20 pm
by cnavarro
Moisés, la clase es mía, y aunque la incluí en la lib de Fivewin, aún no he publicado su fuente.
Prueba el ejemplo y dime qué te parece y las sugerencias que tengas.

Re: blockchain y FWH

Posted: Mon Dec 09, 2019 8:28 pm
by MOISES
Muchas gracias Cristóbal. Tú lo has implementado en algún proyecto?

Re: blockchain y FWH

Posted: Mon Dec 09, 2019 8:43 pm
by cnavarro
Si, en qué tenías pensado aplicarlo?

Re: blockchain y FWH

Posted: Tue Dec 10, 2019 3:20 am
by MOISES
Aún no lo sé, por eso preguntaba experiencias de otros compañeros. Cualquier luz será bienvenida.

Muchas gracias.

Re: blockchain y FWH

Posted: Tue Dec 10, 2019 3:29 am
by MOISES
En el .rc tienes un error en el path del Manifest. Debe ser:

Code: Select all

#ifdef __FLAT__
   1 24 "WinXP/WindowsXP.Manifest"
#endif

Re: blockchain y FWH

Posted: Fri Jan 03, 2020 5:06 pm
by MOISES
Por favor, ¿podrías incluir los fuentes de la clase en la próxima versión? Sin ellos el ejemplo no se entiende. Y sigue estando mal el fichero .rc. Muchas gracias y feliz 2020

Re: blockchain y FWH

Posted: Fri Jan 03, 2020 6:04 pm
by cnavarro
Lo del rc, se me ha pasado, pero qué es lo que no entiendes ?
Si no has mirado los enlaces que he puesto en el ejemplo y entiendes el concepto, la clase no te lo va a explicar

Re: blockchain y FWH

Posted: Sat Jan 04, 2020 3:14 pm
by leandro
No logro compilar el ejemplo, que me hace falta agregar?

Code: Select all

┌────────────────────────────────────────────────────────────────────────────┐
?FiveWin for xHarbour 19.09 - Sep. 2019          xHarbour development power │▄
?(c) FiveTech 1993-2019 for Microsoft Windows 9X/NT/200X/ME/XP/Vista/7/8/10 │█
└────────────────────────────────────────────────────────────────────────────┘?
  ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀?
Compiling...
xHarbour 1.2.3 Intl. (SimpLex) (Build 20190613)
Copyright 1999-2018, http://www.xharbour.org http://www.harbour-project.org/
Compiling 'blockchain.prg' and generating preprocessed output to 'blockchain.ppo'...
Generating C source output to 'blockchain.c'...
Done.
Lines 409, Functions/Procedures 6, pCodes 5370
Embarcadero C++ 7.30 for Win32 Copyright (c) 1993-2017 Embarcadero Technologies, Inc.
blockchain.c:
Borland Resource Compiler  Version 5.40
Copyright (c) 1990, 1999 Inprise Corporation.  All rights reserved.
Turbo Incremental Link 6.80 Copyright (c) 1997-2017 Embarcadero Technologies, Inc.
Error: Unresolved external '_HB_FUN_HB_HHASKEY' referenced from C:\FWH1909\LIB\FIVEHX.LIB|TBLOCKCHAIN
Error: Unable to perform link
* Linking errors *
 

Re: blockchain y FWH

Posted: Sat Jan 04, 2020 4:25 pm
by cnavarro
Leandro, pon esto al principio del ejemplo

Code: Select all

#xtranslate hb_HHasKey( [<x,...>] ) => HHasKey( <x> )
 
Pero es raro porque justo es lo que aparece al principio de la clase

Code: Select all

#ifdef __XHARBOUR__
#xtranslate hb_HHasKey( [<x,...>] ) => HHasKey( <x> )
#endif
 

Re: blockchain y FWH

Posted: Sat Jan 04, 2020 5:57 pm
by leandro
Cristobal gracias por responder...

Nada devuelve mismo error :shock:

Re: blockchain y FWH

Posted: Sat Jan 04, 2020 6:33 pm
by cnavarro
Leandro, prueba poniendo esto al final del ejemplo
Miraré qué ha pasado en la librería

Code: Select all

Function hb_HHasKey( x, cKey  )
Return HHasKey( x, cKey )
 

Re: blockchain y FWH

Posted: Sat Jan 04, 2020 7:03 pm
by leandro
Nuevo Error, jejejejejeje

Code: Select all

Stack Calls
===========
   Called from: .\source\internal\TBLOCKCHAIN.PRG => TBLOCKCHAIN:ADDNEWBLOCK( 139 )
   Called from: .\source\internal\TBLOCKCHAIN.PRG => TBLOCKCHAIN:NEW( 60 )
   Called from: blockchain.prg => MAIN( 65 )