Programación General > Visual Basic 6.0 e inferiores

 Me Gustaria Saber Donde Puedo Encontrar

(1/1)

krlospelaez:
Hola muchachos me gustaria saber donde puedo encontrar informacion hacer del manejo de una funcion API "Copy Memory" que la verdad no tengo ni idea como funciona y no tengo muy claro para que sirve, y tambien me gustaria preguntarles si alguien sabe para que sirve el comando "Xor"? :huh:  :comp:


Att K'rlos Peláez

Cyclop:
Segun la definicion de KPD-Team. es una funcion que copia un bloque de memoria de una ubicacion a otro. Ejemplo .


--- Código: Text --- Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (pDst As Any, pSrc As Any, ByVal ByteLen As Long)Private Declare Function GetTickCount Lib "kernel32" () As LongPrivate Sub Form_Load()    'KPD-Team 1999    'URL: http://www.allapi.net/    'E-Mail: KPDTeam@Allapi.net    Dim sSave As String, Cnt As Long, T As Long, Pos As Long, Length As Long    Const mStr = "Hello "    Length = Len(mStr)    sSave = Space(5000 * Length) 'make buffer for justified comparison    'Get the current tickcount    T = GetTickCount    Pos = 1    sSave = Space(5000 * Length)    For Cnt = 1 To 5000      Mid(sSave, Pos, Length) = mStr      Pos = Pos + Length    Next Cnt    'Show the results    MsgBox "It took Visual basic" + Str$(GetTickCount - T) + " msecs. to add 5000 times a string to itself."    'Get the current tickcount    T = GetTickCount    Pos = 0    sSave = Space(5000 * Length)    For Cnt = 1 To 5000        CopyMemory ByVal StrPtr(sSave) + Pos, ByVal StrPtr(mStr), LenB(mStr)        Pos = Pos + LenB(mStr)    Next Cnt    'Show the results    MsgBox "It took CopyMemory" + Str$(GetTickCount - T) + " msecs. to add 5000 times a string to itself."End Sub  
Salu2


Cyclop

RadicalEd:
LA PRIMERA TE QUEDO CLARA, XOR A VER NO HE PROGRAMADO CON EL PERO SE QUE SIRVE PARA ENCRIPTAMIENTO PASATE PORVirus LabY DESCARGATE LOS MITOSIS QUE HAY ALLI ELLOS TE ENSEÑARAN BIEN LO DE ENCRIPTAMIENTO CON EL COMANDO XOR

Cyclop:
Aca tienes otro link para aprender, pero si tienes la ayuda instalada (MSDN) ahi explica mas detallado los operadores de comparacion bit a bit

http://msdn.microsoft.com/library/spa/defa...ml/vaoprXor.asp

No lo manejo muy bien pero lo que hace es convierte un numero a binario y compara cada bit con el otro numero tambien binario, de este resultado te queda otro numero binario qe lo convierte a decimal

un burdo ejemplo

01010101

xor

11001010

=

10011111

lo compara en base a una tabla de estructura logica


Salu2


Cyclop

krlospelaez:
Muchas gracias por su colaboracion.


Att

Krlos Pelaez

Navegación

[0] Índice de Mensajes