como llenar la memoria Ram

[[kurono]]

como bien dices utilizare un multiplo comun para los standeres de las memorias actualmente como el ejemplo que pusiste de 1mb o hasta 10mb puede ser para que esa operacion no se interrumpa como dices por algun programa en ejecucion o proceso pienso poner un aviso al momento de ejecutarlo diciendo que se debe cerrar toda aplicacion habierta

[[Crandel]]

Aunque lo que propones es interesante, recuerda que dos maquinas exactamente iguales en Hardware no responderan igual en velocidad de aceso a la ram, debido a que se debe tambien al uso actual de memoria.

Y en la misma maquina, no es lo mismo llenar una memoria con 10 vectores de 1mb que con un vector de 10 mb. Y si sigues llenando la memoria sin liberarla, en un momento empezará a tardar mucho mas.

[[kurono]]

se bien que un componente tales como memoria procesador no funciona igual en en diferente maquina y ahi esta unos de los motivo para hacer este programa y ver el funcionamiento de una memoria en diferente maquina . en cuanto a las cantidad de memoria pues pienso ponerle varias opciones de diferente tamaño y a final de cada prueba liberar la memoria

[[cHackAll]]

Luego de haber seguido el anterior hilo y éste, repito lo que ya dije:

Empezado por cHackAll

Para acceder a la memoria RAM necesitas modificar los privilegios de acceso a dicho objeto (restringido por su naturaleza crítica), luego realizar un mapeado del mismo en tu proceso y leer por bloques razonables múltiplos de 4 Kb que es el tamaño del PAGE_SIZE en arquitecturas x86...

Y recalco que es MUY peligroso escribir en la memoria RAM puesto que allí recide el núcleo del SO, los Drivers y muchos otros componentes del SO que al ser modificados provocarían las peores excepciones y la perdida de datos.

Código Delphi [-]
uses Windows, SysUtils;
 
const Section: array [0..7] of PWideChar = (Ptr(24), nil, @Section[6], Ptr(64), nil, nil, Ptr(3014700), '\Device\PhysicalMemory');
function NtOpenSection(var Handle: Cardinal; Access: Cardinal; const Section): Cardinal; stdcall; external 'ntdll';
 
var
 Handle, Time, Size, Offset: Cardinal;
 MemoryStatus: TMemoryStatus;
 lpBuffer: PChar;
 
begin
 if NtOpenSection(Handle, 4, Section) = 0 then
  begin
   GlobalMemoryStatus(MemoryStatus);
   Size := MemoryStatus.dwTotalPhys;
   Offset := 0;
   Time := GetTickCount;
   repeat lpBuffer := MapViewOfFile(Handle, 4, 0, Offset, $1000);
    if Assigned(lpBuffer) then
     UnmapViewOfFile(lpBuffer);
    Inc(Offset, $1000);
   until Offset = Size;
   Time := GetTickCount - Time;
   CloseHandle(Handle);
   MessageBox(0, PChar(IntToStr(Time div 1000)+'.'+IntToStr(Time mod 1000)), nil, 0);
  end;
end.

El anterior ejemplo hace lo que comentaba en mi post citado, pero te aconsejo utilizar la API LocalAlloc para emular lo que necesitas, caso contrario no dejes de considerar lo comentado por HySTD en el anterior hilo.

Saludos

[[kurono]]

puedes darme un ejemplo de la API LocalAlloc pues no quiero dañar la memoria ram

[[cHackAll]]

Empezado por kurono

puedes darme un ejemplo de la API LocalAlloc pues no quiero dañar la memoria ram

He editado mi post pues no quise decir lo que habia dicho , el ejemplo que ya tienes funciona para "medir" la lectura sin daños en la RAM, y el resultado de escritura no sería muy distinto asi que en cualquier caso puedes simular el proceso.

Aquí hay un ejemplo para reservar y mapear paginas de memoria física, ésto es un paso adicional necesario que tambien deberia ser cronometrado.

PD: VirtualAlloc es básicamente lo mismo que GetMem con la diferencia que puedes controlar de mejor manera la memoria "agotada".

Saludos

[[kurono]]

ok muchas gracias lo probare solo una duda el ejemplo que pusiste habia dicho que es para la arquitectura de x86 que parametro se cambiaria para la arquictectutra de 64bit