delphi7 编译程序时报win32.indcu.a病毒的解决方法

简介
       Win32/Induc.A 是一个可以在编译时（compile-time ）感染Delphi文件的病毒。 

    发作
    该病毒没有任何复制自身的行为。 

    该病毒针对下列文件进行拷贝（源文件，目的文件）： 
  l  %delphi rootdir%\Lib\SysConst.dcu， %delphi rootdir%\Lib\SysConst.bak
  l  %delphi rootdir%\source\rtl\sys\SysConst.pas, %delphi rootdir%\Lib\SysConst.pas

    修改了下列文件： 
  l  %delphi rootdir%\Lib\SysConst.pas

    该病毒将自身源代码写入文件。 

    该病毒执行下列命令行：
  l  "%delphi rootdir%\Bin\dcc32.exe" "%delphi rootdir%\Lib\SysConst.pas"

    最终文件"%delphi rootdir%\Lib\SysConst.dcu"包括了原始代码。

    删除了下列文件： 
  l  %delphi rootdir%\Lib\SysConst.pas


    文件感染
      Win32/Induc.A是一个感染Delphi编译文件的病毒。 
    用Delphi语言编写的编译程序也会携带病毒代码。插入代码的大小为5KB。
   其他信息
      Delphi版本4、5、6、7 均受影响。

　　

    查看文件，如图

        

　　

    解决办法：

　　如果DELPHI安装目录里的Lib\SysConst.dcu大于/等于17K,就说明中招了,SysConst.dcu正常大小是12K左右, 修复这个文件再重新编译程序就不会有问题了 (  在lib\下找到 sysconst.bak一个11.7K,把SysConst.dcu 20K的删了.改SysConst.bak为 SysConst.dcu一切OK!)