急!!在线等,代码被NOD识别为病毒,怎么办啊?救命啊!!!

Question

下边这段代码编译后被NOD识别为PE病毒,如何解决啊?救命啊!!!
procedure TForm1.Timer1Timer(Sender: TObject);
var reg:tregistry;
str:string;
syspath:pchar;
begingetmem(syspath,255);
getsystemdirectory(syspath,255);
try
 begin
 reg:=tregistry.Create;
 reg.RootKey:=HKEY_LOCAL_MACHINE;
 str:='SOFTWARE\Microsoft\Windows\CurrentVersion\Run';
 if reg.KeyExists(STR) then
    begin
      reg.OpenKey(str,true);
      if reg.ReadString('DBHelp')='' THEN//<>syspath+'\DBHelp.exe' then
       begin
        reg.WriteString('DBHelp',syspath+'\DBHelp.exe');
       end
      else
       begin
        Timer1.Enabled:=false;
       end;
    end;
 reg.free;
 end
except
 begin
//
 end
end;
 freemem(syspath);end;

Answer 1

是DBHelp.exe  被人為是PE前病毒呢？還是這段寫注冊表的代碼當成了病毒。我覺得可能行比較高的是你在第一次執行這個文件的時候，殺毒的主動防禦提示你選擇了非信任。你可翠重建個項目放到另外一個目錄裏編譯運行試下，如果殺毒有提示一定要看清楚再處理，或者找下殺毒裏面的黑白明單

Answer 2

nod哪个就像国内的金山一样，误杀率高

Answer 3

你的delphi是不是感染病毒了？要不做成服务启动。