Код:
begin
ClearQuarantine;
QuarantineFile('C:\Users\Secretary\AppData\Roaming\Microsoft\Internet Explorer\Quick Launch\Google Chrome.lnk', '');
QuarantineFile('C:\Users\Secretary\AppData\Roaming\Microsoft\Internet Explorer\Quick Launch\Launch Internet Explorer Browser.lnk', '');
QuarantineFile('C:\Users\Secretary\AppData\Roaming\Microsoft\Internet Explorer\Quick Launch\User Pinned\TaskBar\Google Chrome.lnk', '');
QuarantineFile('C:\Users\Secretary\AppData\Roaming\Microsoft\Internet Explorer\Quick Launch\User Pinned\TaskBar\Internet Explorer.lnk', '');
QuarantineFile('C:\Users\Secretary\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\iexplore.lnk', '');
QuarantineFile('C:\Users\Secretary\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Accessories\Internet Explorer.lnk', '');
QuarantineFile('C:\Users\Public\Desktop\Google Chrome.lnk', '');
QuarantineFile('C:\Users\Public\Desktop\Opera 34.lnk', '');
QuarantineFile('C:\ProgramData\Microsoft\Windows\Start Menu\Programs\Opera 34.lnk', '');
QuarantineFile('C:\ProgramData\Microsoft\Windows\Start Menu\Programs\Opera.lnk', '');
QuarantineFile('C:\ProgramData\Microsoft\Windows\Start Menu\Programs\Google Chrome\Google Chrome.lnk', '');
QuarantineFile('C:\ProgramData\OIBqbbSm\OlpSGKnNoDrq0.bat', '');
QuarantineFile('C:\ProgramData\auZyIXzF\MeZDIya5.bat', '');
QuarantineFile('C:\ProgramData\cxNWZejRHol\yRWkajVtZ3.bat', '');
QuarantineFileF('C:\ProgramData\OIBqbbSm', '*', true, '', 0, 0);
QuarantineFileF('C:\ProgramData\auZyIXzF', '*', true, '', 0, 0);
QuarantineFileF('C:\ProgramData\cxNWZejRHol', '*', true, '', 0, 0);
DeleteFile('C:\ProgramData\OIBqbbSm\OlpSGKnNoDrq0.bat', '');
DeleteFile('C:\ProgramData\auZyIXzF\MeZDIya5.bat', '');
DeleteFile('C:\ProgramData\cxNWZejRHol\yRWkajVtZ3.bat', '');
DeleteFileMask('C:\ProgramData\OIBqbbSm', '*', true);
DeleteFileMask('C:\ProgramData\auZyIXzF', '*', true);
DeleteFileMask('C:\ProgramData\cxNWZejRHol', '*', true);
DeleteDirectory('C:\ProgramData\OIBqbbSm');
DeleteDirectory('C:\ProgramData\auZyIXzF');
DeleteDirectory('C:\ProgramData\cxNWZejRHol');
CreateQurantineArchive(GetAVZDirectory + 'quarantine.zip');
end.
Файл