用delphi开发程序，新建一个工程，在工程代码中加入读取配置文件就报有病毒。
工程文件如下：
program Project1;
uses
  Forms,
  windows,
  Messages,
  Dialogs,
  Sysutils,
  inifiles,
  Controls,
  Classes,
  Unit1 in 'Unit1.pas' {Form1};
{$R *.res}
var
  fileini:Tinifile;
  sname:string;
begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  //加入三行则误报
  fileini := Tinifile.Create(extractfilepath(paramstr(0))+'SETUP.INI');
  sname := fileini.ReadString('LOGINSQL','SERVERNAME','');
  fileini.Free ;
  Application.Run;
end.

用户系统信息：Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; Maxthon; SV1;  Embedded Web Browser from: http://bsalsa.com/; .NET CLR 2.0.50727)