Ver Mensaje Individual
  #5  
Antiguo 27-10-2007
Avatar de cHackAll
[cHackAll] cHackAll is offline
Baneado?
 
Registrado: oct 2006
Posts: 2.159
Reputación: 22
cHackAll Va por buen camino
OK..

Cita:
Empezado por aeff
¿que quieres decir con que VirtualFreeEx libera un espacio reservado?
Pues el espacio reservado con el VirtualAlloc o VirtualAllocEx

Cita:
Empezado por aeff
que significa liberar en este caso?
Bueno que significa liberar y asignar; antes de que vaya a extenderme con una explicación de la administración de la memoria del Güindos te daré la anterior analogía:

GetMem = VirtualAlloc
FreeMem = VirtualFree

que obviamente son espacios VIRTUALES puesto que la memoria "lineal" es un concepto de un nivel inferior de programación. Comprendamos que cada proceso tiene un espacio propio de memoria (virtual).

Cita:
Empezado por aeff
¿es necesario abir el proceso con OpenProcess, por qué?
Pues el primer caso es el que decía; creas el proceso "TU", CreateProcessInternalW o mejor dicho NtCreateProcessEx, debuelve en lamenjador del proceso ya abierto.... en CreateProcess (por ejemplo) lo que retorna es en ProcessInformation.hProcess como ya comentaba.

Ahora si quieres asignar un espacio en memoria de OTRO proceso que ya existe, debes hacerlo con un manejador, y el manejador no es el PID; OpenProcess utilizando al PID como parámetro abre dicho proceso y te retorna el manejador del proceso "abierto".

Cita:
Empezado por aeff
y si le pasamos a la funcion GetModuleHandle el parámetro Nil, ¿que es lo que en realidad retorna?
Pues lo que retorna es la hucación donde ha sido cargado el mismo ejecutable, sabemos que el "magic signature" de un ejecutable es el "MZ", probemos con:

Código Delphi [-]
var Buffer: array [0..63] of Char;
procedure TForm1.FormCreate(Sender: TObject);
var Ptr: PChar;
begin
 Ptr := PChar(GetModuleHandle(nil));
 Move(Ptr^, Buffer, High(Buffer));
 Caption := Bufferñ
end;

Saludos
Responder Con Cita