DLLCALL

[Vladimir Zorrilla]

Amigos uso xharbour 0.82 y hay una funcion DLLCAL q no tiene mi version y la verdad
que migrar a xhb superior se me hace imposible por el tiempo de entrega que se me vence.

rmcdemo.prg tiene llamadas a dllcall hay una funcion en fwh calldll que no se si hace lo mismo y si se usa de la misma forma.

nRet := DLLCALL(hRmcDll,DC_CALL_STD, ;
"RMC_CREATECHARTFROMFILE",oDlgTst:hWnd,nCtrlId,nX,nY,;
nExportOnly,sRMCfile )



y la otra es HB_RandomInt aData[i] = HB_RandomInt( 10000, 28000 ) + .001

Alguien tiene el codigo de esas funciones

Mil gracias

[Antonio Linares]

Vladimir,

Prueba a enlazar este OBJ. Contiene DLLCALL() de xHarbour:

http://www.mediafire.com/?sharekey=414c ... 8114394287

[Antonio Linares]

En FWH tienes nRandom( nRango ) --> nValor

Por ejemplo, nRandom( 100 ) te devuelve un numero aleatorio del 0 al 100.

[Vladimir Zorrilla]

Gracias por contestar

Puse el dllcall.obj que me enviaste y me pide 4 funciones mas

Error: Unresolved external '_hb_stackReturnItem ' from DLLCALL.obj
Error: Unresolved external '_hb_retptrGC' from DLLCALL.obj
Error: Unresolved external '_hb_storptr' from DLLCALL.obj
Error: Unresolved external '_hb_parcx' from DLLCALL.obj

compilado con xharbour 0.82

Gracias por la Ayuda

[Vladimir Zorrilla]

M e olvidaba

nRandom( 100 )

del 0 al 100

y como seria solo del 20 al 100

Gracias

[Antonio Linares]

Vladimir,

> Puse el dllcall.obj que me enviaste y me pide 4 funciones mas

Ahi poco podemos hacer ya, salvo que te actualices a una version mas reciente de xHarbour que no deberia darte problemas.

> y como seria solo del 20 al 100

20 + nRandom( 80 )