FiveTech Software tech support forums

Victor,

Prueba a ponerle este valor en el estilo del control:

0x50310000

Es equivalente a:

MsgInfo( DecToHex( nOr( WS_CHILD, WS_VISIBLE, WS_TABSTOP, WS_VSCROLL, WS_HSCROLL ) ) )

... local n, nResult := 0

for n = Len( cBin ) to 1 step -1
if SubStr( cBin, n, 1 ) == "1"
nResult += 2 ^ ( Len( cBin ) - n )
endif
next
return DecToHex( nResult )

Pruebo con un programa llamado Docklight Scripting y el hard responde correctamente, pero mi aplicacion no.
La gente que provee este ...

... a continuación, la aplicación aborta anormalmente :

cValToChar( WIN_N2P( oWnd:hWnd ) )
El problema radica en la llamada a DecToHex() que realiza cValToChar() ante un puntero :

... case cType == "P" return "0x" + DecToHex( uVal )...
Yo lo he corregido así ...

... error: Unresolved external symbol '_HB_FUN_ASEND referenced from Fivehmx.lib(MSGBAR.obj)'.
xLINK: error: Unresolved external symbol '_HB_FUN_DECTOHEX referenced from Fivehmx.lib(VALBLANK.obj)'.
xLINK: error: Unresolved external symbol '_HB_FUN_GETWNDFRAME referenced from Fivehmx.lib(MDICHILD.obj ...

... oOldSkinButton]

Puedes revisar su documentación en el wiki de FiveTech:

m
m

* Corrección: Pequeño error corregido en la función DecToHex( nDecValue ) --> cHex.

* Mejora: Se ha renombrado la función de FWH GetNew() como FWGetNew() para evitar conflictos con
la de Harbour GetNew ...

... oSkinButton] ) --> [oOldSkinButton]

You may review its documentation from the FiveTech wiki:
m
m

* Fix: Bug solved in function DecToHex( nDecValue ) --> cHex

* Enhancement: FWH function GetNew() renamed as FWGetNew() to avoid conflicts with Harbour
GetNew().

* Enhancement: FWH ...

JM,

Como te indica Daniel, ya está arreglada e incluida para el próximo build

Saludos jmGarcia

JmGarcia wrote:Antonio, no te olvides de corregir esta función en la próxima entrega

reparada e incluida para la proxima version

Antonio, no te olvides de corregir esta función en la próxima entrega

Antonio, corregirás esta función en la próxima entrega ¿no?

Hola la solucion

function DecToHex( nValue )   local nMod, cDec := ""   while nValue >= 16      nMod   = nValue % 16      nValue = Int( nValue / 16)      cDec   = HexVal( nMod ) + cDec   end ...

Hola

dec hex
0 0
1 1
. .
9 9
10 A
11 B
12 C
13 D
14 E
15 F
16 10 NO G entonces tambien esta mal

Llevo loco varios días con un error en la función "DecToHex" de FWH. En todas las versiones.

DecToHex(16) devuelve "G" en vez de "F"

Solo necesitas nRandom( [<nRango>] ) --> n
y DecToHex( n ) --> cHex.

Ambas estan en FWH y asi puedes construir tu función desde PRG

Hi Antonio,

I've tried with the DecToHex() but still end up with an 8 char Hex number instead of the needed 4 char hex number as in the example below:


Header <command> CRC

DIAP000<%REQUEST CORRUPT> 734D

DIAP000<%INVALID CRC CHAR> A471


I still have not had a reply from the manufacturer