вирус канеш гениальный, ибо такого изврата я ищо не встречал...

удаление вируса, элементарное
качаем по ссылке неинфированные файлы
download
Копируем в %Delphi%\Lib\ файл Sysconst.pas, из архива, попутно удаляяя sysconst.dcu, sysconst.bak

Раньше слышал была модификация этого вируса, который вызывал run-time 3 error, при запуске

P.S: инфицировать можно любой(!!!) модуль Delphi, и следующим целевым юнитом станет вероятно sysutils.pas, т.к он входит во все GUI, Console applicatiom