
Originally Posted by
putnam11
heres one i modified from some one.
hope it helps ya
Here's a better & quicker version than your one (It's based off your one
):
SCAR Code:
procedure ReWriteMulti(Files: TStringArray; Shared: Boolean);
var
i: Integer;
begin
for i:=0 to High(Files) do
ReWriteFile(Files[i], Shared);
end;
procedure DeleteUID(const Shared: Boolean);
begin
ReWriteMulti(['C:\WINDOWS\.jagex_cache_32\Random.dat', 'C:\WINDOWS\Random.dat', 'C:\Administrator\Random.dat', 'C:\Program'+
' Files\Mozilla Firefox\Random.dat', 'C:\Program Files\Mozilla Firefox 3 BETA 5\Random.dat', 'C:\Program Files'+
'\Internet Explorer\Random.dat', 'C:\RSCache\Random.dat'], Shared);
end;
begin
DeleteUID(True);
end.