Ketika anda membuat sebuah project menggunakan delphi, dan ketika anda mengkompile project tersebut, ternyata project anda terdeteksi virus oleh antivirus, kemungkinan program delphi anda terinveksi oleh virus W32/Induc. Virus bernama W32/Induct ini menginfeksi salah satu file Unit yakni SysConst.dcu sehingga jika anda meng-compile project dengan Delphi yang terinfeksi virus W32/Induct ini, otomatis program yang anda hasilkan nantinya akan mengandung virus. Virus W32/Induct menyerang Delphi versi 5,6,7.

Cara membersihkan virus W32/Induct

0)Download remover alman dan sality killer Disini
 scan dahulu komputer dan pastikan bersih dari virus Scan juga menggunakan antivirus Seperti AVG, Avira, Avast dll. intinya bersihkan dahulu komputer dari virus. setelah itu lakukan langkah-langkah berikut.

1) Masuk ke folder library Delphi anda (misal C:\Program Files\Borland\Delphi7\Lib ) ~ sesuaikan dengan versi Delphi anda
2) Cari file SysConst.dcu dan hapus (ini file yang bervirus)

3) Cari file SysConst.bak lalu rename menjadi SysConst.dcu (sebelum rename back up dahulu file SysConst.bak mengantisipasi terinpeksi )
4) Jika file SysConst.bak tidak ketemu, anda harus mengcompile ulang dari sourcenya :
- Copy C:\Program Files\Borland\Delphi7\Source\Rtl\Sys\SysConst.pas ke folder C:\Program Files\Borland\Delph7\Lib
- Masuk ke command prompt (Start > Run > CMD) lalu masuk ke folder binary Delphi (CD C:\Program Files\Borland\Delphi7\Bin)
- Lalu jalankan perintah Dcc32.exe “C:\Program Files\Borland\Delphi7\Lib\SysConst.pas”
- Command tersebut akan menghasilkan file SysConst.dcu

Setelah itu lakukan compile ulang terhadap program atau project yang telah anda buat sebelumnya (yang bervirus), sehingga menghasilkan file executable yang bebas virus... 

Source : Link