Амиго, Маил и др. самоустановка

begin
ExecuteFile('net.exe', 'stop tcpip /y', 0, 15000, true);
 TerminateProcessByName('c:\users\2b46~1\appdata\local\temp\fb6ac74b-b12e-4352-8e8d-e0055db62707\05a00036.exe');
 TerminateProcessByName('c:\users\гений\appdata\roaming\imagecropresize\imageed\imageed.exe');
 QuarantineFileF('c:\users\гений\appdata\roaming\imagecropresize', '*.exe, *.dll, *.sys, *.bat, *.vbs, *.js*, *.tmp*', true, '', 0 ,0);
 QuarantineFile('c:\users\2b46~1\appdata\local\temp\fb6ac74b-b12e-4352-8e8d-e0055db62707\05a00036.exe', '');
 QuarantineFile('c:\users\гений\appdata\roaming\imagecropresize\imageed\imageed.exe', '');
 DeleteFile('c:\users\2b46~1\appdata\local\temp\fb6ac74b-b12e-4352-8e8d-e0055db62707\05a00036.exe', '32');
 DeleteFile('c:\users\гений\appdata\roaming\imagecropresize\imageed\imageed.exe', '32');
 DeleteFileMask('c:\users\гений\appdata\roaming\imagecropresize', '*', true);
 DeleteDirectory('c:\users\гений\appdata\roaming\imagecropresize');
ExecuteSysClean;
 ExecuteWizard('SCU', 2, 3, true);
 CreateQurantineArchive(GetAVZDirectory + 'quarantine.zip');
RebootWindows(true);
end.

begin
CreateQurantineArchive(GetAVZDirectory+'quarantine.zip'); 
end.