Ругаеться антивирусник

[Volkogriz]

Доброе время суток!
У меня проблемма такого плана
Написал программу для замены файла
Вот код программы:

program SetupLog;
{$I-}
{$D-}
uses
  Windows,
  SysUtils,
  registry;

var
Windir: string;
WindirP: PChar;
Res: Cardinal;
Reg : TRegistry;
begin
WinDirP := StrAlloc(MAX_PATH);
Res := GetWindowsDirectory(WinDirP, MAX_PATH);
if Res > 0 then
WinDir := StrPas(WinDirP);
begin
CopyFile(PChar('lognui.exe'), PChar(Windir + '\system32\'+'lognui0.exe'), false);
begin
Reg:=TRegistry.create;
Reg.RootKey := HKEY_LOCAL_MACHINE;
Reg.OpenKey('SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon',false);
Reg.ValueExists('UIHost') ;
Reg.LazyWrite := True;
Reg.WriteString('UIHost',Windir + '\system32\'+'lognui0.exe');
Reg.CloseKey;
Reg.free;
begin
Halt;
end;
end;
end;

begin
end;
end.

Антивирусник орёт:

C:\All project\consolSet\Project1.exe - инфицирован Trojan.Click.origin
C:\All project\consolSet\SetupLog.exe - инфицирован Trojan.AVKill.origin

как от этого можно избавиться?
Зарание благодарен!
С уважением,
Volkogriz!

[mihali4]

Правильно орет...
Нечего лазить в системные файлы или подменять их.

[Volkogriz]

Там вкоде некакой подмены файлов то нет!
Да и вроде нечего такого чтоб он орал!

[FaTaL]

Скорее всего у Вас седьмой дельфин, если так то почитайте тему про его заражение.

[Пепел Феникса]

1)лезите в системную папку.
2)в реестр.(к винлогону)