Das kann man auch ganz leicht selber schreiben
Delphi-Quellcode:
Procedure DefragMem;
Var P:Pointer;
MI: // den record für GetGlobal oder so *1
begin
MI:=GetGlobal; *1
P:=GetMemory(MI.dwPhsyTotal div 2);
ZeroMem(p,Mi.dwPhysAvail div 2);
FreeMemory(p);
end;
und schon ists vollbracht
*1 ich bin zur Zeit (mal wieder) nicht Zuhause,
also
Sorry für die unvollständige Info...
Werd ich aber bei velangen, und wenn ich dran denk noch nachreichen