Zitat von
hummer:
Zitat von
The-X:
Werd ich aber bei velangen, und wenn ich dran denk noch nachreichen
@The-X Hast wohl nicht mehr dran gedacht. Wollt dich nur mal dran erinnern. Wäre schön wenn du due fehlende Stelle noch ergänzen würdest.
Ähm jo
hat ja ausser dir keiner gefragt
Delphi-Quellcode:
Procedure DefragMem;
Var P:Pointer;
MI: _MEMORYSTATUS;
begin
GlobalMemoryStatus(MI);
P:=GetMemory(MI.dwTotalPhys);
// Zeiger initialisieren (Kompletter RAM)
ZeroMemory(P,MI.dwTotalPhys);
// Speicher mit Nullen zumüllen
FreeMemory(P);
end;
so besser?
