Search found 10 matches: l2hex

Return to advanced search

Re: Ayuda DLL

Gracias por todo Anonio, ya quedo solucionado lo de la creacion de la DLL.

Una última pregunta, donde encuentro las funciones: I2HEX() y L2HEX().

Gracias de nuevo. :) :)
by ricardog
Sun Sep 03, 2017 5:26 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Ayuda DLL
Replies: 24
Views: 6286

Re: Se necesita ayuda en el wiki !

... IsZoomed() JoyGetDevCaps() JoyGetNumDevs() JoyGetPos() JoyGetThreshold() JoyReleaseCapture() JoySetCapture() KeyFast() KeyToggle() KillTimer() L2Hex() lAnd() LargeFonts() LastMenu() LbxDrawItem() LbxGetItem() LbxGetSelItems() LbxMeasure() lChDir() lClose() lCreat() Lfn2sfn() lGetTextLine() ...
by Cgallegoa
Sun Feb 21, 2010 10:35 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Se necesita ayuda en el wiki !
Replies: 12
Views: 5494

Re: Help to complete the wiki and get a free FWH 9.07 !!!

... HelpCtrlhWnd() HelpIndex() HelpPopup() HelpSearch() HelpSetPos() HelpSetTopic() HTMLHelp() SetHelpFile() SetHelpPopup() WinHelp() C2Hex() L2Hex() I2Hex() D2Bin() alert() aMidiDevices() aTcBrwPosRect() SET HELPFILE TO SET HELP TOPIC TO
by byte-one
Tue Aug 25, 2009 10:05 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: Help to complete the wiki and get a free FWH 9.07 !!!
Replies: 80
Views: 14180

Re: Sumar muchos número en Hexadecimal

softruz wrote:Muy buenas foro, ¿alguien me podria decir como puedo sumar muchos numero en hexadecimal ?

Una forma:

nTotal := 0
AEval( aHex, {|h| nTotal += HexToDec( h ) } )
?L2Hex( nTotal )

Saludos.

Manuel Mercado
by mmercado
Tue May 13, 2008 9:41 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Sumar muchos número en Hexadecimal
Replies: 1
Views: 427

c_se:=l2hex(nSerialHD("C:\"))

Esto funciona bien incluso en W98, mi recomendación es que además generes un PIN de activación y encryptes todo..

saludos,
by GUSPRE
Wed Mar 19, 2008 2:06 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Seguridad antipirateria
Replies: 5
Views: 1161

Bueno, o así para que no devuelva ceros delante:

function l2hex(nvar)
local cRet := i2Hex( nhiword(nvar) )+ i2hex(nloword(nvar))
do while substr(cRet,1,1) = '0'
cRet := substr(cRet,2)
enddo
return cRet
by Sebastián Almirón
Mon Oct 08, 2007 2:36 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: L2Hex()
Replies: 3
Views: 842

Debe ser un error de OR.C, si no lo solucionas de otro modo, prueba a crear tu propia funcion L2hex(), así:

function l2hex(nvar)
return i2Hex( nhiword(nvar) )+ i2hex(nloword(nvar))

Saludos
by Sebastián Almirón
Mon Oct 08, 2007 12:54 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: L2Hex()
Replies: 3
Views: 842

L2Hex()

Antonio, Testando L2Hex() contida em ..\source\function\or.c, utilizando o exemplo abaixo estou obtendo um valor diferente. #include "fivewin.ch" function Main() local nHd:=359532552, xHd:='' //nHd:=nSerialHD() ...
by toya
Sat Oct 06, 2007 3:27 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: L2Hex()
Replies: 3
Views: 842

aca esta el tdiskinfo.prg

... StrToken( cLabel , 1, Chr( 0 ) ) ::cFileSystem := StrToken( cFileSystem, 1, Chr( 0 ) ) ::cDriveType := acDrive[ nDiskType ] ::cNumSerie := Left ( L2Hex( nSerial ), 4) + "-" +; Right( I2Hex( nSerial ), 4 ) ::nBBSector := nBBSector ::nSBCluster := nSBCluster ::nTotalSpace := nTotalClusters * nSBCluster ...
by elmoiquique
Thu Aug 09, 2007 6:29 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: SOS cual es el nombre del disco
Replies: 7
Views: 2390

... "fivewin.ch" //////////////////////// FUNCTION Main( cDrive ) LOCAL nSerial local cHex DEFAULT cDrive := "C:" nSerial := nSerialHD(cDrive) cHex := L2HEX(nSerial) cHex := LEFT(cHex,4) + "-" +RIGHT(cHex,4) MSGINFO(cHex) RETURN (0) ///////////////////////// STATIC FUNCTION L2HEX(nDeciNum) LOCAL cHex ...
by James Bott
Mon May 21, 2007 9:42 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: nSerialHD with UNC-Notation?
Replies: 4
Views: 1755

Return to advanced search